文本框 初始值 显示不出

你好饿的

文本框录入数据 默认设置的数据显示不出来

tanglf188

放错事件了

1. Private Sub UserForm_Initialize()
   
2.     TextBox1.Text = "CGCS2000坐标系,1985国家高程基准"
   
3.     TextBox2.Text = "XXX01 " & Date
   
4.     TextBox3.Text = "XXXX技有限责任公司"
   
5.     TextBox4.Text = "XX市XX区"
   
6.     TextBox5.Text = "地形测量"
   
7.     TextBox6.Text = "XXX项目"
   
8.     TextBox7.Text = "1：500"
   
9.     TextBox8.Text = "0.5"
   
10.     TextBox9.Text = "0"
    
11.     TextBox10.Text = "4"
    
12. End Sub
    

复制代码

laterite

你把代码放在了窗体单击事件上了，想要打开窗体就显示应该放在窗体的 UserForm_Initialize中