点击TEXTbox时能不能让某个变量值为常量

yilinlangzi 发布于 2013-06-29 10:30， 399 次点击

点击TEXTbox时能不能让某个变量值为常量
如：鼠标点击TEXT1的时候，比如我有一变量“one"让它变为1
Private Sub Text1_GotFocus()
Dim one As Integer
one = 1
End Sub
或者判断光标是否在TEXT，如果在，那么“one”=1 否侧“one”=0.

2 回复

Artless2013-06-29 10:57

Dim one As Integer
Private Sub Text1_GotFocus()
one = 1
End Sub

九连阳2013-07-05 19:55

取消 Dim one As Integer 这一行
将 one 定义为全局变量，在其它控件就可以得到它的值
即将 Dim one As Integer 这一行写到代码窗口的通用_声明中