设置TextBox的Text,而不触发Change事件？？？望高手指点

Question

Change事件里面不放动作不就行了, 或里面加一个判断.

Answer 1

你自己设置一个标志变量在Change事件中判断 标志变量 为真，则处理

Answer 2

试试：
dim blnEnabled as boolean
blnEnabled=text1.Enabled
text1.enabled=false
text1.text="abc"
text1.enabled=blnEnabled

Answer 3

用代码改变 Text 不知道能不能不触发 Change 事件！
不过，这个有用么？

Answer 4

好像不能吧.即使先
Text1.Enabled = False
再用SetWindowText来改变其内容,还是能触发Text1_Change
不会!!!!!!
我也等高手!!!!!!!关注!!!!!!!!

Answer 5

谁能解决同时告诉我一下，[email protected]

Answer 6

你自己设置一个标志变量在Change事件中判断 标志变量 为真，则处理

Answer 7

呵呵，
把自己的Enabled属性当标志可以不用变量了
但是还是要判断
Private Sub Command1_Click()
Text1.Enabled = False
Text1.Text = "呵呵"
Text1.Enabled = True
End SubPrivate Sub Text1_Change()
If Text1.Enabled Then
Beep
End If
End Sub

Answer 8

那咱们不妨从另外一个角度考虑，比如说textbox输入完后，用回车来触发处理事件：
dim flag as boolean
private sub text1_change()
    if flag=true then
       //*你的处理程序*//
    else 
       exit sub
    end if
end subPrivate Sub Text1_KeyPress(KeyAscii As Integer)
    if keyascii=13 then
       flag=true
    else 
       flag=false
    end if
End Sub这是我的一点拙见，不知有用与否？