当给text1设置text属性时，怎样避免引发Change事件

Question

当给文本框设置text属性时，
  text1.text="abc"会自动引发text1_Change事件，如果不希望这样，又怎样避免引发Change事件？
（但键盘输入时，能引发text1_Change事件）

Answer 1

Private bln As Boolean
Private Sub Command1_Click()
bln = False
Text1.Text = "abc"
bln = True
End SubPrivate Sub Text1_Change()
If Not bln Then Exit Sub
MsgBox Text1.Text
End Sub

Answer 2

听懂了；
在　失去焦点事件中加你的代码．Private Sub Text1_LostFocus()
　　MsgBox Text1.Text
End Sub要求结帐！

Answer 3

但键盘输入时，能引发text1_Change事件
--------------------------------------
直接在text1_KeyPress事件中处理.
VB编程要讲究自然,心里想什么就写什么.

Answer 4

同意楼上的
改用keypress 或者keyup事件比较好

Answer 5

同样，设置 CheckBox1.Value=1 时，也引发 CheckBox1.Click事件,是不是只有zq972的方法了？

Answer 6

如果是为了排除某种情况下触发text1_Change事件,就采用1楼的办法；如果要指定某种情况下触发text1_Change事件就把代码放在相应的事件里。