窗体上放有两个Label控件和一个Timer控件,定义n为整数类型变量。
私人Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
选择 Case.KeyCode
当键码为vbKeyUp时:
标签1的顶部减去50像素。
当键码为vbKeyDown时:
标签1的左边减去50像素。
当键码为vbKeyRight时:
标签1的左边减去100像素。
0
窗体上放有两个Label控件和一个Timer控件,定义n为整数类型变量。
私人Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
选择 Case.KeyCode
当键码为vbKeyUp时:
标签1的顶部减去50像素。
当键码为vbKeyDown时:
标签1的左边减去50像素。
当键码为vbKeyRight时:
标签1的左边减去100像素。