,我发现我的问题,每当我把按钮在我的设计的按键下不工作是有办法,使其在设计按钮甚至工作? 示例代码:如何通过按键使用按键?
If e.KeyValue = Keys.P Then
MsgBox("adadddada")
End If
Private Sub Game_KeyDown(ByVal sender As System.Object, _
ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.KeyValue = Keys.Down Then
If (RArrowDown.Top <= ArrowDown.Top + ArrowDown.Height) And RArrowDown.Visible = True Then offset_1 = RArrowDown.Top - ArrowDown.Top Select Case offset_1 Case -10 To 15 'perfect TimerMain.Enabled = False Hit += 1 Score += 20 RArrowDown.Visible = False Perfect.Visible = True TimerPerfect.Enabled = True GPerfect += 1 Combo_Counter += 1 RandomTime_1.Enabled = True Case 16 To 50 'good TimerMain.Enabled = False Hit += 1 Score += 10 RArrowDown.Visible = False Good.Visible = True TimerGood.Enabled = True GGood += 1 Combo_Counter += 1 RandomTime_1.Enabled = True Case -30 To -11 'good TimerMain.Enabled = False Hit += 1 Score += 10 RArrowDown.Visible = False Good.Visible = True TimerGood.Enabled = True GGood += 1 Combo_Counter += 1 RandomTime_1.Enabled = True End Select End If End If end sub
你可以张贴一些代码,所以我们可以告诉什么是捕获按下按钮(文本框,表格等)? – LeftyCoder
请展开该代码段以显示代码所在的位置 – Plutonix
@LeftyCoder那样吗? –