一)可以使用文本框的Locked 属性来设置内容只读。
Locked 属性
返回或设置一个值,以指定控件是否可被编辑。
Private Sub Form_Load()
Text1.Locked = True
Text1 = "不可输入"
End Sub
二)也可使用文本框的Enabled属性来限定文本框编辑。
Enabled 属性
返回或设置一个值,该值用来确定一个窗体或控件是否能够对用户产生的事件作出反应。
Private Sub Form_Load()
Text1.Enabled = False
Text1 = "不可输入"
End Sub
这两种方法皆可达到目的。