问题
填空题
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为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
程序运行后，单击命令按钮，显示一个输入对话框，如果在其中输入字符串"Visual Basic"，则在标签中显示的内容是______。
答案
参考答案：BASIC
解析： 单击命令按钮时，执行事件过程Command1_Click，过程中首先调用InputBox函数输入内容，根据题干可知，变量s得到的值为"Visual Basic"。接下来，将s的值赋给Text1.Text，由于文本框Text1的Text属性值发生改变，引发了Text1的Change事件，执行Text1_Change事件过程，在Text1_Change事件过程中将Text1.Text的值从第七个位置开始取出字符串"Basic"再转换为大写后显示在标签控件Label1中，所以标签中显示的内容是BASIC。