![[填空题] 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程： Private Sub Command1_Click1(](http://www.mshxw.com/aiimages/31/251749.png "[填空题] 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程： Private Sub Command1_Click1(")
[填空题] 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：
Private Sub Command1_Click1()
S$=InputBox("请输入一个字符串")
Text1.Text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text,7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，则在标签中显示的内容是______。
参考答案：
BASIC问题解析:
当文本框中的文本内容改变时(包括通过语句修改其Text属性值或在文本框中直接输入)将触发其Change事件。 本题程序运行时，单击命令按钮并输入内容后，将在文本框中显示输入内容，同时将触发文本框的Change事件，截取出从文本框的第7个字符开始的后续所有字符(即Basic)，并在标签中显示出来。
