单项选择题

把窗体的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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体(Name属性为Forml)上面添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text= Text2.Text= End Sub 程序运行后，在第1个文本框(Text1)和第2个文本框(Text2)中分别输入123和321，然后单击命令按钮，则输出结果为( )。
A．444
B．321123
C．123321
D．132231
单项选择题
假定有以下函数过程： Function Fun(S As String)As String Dimsl As String Fori=1 To Len(S) s1=UCase(Mid(S，i，1))+s1 Nexti Fun=s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() DimStrl As String，Str2 As String Str1=InputBox(“请输入一个字符串”) Str2=Fun(Str1) PrintStr2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串， abcdefg ，则单击“确定”按钮后在窗体上的输出结果为( )。
A．abcdefg
B．ABCDEFG
C．gfedcba
D．GFEDCBA
相关试题