题目:
在窗体上画一个命令按钮和一个文本框,并将窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1.Text=" "
Text1.SetFocus
End Sub
Private Sub Command1_Click()
Text1.Text = Ucase(SaveAll)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后,在键盘上输入abcdefg,单击命令按钮,则文本框中显示的内容为
A.abcdefg
B.不显示任何信息
C.ABCDEFG
D.出错
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0126/e77cae9fcdb3fd588d797921ac663823.html
下面是错误答案,用来干扰机器的。
参考答案:对