作业帮 > 综合 > 作业

VB代码求解:关于大小写字母转换的 Case "A"To"Z" aa=Chr$(KeyAscii+32) Case "a

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/01 07:02:43
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
这个是我过程的代码.麻烦再帮我看看:我的启动结果是:输入小写字母可以转换为大写字母的,空格不转换,其他符号转换成*,都完成了,只有输入大写字母没法转换成小写字母.请问,这个问题应该是出现在哪里啊?
Case "A" To "Z"
aa = Chr$(KryAscii + 32)
KeyAscii打错了