鼠标事件
Cilck：用户单击鼠标键时发生
DbLClick：用户双击鼠标键时发生
MouseDown：用户释放鼠标键时发生
MouseMove：移动鼠标时发生
键盘事件
KeyDown：在键按下时触发。（可获得一个KeyCode值）
KeyUp：在键弹起时触发。（可获得一个KeyCode值）
KeyPress：在键盘按下再弹起时发生。（它可获得KeyAscii值）
数据类型说明
Byte 二进制数
Boolean 真假值
Integer  整数
Long 长整型
Single  实数
Double 双精度型
Currency  货币
Date  日期和时间
Object  对象
String  字符串
Variant 可变类型
……
if 条件 then
{程序段一}
else
{程序段二}
end if
……
“确定”(CmdOK)
“清除”(CmdClear)
点击commandbutton按钮调用另一应用程序有如下几种方法：
1.  用  Shell  语句:
Shell  "C:\",  vbNormalFocus
2.  用API函数ShellExecute():
'  浏览器访问及执行文件
Private  Declare  Function  ShellExecute  Lib  "shell32.dll"  Alias  "ShellExecuteA"  (ByVal  hwnd  As  Long,  ByVal  lpOperation  As  String,  ByVal  lpFile  As  String,  ByVal  lpParameters  As  String,  ByVal  lpDirectory  As  String,  ByVal  nShowCmd  As  Long)  As  Long
Private  Sub  cmdShellExec_Click()
'启动程序或打开页面
On  Error  Resume  Next
Dim  Dummy  As  Long
Dim  ShellPathName  As  String
ShellPathName  =  "C:\"
Dummy  =  ShellExecute(0&,  vbNullString,  ShellPathName,  vbNullString,  vbNullString,  vbNormal
Focus)
End  Sub
form 窗体的意思，像form和command这样的单词是控件的名称，名称是控件的属性之一，可以在屏幕右侧的属
性列表中加以修改，到name这一行，在右侧键入自己想要的名字即可，不必记忆，至于LostFocus..MouseUp 是一些事件的名称，有必要记忆。下面写一些常用的。
lostfocus失去焦点
getfocus得到焦点
load装载
unload卸载
mousedown按下鼠标
mouseup松开鼠标
mousemove移动鼠标
dragover拖拽鼠标
dragdrop拖拽后松开鼠标
click单击
dblclick双击
mousemove是什么键keydown键盘按下
keyup键盘松开
keypress按键盘
change变换

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。