求助长城L9VB4显示器面板按键调不出菜单。
想用VB做个无聊的东东，就是弄三个框框出来，再弄三个按键，按第一个按键，第一个框框出来个已经写好的 Private Men(5)，Places(5)，Actions(5)As StringPrivate Sub btActions_Click()MsgBox Actions(Rnd(5))End SubPrivate Sub btMen_Click()MsgBox Men(Rnd(5))End SubPrivate Sub btPlaces_Click()MsgBox Places(Rnd(5))End SubPrivate Sub Form_Load()Men(0)=\"甲'And so onPlaces(0)=\"甲地'And so onActions(0)=\"吃饭.'And so onEnd Sub
用VB弄个自动按键 可以关闭的 Dim F1 As Boolean，F2 As Boolean，F5 As BooleanDim n1 As Long，n2 As LongPrivate Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Form1.ClsPrint KeyCodePrint ShiftIf KeyCode=112 ThenF1=1Timer1.Enabled=TrueEnd IfIf KeyCode=113 ThenF2=2Timer1.Enabled=TruexsEnd IfIf KeyCode=116 ThenF5=TrueF2=FalseF1=FalseEnd IfEnd SubPrivate Sub Timer1_Timer()If F5=True ThenTimer1.Enabled=FalseF5=FalseExit SubEnd IfIf F1=True ThenSendKeys\"{PGUP}\"，TrueEnd IfIf F2=True ThenSendKeys\"~\"，TrueEnd IfEnd Sub
vb 如何 屏蔽 键盘指定按键 将窗体的KeyPreview属性设置为True在窗体的KeyPress事件（即Form_KeyPress事件过程）中加入语句：If KeyAscii=48 Then KeyAscii=0
在VB中怎么得到按键的点击次数 如果是键盘击键次数的话可以这样编：Dim i As IntegerPrivate Sub Form_KeyPress(KeyAscii As Integer)i=i+1Form1.Caption=iEnd SubPrivate Sub Form_Load()i=0End Sub捕捉窗体的KeyPress事件
