编一个程序,输入一个字符,如果输入的字符是大写字母,则转换为小写字母;如果输入的字符是小写字母,则转换为大写字母,否则不转换。
在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能够正确实现该操作的事件过程是______。
A.Private Sub Text1_ KeyPress (KeyAscii As Integer) IfKeyAscii < 65 Or KeyAscii > 9t Then MsgBox “请输入大写字母” End If End sub
B.Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Integer) IfKeyCode < 65 Or KeyCode > 91 Then MsgBox “请输入大写字母” End If End sub
C.Private Sub Text1_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, YAs SinglE)IfAsc (Text1.Text) < 65 Or Asc (Text1. Text) > 91 Then MsgBox “请输入大写字母” End If End sub
D.Private Sub Text1_ Change() IfAsc(Text 1.Text) < 65 Or Asc(Text1. Text) > 91 Then MsgBox “请输入大写字母” End If End sub
曲式图中的英文字母表示可指示结构单位的级别,乐段的表示用()。
A、大写字母
B、小写字母
C、括号大写字母
D、括号小写字母
在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是()。
A.Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii<65 Or KeyAscii>90 Then
MsgBox "请输入大写字母"
KeyAscii=0
End If
End Sub
B.Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode <65 Or KeyCode>90 Then
MsgBox "请输入大写字母"
KeyCode=0
End If
End Sub
C.Private Sub Text1_MouseDown(Button As Integer,_
Shift As Integer, X As Single, Y As Single)
If Asc(Text1.Text) <65 Or Asc(Text1.Text) >90 Then
MsgBox "请输入大写字母"
End If
End Sub
D.Private Sub Text1_Change()
If Asc(Text1.Text) >64 And Asc(Text1.Text) <91 Then
MsgBox "请输入大写字母"
End If
End Sub