文件名称:对输入的数据进行验证、限制和修改-Visual Basic 6.0简明教程
文件大小:3.12MB
文件格式:PPT
更新时间:2024-05-15 03:17:12
VB
对输入的数据进行验证、限制和修改 1. 修改输入数据。 接收大写字符 将KeyPreview设置为True时 Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii >= Asc("a") And KeyAscii <= Asc("z") Then KeyAscii = KeyAscii + Asc("A") - Asc("a") End If End Sub 如果把它改为某个控件的事件过程,效果一样吗? 2. 限制数据输入 文本框只能接收“0”~“9”的数字字符。 Sub txtExample_KeyPress(KeyAscii As Integer) If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End If End Sub