在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程: Private Sub Command1_Click1() S$=InputBox("请输入一个字符串") Text1.Text=S$ End Sub Private Sub Text1_Change() Label1.Caption=UCase(Mid(Text1.T
主观题
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程: Private Sub Command1_Click1() S$=InputBox("请输入一个字符串") Text1.Text=S$ End Sub Private Sub Text1_Change() Label1.Caption=UCase(Mid(Text1.T