VB第七课.PPT

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 3.有关窗体的语句和方法 * (1) Load语句 装入窗体到内存(不显示) Load 窗体名称 (2) Unload语句 从内存删除窗体 Unload 窗体名称 或 Unload Me (3) Show方法 显示窗体（兼有加载和显示窗体功能） [窗体名称].Show [模式] 模式为0：可以同时对其它窗体进行操作 模式为1 ：关闭才能对其它窗体进行操作 (4) Hide方法 隐藏窗体，但并没有从内存中清除。 [窗体名称.] Hide 7.4 多重窗体 本章目录 4. 不同窗体间数据的访问 * (1) 直接访问另一个窗体上的控件数据 另一个窗体名.控件名.属性名 Text1 = Val(Form2.Text1) + Val(Form2.Text2) (2) 访问另一个窗体中的全局变量 另一个窗体名.全局变量名 (3) 在模块定义公共变量，实现相互访问 7.4 多重窗体 本章目录 * 模块Module1: Public X As String 在窗体的“通用”段声明： Public X1 As String 在窗体的“通用”段声明： Public X2 As String Form1 访问Form2： Text1.Text=Form2.Text1.Text 或Text1.Text=Form2.X2 Form2 访问Form1： Text1.Text=Form1.Text1.Text 或Text1.Text=Form1.X2 窗体间数据的访问 本章目录 本章目录 * 例7.17 多重窗体应用:输入学生五门课程的成绩，计算总分及平均分并在不同窗体内显示。 本章目录 7.4 多重窗体 7.5 鼠标和键盘 * 7.5.1 鼠标 由用户操作鼠标引发的，能被各种对象识别的事件。 除Click、DblClick事件外，还有： MouseDown 按下任意一个鼠标按钮时被触发 MouseUp 释放任意一个鼠标按钮时被触发 MouseMove 移动鼠标时被触发 特别注意：鼠标事件发生在什么对象上。 本章目录 * Private Sub 对象名_MouseDown(button As Integer, shift As Integer, x As Single, y As Single) Private Sub 对象名_MouseUp(button As Integer, shift As Integer, x As Single, y As Single) Private Sub 对象名_MouseMove(button As Integer, shift As Integer, x As Single, y As Single) 7.5 鼠标和键盘 本章目录 * Button参数的取值及其意义： 值 VB常数 含义 1 vbLeftButton 按下或释放了鼠标左键 2 vbRightButton 按下或释放了鼠标右键 3 vbMiddleButton 按下或释放了鼠标中键 X，Y表示当前鼠标的位置。 7.5 鼠标和键盘 本章目录 * 值 VB常数 含义 0 Shift、Ctrl和Alt键都没有被按下 1 vbShiftMask 只有Shift键被按下 2 vbCtrlMask 只有Ctrl键被按下 3 vbShiftMask+vbCtrlMask Shift和Ctrl键同时被按下 4 vbAltMask 只有Alt键被按下 5 vbShiftMask+vbAltMask Shift和Alt键同时被按下 6 vbCtrlMask+vbAltMask Ctrl和Alt键同时被按下 7 vbShiftMask+vbCtrlMask+vbAltMask Shift、Ctrl和Alt键同时被按下 Shift参数的取值及其意义: 7.5 鼠标和键盘 本章目录 * 例7.18 显示鼠标指针所指的位置。 7.5 鼠标和键盘 本章目录 * 重要的键盘事件： KeyDown、KeyUp及KeyPress事件。 7.5 鼠标和键盘 7.5.2 键盘 1. KeyPress事件 Sub Form_KeyPress(keyascii