关于键盘的问题

当用键盘控制控件的位置时，总是有延时，给人感觉很钝，怎么办。而且怎么样能同时让控件响应多个按键的操作，比如按“上”和“左”让控件沿斜线方向运动，说一下大概思路或写个小程序都行，多谢了。 问题点数：20、回复次数：7Top

1 楼shortppsy（小河）回复于 2004-05-02 10:28:03 得分 5

vbkeyup   and   vbkeydownTop

2 楼huyuleizj（）回复于 2004-05-02 10:36:52 得分 0

不好意思，这两个是哪个控键的事件，我没有找到Top

3 楼shortppsy（小河）回复于 2004-05-02 10:42:38 得分 5

上   下Top

4 楼huyuleizj（）回复于 2004-05-02 12:24:40 得分 0

谢了Top

5 楼huyuleizj（）回复于 2004-05-05 13:51:18 得分 0

能不能写一段小程序说明一下Top

6 楼kissoflife（明月高楼休独倚，酒入愁肠，化作相思泪！）回复于 2004-05-05 15:43:27 得分 5

Private   Sub   Picture1_KeyDown(KeyCode   As   Integer,   Shift   As   Integer)  
          If   Shift   =   vbCtrlMask   Then  
                  If   KeyCode   =   vbKeyLeft   Then  
                          Picture1.Left   =   Picture1.Left   -   10  
                  End   If  
                   
                  If   KeyCode   =   vbKeyUp   Then  
                          Picture1.Top   =   Picture1.Top   -   10  
                  End   If  
                   
                  If   KeyCode   =   vbKeyRight   Then  
                          Picture1.Left   =   Picture1.Left   +   10  
                  End   If  
                   
                  If   KeyCode   =   vbKeyDown   Then  
                          Picture1.Top   =   Picture1.Top   +   10  
                  End   If  
          End   If  
  End   Sub  
  Top

7 楼kissoflife（明月高楼休独倚，酒入愁肠，化作相思泪！）回复于 2004-05-05 15:45:01 得分 5

按住“Ctrl＋箭头键”即可看到效果Top

相关问题

• 键盘
• 控件
• top
• picture1
• vbkeydown
• vbkeyup
• keycode
• left
• shift
• 让控件

• 帖主：huyuleizj
• shortppsy
• shortppsy
• kissoflife
• kissoflife

• Visual Basic类图书
• Visual Basic类源码下载