一、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。
　　（二）自动拖放
　　（三）手动拖放