国产成人毛片视频|星空传媒久草视频|欧美激情草久视频|久久久久女女|久操超碰在线播放|亚洲强奸一区二区|五月天丁香社区在线|色婷婷成人丁香网|午夜欧美6666|纯肉无码91视频

vb使用教程 如何用鍵盤(pán)控制vb中的按鍵?

如何用鍵盤(pán)控制vb中的按鍵?你的圖片在哪里.在一個(gè)控件里嗎?如果圖片在一個(gè)控件里,直接移動(dòng)控件就行啦.移動(dòng)控件會(huì)吧,如果我要移動(dòng)一個(gè)Image1到窗體的左上角.那就這樣:Image1.Move 0,0

如何用鍵盤(pán)控制vb中的按鍵?

你的圖片在哪里.在一個(gè)控件里嗎?如果圖片在一個(gè)控件里,直接移動(dòng)控件就行啦.移動(dòng)控件會(huì)吧,如果我要移動(dòng)一個(gè)Image1到窗體的左上角.那就這樣:Image1.Move 0,00,0是Image1的Left和Top.至于用鍵盤(pán)的方向鍵來(lái)控制,可以這樣:Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode = 37 Then Image1.Move Image1.Left - 10, Image1.Top "左由于只向左移,TOP不變,所以也可以這樣(Image1.Left=Image1.Left - 10)直接減小LEFT就行了.下面也一樣.If KeyCode = 38 Then Image1.Move Image1.Left, Image1.Top - 10 "上If KeyCode = 39 Then Image1.Move Image1.Left 10, Image1.Top "右If KeyCode = 40 Then Image1.Move Image1.Left, Image1.Top 10 "下End SubPrivate Sub Form_Load()Form1.KeyPreview = True "激活Form1上的控件的鍵盤(pán)事件之前,優(yōu)先激活Form1鍵盤(pán)事件。End Sub是ASCII吧.我也不知它叫什么碼.我就叫它KEYCODE.當(dāng)你按下鍵盤(pán)任意一個(gè)鍵,KEYCODE就等于一個(gè)整數(shù).反正按下鍵盤(pán)方向鍵的左鍵,KEYCODE就等于37上就是38.....你可以這樣得到每個(gè)鍵的KEYCODE:Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)Text1 = KeyCodeEnd Sub