在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview设置为True（在激活对象上的控件键盘事件之前，优先激活键盘事件，即Form优先）然后编写如下代码：Dim SaveAll As StringPrivate Sub Command1（）Click（）Text1.Text=Ucase（SaveAll）End SubPrivate Sub Form（）KeyPress（KeyAscii As Integer）SaveAll= SaveAll+Chr（KeyAscii）End Sub程序运行后，

精华吧→答案→知到智慧树→未分类

在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview设置为True（在激活对象上的控件键盘事件之前，优先激活键盘事件，即Form优先）然后编写如下代码：Dim SaveAll As StringPrivate Sub Command1（）Click（）Text1.Text=Ucase（SaveAll）End SubPrivate Sub Form（）KeyPress（KeyAscii As Integer）SaveAll= SaveAll+Chr（KeyAscii）End Sub程序运行后，在键盘上输入“abcdefg”，单击命令按钮，则文本框显示为（）。

A.abcdefg

B.不显示任何信息

C.ABCDEFG

D.出错

正确答案：ABCDEFG

Tag：窗体键盘按钮时间：2024-01-14 11:47:42