单项选择题

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：
Private Sub Form Load()
Show
Text1. Text=""
Text2. Text=""
Text1. SetFocus
End Sub
Private Sub Text1_Change()
Text2. Text=Mid(Text1. Text, 8)
End Sub
程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是______。

A．Beijing
B．China
C．Beijing
D．BeijingC
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Comandl_Click() Dim arrayl(10, 10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 arrayl(i, j)=i+j Next j Next i Text1. Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
A．15
B．14
C．13
D．12
单项选择题
有如下程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 arr=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arE(i) 3=arr(i) 3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。
A．25
B．26
C．27
D．28
相关试题