总结以下几点,大家可能还有更好的方法,希望跟贴
转大写的几种 方法
1) If KeyAscii >= 97 And KeyAscii <= 122 Then
KeyAscii = KeyAscii - 32
End If
2)更新后
3)掩码
4)Ucase函数
5)窗体键预览,使用form_keypress
如果要跳过某些键,则
if me.activecontrol.name<>"指定控件" then
If KeyAscii >= 97 And KeyAscii <= 122 Then
KeyAscii = KeyAscii - 32
End If