VB程序设计第2版第9章.pptVIP

第9章 常用内部控件 9.1 控件的公共属性 1. Name属性 Name属性用于标识窗体、控件、或数据访问对象的名称。在属性窗口的属性名为“(名称)” 2. Caption属性 Caption属性用于设置或返回对象的标题或在对象上显示的文字。 3. Enabled属性 决定控件是否能够对用户产生的事件作出响应。 4. Visible属性 用来确定一个窗体或控件是否可见。 注意: 如果在属性窗口中将控件的Visible属性设置为False，则控件在设计窗体上仍是可见的，仅在运行时才不可见。 5. Left、Top、Height、Width属性 7. FontName、FontSize、FontBold、FontItalic、FontStrikethru、FontUnderline属性 分别对应于： 字体、字号、粗体、斜体、删除线、下划线 8. Font对象属性 在设计时在属性窗口需要进一步打开对话框进行设置。 在代码中的使用格式: 控件名.Font.属性名 属性名: Name、Size、Bold、Italic、 Underline、Strikethrough 例: Form1.Font.Size = 14 Command1.Font.Italic = True 【例9-1】自学 P170 例9-1 9．MousePointer、MouseIcon属性 MousePointer属性：返回或设置一个值，指示在运行时当鼠标移动到对象上时要显示的鼠标指针的类型。 0～15：使用系统定义的鼠标指针类型 99 :使用自定义的鼠标指针类型，鼠标指针为通过MouseIcon属性所指定的图标。 MouseIcon属性：设置在运行时当鼠标移动到对象上时要显示的图标，在MousePointer属性设置为99时使用。 9.2 鼠标和键盘事件 Visual Basic应用程序可以响应多种鼠标与键盘事件。例如，鼠标事件有单击、双击、按下、抬起、移动、拖动等，键盘事件有按键的按下、抬起等。利用这些事件可以编写响应各种事件的应用程序。 9.2.1 鼠标事件 1. MouseDown、MouseUp事件 MouseDown事件：在按下鼠标按钮时发生； MouseUp事件：在释放鼠标按钮时发生。 例如，某按钮的MouseDown事件过程如下： Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) …… End Sub Button ：根据所按下或抬起的是鼠标的左按钮、右按钮还是中间按钮返回一个整数。见P171 Shift： 根据在按下或释放鼠标按钮时是否同时按下Shift、Ctrl或Alt键返回一个整数。见P172 X、Y：返回鼠标指针在对象上的当前位置。默认单位为缇。 2．MouseMove事件 当鼠标指针在对象上移动时发生该事件。 例如，窗体的MouseMove事件过程如下： Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) …… End Sub （Button 、Shift、X和Y参数的作用同前） 【例9-2】在窗体上移动鼠标时，将当前的鼠标位置显示在文本框中。如下图： 窗体的MouseMove事件过程如下： Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Text1.Text = X : Text2.Text = Y End Sub 9.2.2 键盘事件 1．KeyPress事件 当用户按下并释放键盘上一个会产生ASCII码的按键时产生KeyPress事件。如按下数字键、字母键、Tab、Enter、BackSpace、Esc等都会产生KeyPress事件。 例如，某文本框Text1的KeyPress事件过程如下： Private Sub Text1_KeyPress(KeyAscii As Integer) …… End Sub 注意： 对于同一个字母的按键，其大、小写形式返回不同的KeyAscii值。 只有当对象具有焦点时才可以接收Ke