把窗体的KeyPreview属性设置为True,然后编写如下事件过程 Private Sub Form_KeyPress(KeyAseii As Integer) Dim ch As String

admin2009-02-13  22

问题 把窗体的KeyPreview属性设置为True,然后编写如下事件过程
         Private Sub Form_KeyPress(KeyAseii As Integer)
           Dim ch As String
           ch=Chr(KeyAscii)
           KeyAscii=Ase(UCase(ch))
           Print Chr(KcyAseii+2)
         End Sub
         程序运行后,按键盘上的“A”键,则在窗体上显示的内容是

选项 A、A  
B、B
C、C
D、D

答案4

解析 本题需要注意的是UCase(ch)是将ch转化为与其相应的大写, Asc(   )是取字符的ASCII码,Chr( )是将ASCII码转化为相应的字符。
转载请注明原文地址:https://jikaoti.com/ti/kM80FFFM
0

最新回复(0)