VB超级简单的编程问题

来源:百度知道 编辑:UC知道 时间:2024/06/06 14:56:13
很简单就是:
编写一个程序,从键盘输入一个大写字母,要求改用小写字母输出
要用VB6.0来编,写出程序,我要直接复制过去的!

Private Sub Text1_Change()
Text1.Text = LCase(Text1.Text)
Text1.SelStart = Len(Text1.Text)
End Sub

在窗体上加个text1控件,然后将下面的代码直接复制进去就好了.
Private Sub Form_Load()
Text1.Text = ""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(LCase(Chr(KeyAscii)))
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(LCase(Chr(KeyAscii)))
End Sub

Private Sub Text1_Change()
Text1 = UCase(Text1)
Text1.SelStart = Len(Text1)
End Sub

Private Sub Command1_Click()
Text1.Text = LCase(Text1.Text)
End Sub

Private Sub Command1_Click()
Text1.Text = LCase(Text1.Text)
End Sub