7.FontName、.FontSize、FontBold、FontItalic、 FontStrikethru、FontUnderline属性 第九章 分别对应于： 字体、字号、粗体、 斜体、删除线、下划线 8.Font对象属性 > 在设计时在属性窗口需要进一步打开对话框进行 设置。 Pmoo常用控件 >在代码中的使用格式：控件名.Font.属性名 属性名：Name、Size、Bold、Italic、 Underline,Strikethrough 例：Forml.Font.Size=14 Command1.Font.Italic True 【例9-1】见P173例9-1 6
第 九 章Visual Basic 常 用 控 件 6 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】见 P173 例9-1
9.MousePointer、Mouselcon,属性 第九章 >MousePointer)属性：返回或设置一个值，指 示在运行时当鼠标移动到对象上时要显示的 鼠标指针的类型。 0~15:使用系统定义的鼠标指针类型 99:使用自定义的鼠标指针类型，鼠标指针为 常Ba 通过Mouselcon属性所指定的图标。 >MouseIcon属性：设置在运行时当鼠标移动到 用控件 对象上时要显示的图标，在MousePointer属 性设置为99时使用。 193
第 九 章Visual Basic 常 用 控 件 7 9．MousePointer、MouseIcon属性 ➢ MousePointer属性：返回或设置一个值，指 示在运行时当鼠标移动到对象上时要显示的 鼠标指针的类型。 0～15：使用系统定义的鼠标指针类型 99 :使用自定义的鼠标指针类型，鼠标指针为 通过MouseIcon属性所指定的图标。 ➢ MouseIcon属性：设置在运行时当鼠标移动到 对象上时要显示的图标，在MousePointer属 性设置为99时使用
9.2 鼠标和键盘事件 第九章 Visual Basic应用程序可以响应多种鼠标与键 盘事件。例如，鼠标事件有单击、双击、按下、 抬起、移动、拖动等，键盘事件有按键的按下、 抬起等。利用这些事件可以编写响应各种事件的 应用程序。 P品常用控件 8
第 九 章Visual Basic 常 用 控 件 8 9.2 鼠标和键盘事件 Visual Basic应用程序可以响应多种鼠标与键 盘事件。例如，鼠标事件有单击、双击、按下、 抬起、移动、拖动等，键盘事件有按键的按下、 抬起等。利用这些事件可以编写响应各种事件的 应用程序
9.2.1鼠标事件 l.MouseDown、MouseUp事件 第九章 MouseDown-事件：在按下鼠标按钮时发生； MouseUp事件：在释放鼠标按钮时发生。 例如，某按钮的MouseDown事件过程如下： Visua Private Sub Command1_MouseDown(Button As Integer,Shift As Integer,XAs Single,Y As Single) Basi End Sub 常 Button 根据所按下或抬起的是鼠标的左按钮、 右按钮还是中间按钮返回一个整数。见P174 控件 > Shift::根据在按下或释放鼠标按钮时是否同时 按下Shift、Ctrl或AIt键返回一个整数。见P174 > X、Y:返回鼠标指针在对象上的当前位置。默 认单位为缇。 9
第 九 章Visual Basic 常 用 控 件 9 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 ：根据所按下或抬起的是鼠标的左按钮、 右按钮还是中间按钮返回一个整数。见P174 ➢ Shift： 根据在按下或释放鼠标按钮时是否同时 按下Shift、Ctrl或Alt键返回一个整数。见P174 ➢ X、Y：返回鼠标指针在对象上的当前位置。默 认单位为缇
2. MouseMove事件 当鼠标指针在对象上移动时发生该事件。 第九章 例如，窗体的MouseMove事件过程如下： Private Sub Form MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) End Sub Bas (Button、Shift、.X和Y参数的作用同前) 。常用控件 注意：当鼠标指针在对象上移动时，并不是经过每 个像素都会产生MouseMove?事件，而是按每秒一 定的次数生成MouseMove事件。由于应用程序能 在短时间内识别大量的MouseMove事件，因此， 不应在MouseMove事件过程中编写需要大量计算 时间的程序
第 九 章Visual Basic 常 用 控 件 10 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参数的作用同前） 注意：当鼠标指针在对象上移动时，并不是经过每 个像素都会产生MouseMove事件，而是按每秒一 定的次数生成MouseMove事件。由于应用程序能 在短时间内识别大量的MouseMove事件，因此， 不应在MouseMove事件过程中编写需要大量计算 时间的程序