VB代码求解：关于大小写字母转换的 Case "A"To"Z" aa=Chr$(KeyAscii+32) Case "a"To"z" aa=Chr$(KeyAscii-32）这段程序启动后,我操作的时候,为何大写字母输入后并没有显示转换成小写字母呢?小写字母是完成
来源：学生作业帮助网 编辑：六六作业网 时间：2024/11/29 13:09:19
VB代码求解：关于大小写字母转换的 Case "A"To"Z" aa=Chr$(KeyAscii+32) Case "a"To"z" aa=Chr$(KeyAscii-32）这段程序启动后,我操作的时候,为何大写字母输入后并没有显示转换成小写字母呢?小写字母是完成
VB代码求解：关于大小写字母转换的 Case "A"To"Z" aa=Chr$(KeyAscii+32) Case "a"To"z" aa=Chr$(KeyAscii-
32）这段程序启动后,我操作的时候,为何大写字母输入后并没有显示转换成小写字母呢?小写字母是完成转换的.
貌似仍旧是有问题的啊.
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim aa As String * 1
aa = Chr$(KeyAscii)
Select Case aa
Case "A" To "Z"
aa = Chr$(KryAscii + 32)
Case "a" To "z"
aa = Chr$(KeyAscii - 32)
Case " "
Case Else
aa = "*"
End Select
Text2.Text = Text2.Text & aa
End Sub
这个是我过程的代码.麻烦再帮我看看：我的启动结果是：输入小写字母可以转换为大写字母的,空格不转换,其他符号转换成*,都完成了,只有输入大写字母没法转换成小写字母.请问,这个问题应该是出现在哪里啊?
VB代码求解：关于大小写字母转换的 Case "A"To"Z" aa=Chr$(KeyAscii+32) Case "a"To"z" aa=Chr$(KeyAscii-32）这段程序启动后,我操作的时候,为何大写字母输入后并没有显示转换成小写字母呢?小写字母是完成
Case "A" To "Z"
aa = Chr$(KryAscii + 32)
KeyAscii打错了