加载中…VB字母大小写转换
(2023-07-12 09:14:26)| 分类： VB程式 |
Private Sub txt_gyscodename_KeyPress(KeyAscii As
Integer)
'''输入的字母全部转为小写
'If KeyAscii > 64 And KeyAscii < 91 Then KeyAscii =
KeyAscii + 32
'''输入的字母全部转为大写
If KeyAscii > 96 And KeyAscii < 123 Then KeyAscii =
KeyAscii - 32
End Sub
喜欢
0
赠金笔
前一篇：远程桌面找不到打印机
后一篇：mshflexgrid单元格复制