在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗V1中把窗体的KeyPreview属性设置为True,然后编写如下程序: Dim S1 As String,S2 As String Priv

admin2010-11-02  17

问题 在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗V1中把窗体的KeyPreview属性设置为True,然后编写如下程序:
    Dim S1 As String,S2 As String
    Private Sub Form_Load()
    Text1.Text=””
    Text2.Text=””
    TeXt1.Enabled=False
    Text2.Enabled=False
    End Sub
    Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
    S2=S2&Chr(KeyCode)
    End Sub
    Privtee Sub Form_KeyPress(KeyAscii As Integer)
    S1=S1&Chr(KeyAscii)
    End Sub
    Pfivtee Sub Command 1_Click()
    Text1.Text=S1
    Text2.Text=S2
    S1=””
    S2=””
    End Sub
    程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为(    )。

选项 A、abc和ABC
B、空白
C、ABC和abc
D、出错

答案A

解析 KeyPreview属性被设置为True,则一个窗体先于该窗体上的控件接收到此事件。Form Load事件是窗体载入事件,常用于窗体的初始化,Text1和Text2的属性Enabled设置成false,禁止向文本框里输入。本题中Form_KeyDown,Form_KeyPress事件的作用是将用户按下的按键值分别传给字符串s1、s2,然后通过命令按钮输出。
转载请注明原文地址:https://kaotiyun.com/show/OMmp777K
0

最新回复(0)