一、KeyPress事件 在窗体上画一个控件（指前面所讲的可以发生KeyPress事件的控件），并双击该控件，进入程序代码窗口后，从“过程”框中选取KeyPress，即可定义KeyPress事件过程。一般格式为:
Private Sub Text1 _ KeyPress（KeyAscii As Integer）
End Sub
二、KeyDown和KeyUp事件 KeyDown和KeyUp事件的参数也有两种形式，其中
Index As Integer
只用于控件数组，而
KeyCode As Integer，Shift As Integer
用于单个控件。
三、鼠标事件 为了实现鼠标操作，Visual Basic提供了3个过程模板:
（一）压下鼠标键事件过程 Sub Form_MouseDown（Button As Integer，Shift As Integer，x As Single，y As Single）End Sub
（二）松开鼠标键事件过程 Sub Form_MouseUp（Button As Integer，Shift As Integer，x As Single，y As Single）End Sub
（三）移动鼠标光标事件过程 Sub Form_MouseMove（Button As Integer，Shift As Integer，x As Single，y As Single）End Sub
四、鼠标光标的形状
（一）MousePointer属性 鼠标光标的形状通过MousePointer属性来设置。该属性可以在属性窗口中设置，也可以在程序代码中设置。
MousePointer的属性是一个整数，可以取0～15。
（二）设置鼠标光标形状 MousePointer属性可以通过代码设置，也可以通过属性窗口设置。
1.在程序代码中设置MousePointer属性 在程序代码中设置MousePointer属性的一般格式为:对象.MousePointer=设置值
2.在属性窗口中设置MousePointer属性 单击属性窗口中的MousePointer属性条，然后单击设置框右端向下的箭头，将下拉显示MousePointer的15个属性值。
3.自定义鼠标光标 如果把MousePointer属性设置为99，则可通过MouseIcon属性定义自己的鼠标光标。有以下两种方法:
（1）如果在属性窗口中定义，可首先选择所需要的对象，再把MousePointer属性设置为“99-Custom”，然后设置MouseIcon属性，把一个图标文件赋给该属性（与设置Picture属性的方法相同）。
（2）如果用程序代码设置，则可先把MousePointer属性设置为99，然后再用LoadPicture函数把一个图标文件赋给MouseIcon属性。
4.鼠标光标形状的使用 在Windows中，鼠标光标的应用有一些约定俗成的规则。为了与Windows环境相适应，在应用程序中应遵守这些规则，主要有:
（1）表示用户当前可用的功能，如“I”形鼠标光标（属性值3）表示插入文本;十字形状（属性值2）表示画线或圆，或者表示选择可视对象以进行复制或存取。
（2）表示程序状态的用户可视线索，如沙漏鼠标（属性值11）表示程序忙，一段时间后将控制权交给用户。
（3）当坐标（X，Y）值为0时，改变鼠标光标形状。
五、拖放
（一）与拖放有关的属性、事件和方法
1.属性 有两个属性与拖放有关，即DragMode和DragIcon
2.事件 与拖放有关的事件是DragDrop和DragOver。
（二）自动拖放
（三）手动拖放
责任编辑：小草
