当textbox 输入数据,鼠标离开点其它地方发生的事件,是什么事件??????????(不用LostFocus)当texbox 输入数据后,发生的事件,是什么事件?????????????
解决方案 »
- vb6 activate deactivate事件问题
- 怎么从flash的swf或exe文件中提取音乐?100分求。
- 关于报表的几个问题.1.
- vb里如何利用zip32.dll对一个目录进行压缩呢
- 用什么方法同时画两条直线?
- 用VB程序写直流电机调速正反转 停止 使用下拉菜单调速
- 大家好,我在vb中要控制条码打印机,给点意见了!
- vb+access 写入access数据库表格时,可以给单元格设置不同的颜色和字体吗?
- 兄弟姐妹们,偶成功了。里面有我老婆说的话。太感人了。谢谢大家!(笨笨小蛐蛐)
- ACTIVEX的一点小问题
- vb 在数据库写代码?(在线等..)
- 求助高手!!excel表格中实现追加sheet工作表???
只能LostFocus
点窗体,不能发生LostFocus
不能用change,因为频繁发生事件,数据量太大,浪费数据库资源
用LostFocus,焦点到移到其它地方才可以,点窗体不可以发生该事件。
在你的窗体添加一个不用的command,把它盖在其它command下面。
单窗体时,让它获得焦点,就可触发Text1_LostFocus了。Private Sub Form_Activate()
Text1.SetFocus
Command2.Move Command1.Left, Command1.Top
End SubPrivate Sub Form_Click()
Command2.SetFocus
End SubPrivate Sub Text1_LostFocus()
Debug.Print "lost focus"
End Sub
2 Text1_Change()
不能用change,就用KeyPress
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0 '消除声音
MsgBox "用户按了回车键,可以执行代码了。"
End If
End Sub