更多"把窗体的KeyPreview属性设置为True,然后编写如下两个事件过"的相关试题:
[单项选择]将窗体的KeyPreview属性设置为True,然后编写如下过程: Private Sub Form KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出的结果为
A. A A
B. A B
C. A C
D. A D
[单项选择]把窗体的KeyPreview属性设置为True,然后编写如下过程:
Private Sub Form_KeyDown(KeyCode As Integer,ShiftAs Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyUp(KeyCode As Integer,Shift AsInteger)
Print Chr(KeyCode+2)
End Sub
程序运行后,如果按“A”键,则输出结果为______。
A. A
B. A
C. A
D. A
[单项选择]把窗体的KeyPreview属性设置为True,然后编写如下事件过程:
Private Sub Form_KeyPress(KeyAsciiASInteger)
Dim ch As String
ch=Chr(KeyAscii)
KeyAscii=Asc(UCase(ch))
PrintChr(KeyAscii+2)
End Sub
程序运行后,按键盘上的A键,则在窗体上显示的内容是( )。
A. A
B. B
C. C
D. D
[填空题]把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
程序运行后,如果直接按键盘上的“A”键(即不按住Shift键),则在窗体上输出的字符分别是______和______。
[填空题]把窗体的KeyPreView属性设置为True,并编写如下两个事件过程:
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
Print KeyCode
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序运行后,如果按下B键,则在窗体上输出的数值是 [12] 和 [13] 。
[填空题]把窗体的KeyPreView属性设置为True,并编写如下两个事件过程:
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
Print KeyCode
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序运行后,如果按下B键,则在窗体上输出的数值是【 】和【 】。
[填空题]把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:
Private Sub Form_KeyDown (KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAseii As Integer)
Print KeyAscii
End Sub
程序运行后,如果将CapsLock 键锁定在大写的状态,这时按下A键时,则:在窗体上输出的输出结果为 【10】 和 【11】 。