更多"在窗体上画一个文本框，然后编写如下事件过程：
Private Sub"的相关试题:
[单项选择]在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form_Click（ ） Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text1．Text：Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序运行后，单击窗体，在文本框中显示的内容是
A. 1
B. 3
C. 6
D. 10
[单项选择]在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click( ) x=InputBox(“请输入一个整数”) Print x+Text1.Text End Sub 程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(Key Ascii) KeyAscii=Asc(UCase(char)) Text1．Text=Sting(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。
A. a
B. A
C. aaaaaaa
D. AAAAAAA
[单项选择]在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为
A. a
B. A
C. aaaa
D. AAAA
[单项选择]在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(keyaseii as integer) …… End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文稿本框
D. 按下键盘上的某个键
[单项选择]在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程：
Private Sub TxtA_KeyPress(KeyAscii As Integer)
End Sub
假定焦点已经位于文本框中,则能够触发KeyPress事件的操作是【 】
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
[单项选择]在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(key Ascii As Integer) End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是( )。
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
[单项选择]在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim sb As String Str=Chr(KcyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“b”，则在文本框Text1中显示的内容是
A. bbb
B. BBB
C. BB
D. bb
[单项选择]
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是（）。
A. 单击鼠标
B. 双击文本框
C. 鼠标滑过文本框
D. 按下键盘上的某个键
[单项选择]在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load（ ） Text1.Text="" Text1.SetFocus For i=1 To 10 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是 ______。
A. 在文本框Text1中输出55
B. 在文本框Text1中输出0
C. 出错
D. 在文本框Text1中输出不定值
