VB工程--百例56--用键盘控制小方块移动

iteye_3619

于 2012-02-03 14:32:00 发布

阅读量424

点赞数

本文介绍如何利用VBScript编程语言通过键盘事件实现对图形控件位置的调整，具体包括左移、右移、上移、下移等操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Option Explicit
Dim i As Integer
Private Sub form_keydown(keycode As Integer, shift As Integer)
If keycode = 37 Then 如果按下键值为37的键
Shape1.Left = Shape1.Left - 100 图形控件想左移动
ElseIf keycode = 38 Then
Shape1.Top = Shape1.Top - 100 同理
ElseIf keycode = 39 Then
Shape1.Left = Shape1.Left + 100
ElseIf keycode = 40 Then
Shape1.Top = Shape1.Top + 100
End If

End Sub

评论

被折叠的条评论为什么被折叠?

到【灌水乐园】发言

查看更多评论

添加红包

成就一亿技术人!

hope_wisdom

发出的红包

实付元

使用余额支付

点击重新获取

扫码支付

钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。