VB 如何编程使在窗口再播放视频的时候同时能够对键盘按键进行 技术
答案:1 悬赏:20
解决时间 2021-02-21 04:24
- 提问者网友：半生酒醒
- 2021-02-20 19:48
VB 如何编程使在窗口再播放视频的时候同时能够对键盘按键进行 技术
最佳答案
- 二级知识专家网友：逃夭
- 2021-02-20 21:26
Dim w As Long
Private Sub Command1_Click()
Form1.KeyPreview = True ‘关键的地方，设为真才能在form_keypress中检测
Form1.WindowsMediaPlayer1.URL = ("D:\aa.mov")
WindowsMediaPlayer1.Controls.play
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = &H77 Then '是否按下W键
w = w + 1
End If
Text1.Text = w
End Sub
Private Sub Command1_Click()
Form1.KeyPreview = True ‘关键的地方，设为真才能在form_keypress中检测
Form1.WindowsMediaPlayer1.URL = ("D:\aa.mov")
WindowsMediaPlayer1.Controls.play
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = &H77 Then '是否按下W键
w = w + 1
End If
Text1.Text = w
End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯