在TextBox中实现大小写自动转换

时间:2021-05-02

在VB中,字母以ASCII形式存储,而大小写字母的ASCII值相差32,这样的话,如果一个大写字母的ASCII值加上32就会变为对应的小写字母,而小写字母的ASCII值减去32就会变为大写字母。在VB中实现大小写转换的源代码如下:

'大写字母转小写字母

Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii >= 65 And KeyAscii <= 90 Then KeyAscii = KeyAscii + 32End If End Sub

'小写字母转大写字母

Private Sub Text2_KeyPress(KeyAscii As Integer) If KeyAscii >= 97 And KeyAscii <= 122 Then KeyAscii = KeyAscii - 32 End If End Sub

本文源自:翔宇亭——IT乐园(http://),转载请保留此信息!

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章