分类：电脑/网络-软件
问题：VB编程的第6个问题7.在窗体中添加一个名称为Text1的文本框 
7. 在窗体中添加一个名称为Text1的文本框，两个名称分别为ommand1  和Command2的命令按钮。要求程序运行后，用户向文本框中输入字母，  单击Command1按钮则文本框中字母全部转换为大写；然后单击Command2  按钮则文本框中字母全部转换为小写。请将下列程序补充完整。    Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)      ___________ = Text1.Text    End Sub   Private7. 在窗体中添加一个名称为Text1的文本框，两个名称分别为ommand1  和Command2的命令按钮。要求程序运行后，用户向文本框中输入字母，  单击Command1按钮则文本框中字母全部转换为大写；然后单击Command2  按钮则文本框中字母全部转换为小写。请将下列程序补充完整。    Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)      ___________ = Text1.Text    End Sub   Private Sub Command1_Click()      Text1.Text = _______________    End Sub    Private Sub Command2_ click( )      Text1.Text = Lcase(Text1.Tag)大家快点帮帮我.
回答：Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Text1.Tag = Text1.Text
End Sub 
Private Sub Command1_Click()
Text1.Text = Ucase(Text1.Tag)
End Sub
Private Sub Command2_ click( )
Text1.Text = Lcase(Text1.Tag)