Question

VB设计对输入的字符进行转换的程序

设计对输入的字符进行转换的程序，转换规则如下：大写字母转换成小写字母；小写字母转换成大写字符；空格不转换；其余转换成“*”。要求：每输入一个字符，马上就进行判断和转换
1楼经运行未达到目标，大小写并没有转换掉
另外需要在TEXT1中输入，TEXT2中输出转换后的字符
2楼是在TEXT1中直接转换掉，并不是在TEXT2中输出字符
晕看来得多加点分啊

Answer 1

严格的说来回车和Backspace键也不应该转换,转换了2个文本就跟不上进度了,只不过只有按照楼主的要求去做
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 65 To 90
Text2.Text = Text2.Text & LCase(Chr(KeyAscii))
Case 97 To 122
Text2.Text = Text2.Text & UCase(Chr(KeyAscii))
Case 32
Text2.Text = Text2.Text & Chr(KeyAscii)
Case Else
Text2.Text = Text2.Text & Chr(42)
End Select
End Sub

Answer 2

Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case Is < 32
KeyAscii = 42
Case Is = 32
Case Is < 65
KeyAscii = 42
Case Is < 91
KeyAscii = KeyAscii + 32
Case Is < 97
KeyAscii = 42
Case Is < 123
KeyAscii = KeyAscii - 32
Case Else
KeyAscii = 42
End Select
End Sub