题目内容
（请给出正确答案）
在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”，如图所示。
现有如下事件过程
Private Sub Text1_Change（）
Text 2．Text=Mid(Text1，1，5)
End Sub
运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（）。
A.DataA
B.DataB
C.aData
D.aBase
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”，如图所示。现有如”相关的问题
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 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．BeijingChina
B．China
C．Beijing
D．BeijingC
在窗体上画两个文本框，其名称分别为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．BeijingChina
B．China
C．Beijing
D．BeijingC
在窗体上画两个文本框，其名称分别为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．BeijingChina
B．Chima
C．Beijing
D．BeijingC
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form. Load() Show Text1. Text="" TextText="" Text1. SetFocus End Sub Private Sub Text1_Change() TextText=Mid(Text1. Text, 8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是______。
A．Beijing
B．China
C．Beijing
D．BeijingC
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)，然后编写下列事件过程：
Private Sub Command1 Click（）
x=0
DO While x＜50
x=(x+2)*(x+3)
n=n+1
Loop
Text1．Text=Str(n)
Text2．Text=Str(x)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。
A.1和0
B.2和72
C.3和50
D.4和168
在窗体上画两个文本框(名称分别为Text1和Text2)和—个命令按钮(名称为Cotranand1)，然后编写如下事件过程：Private Sub Command1_Click() x=0 Do While x＜50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x)End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为______。
A．1和0
B．2和72
C．3和50
D．4和168
在窗体上画两个文本框，其名称分别为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．BeijingChina
B．Chima
C．Beijing
D．BeijingC
（6）在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1 和 Command1，然
后编写如下两个事件过程：
Private Sub Command1_Click()
S$=InputBox("请输入一个字符串")
Text1.Text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text, 7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，
则在标签中显示的内容是 【6】 。
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)， 然后编写如下事件过程： Private Sub Command1 Click() Text1．Text=InputBox("请输入数据1") TextText=InputBox("请输入数据2) End Sub 程序运行后，如果单击命令按钮，将先后显示两个输入对话框，在两个输入对话框中分别输入123和abc，则两个文本框中显示的内容分别为【 】和【 】。
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)，然后编写下列事件过程： Private Sub Command1 Click（） x=0 DO While x＜50 x=(x+2)*(x4．3) n=n+1 Loop Text1．Text=Str(n) Text2．Text=Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。
A.1和0
B.2和72
C.3和50
D.4和168
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
