vb 计算机题目 简单的! 100
vb计算机题目简单的!在窗体中设计一label使其随着光标移动键进行上下左右移动!!求大神写的稍微清楚点。麻烦了。...
vb 计算机题目 简单的!在窗体中设计一label 使其随着光标移动键 进行上下左右移动!!求大神 写的稍微清楚点。麻烦了。
展开
1个回答
展开全部
标签没有TabStop属性,即没法获得焦点,所以要接收按键只能由它的容器来处理,比如窗体。设置窗体的 KeyPreview =True,添加代码:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode '键盘码
Case vbKeyUp
Label1.Top = Label1.Top - 150 '每次移动10像素,这里采用默认单位 twips
Case vbKeyDown
Label1.Top = Label1.Top + 150
Case vbKeyLeft
Label1.Left = Label1.Left - 150
Case vbKeyRight
Label1.Left = Label1.Left + 150
End Select
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode '键盘码
Case vbKeyUp
Label1.Top = Label1.Top - 150 '每次移动10像素,这里采用默认单位 twips
Case vbKeyDown
Label1.Top = Label1.Top + 150
Case vbKeyLeft
Label1.Left = Label1.Left - 150
Case vbKeyRight
Label1.Left = Label1.Left + 150
End Select
End Sub
追问
这个题的意思不是说 随着鼠标的光标进行移动么?你这用keycode 是什么意思?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询