问题 单项选择题

在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:Dim SaveAll As StringPrivate Sub Form_ Load () Show Text1.Text=" " Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form_ KeyPress (KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为 ______。

A.vbVB

B.不显示任何信息

C.VB

D.出错

答案

参考答案:A

解析:[知识点] KeyPress事件与KeyPreview属性[评析] KeyPreview属性,返回或设置一个值,以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件为:KeyDown、KeyUp和KeyPress。当KeyPreview的值为True时窗体先接收键盘事件,然后是活动控件接收事件;为False时(缺省值)活动控件接收键盘事件,而窗体不接收。 KeyPress将每个字符的大、小写形式作为不同的键代码解释,即作为两种不同的字符。 本题中,由于Form的KeyPreview属性为True,窗体先接收键盘事件。当键入V时,窗体的KeyPress事件产生,此时KeyAscii=119,Chr(KeyAscii)=V,SaveAll=V,当键入B时,KeyAscii=98,Chr(KcyAscii)=B,SaveAll=VB,Text1中的内容为vbVB。

选择题
问答题 简答题