问题
填空题
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为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)，并在标签中显示出来。
