在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labell和 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() strText=InputBox('请输入') Text1.Text=strText End Sub Private Sub Text1_Change() Labell.Caption=Right(Trim(Text1.Text),3) End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入Visual,则在标签中显示的内容是