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

在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 + 32
               End If
        End Sub

'小写字母转大写字母

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