Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
MsgBox ""
End If
End Sub
If KeyAscii = 13 Then
MsgBox ""
End If
End Sub
解决方案 »
- webbrowser怎么实现打开网页自动选择下拉菜单
- 大家帮我找找,看是那里没有“对象”好吗?我找了一天没找到错误地方
- 请问,要如何将VB窗口左上角的小图标换成我们想要的小图标呢??????????????/
- 给我推荐一本初学visual basic6.0的书
- 如何在一个字段中加分隔符分开数据?
- 要走了,散分!!!
- 请教关于vb中画拖动五角星的问题(有原代码,只需进行修改)在线等候,马上给分,可能有一点难,请各位大虾帮忙
- 如何绘制正弦函数(y=sinx)?
- 请问在什么地方能够看到候捷的书评?
- 如何把asp页面的数据上传到服务器?急!!!!
- 急:播放dat文件以及播放全屏问题(在线等候)
- 关于显示一个表的记录?
If KeyAscii = 13 Then
MsgBox "OK!"
End If
End Sub