关于VB的一道题目,希望会的人做一下谢谢了!最好写出程序代码!!!

2025-01-05 13:39:28
推荐回答(1个)
回答1:

假设在窗体上添加的是Picture1和Text1控件:
代码如下:
Private Sub Form_Click()
Select Case Asc(Text1.Text)
Case 48 To 57
Picture1.Cls
Picture1.Print "你输入的是数字!"
Case 65 To 90
Picture1.Cls
Picture1.Print "你输入的是大写英文字母!"
Case 97 To 122
Picture1.Cls
Picture1.Print "你输入的是小写英文字母!"
Case Else
Picture1.Cls
Picture1.Print "你输入的是其它符号!"
End Select
End Sub