运行下列程序:
Private Sub form_Click( )
s = InputBox("请输入一个字符A:")
Select Case Asc(s)
Case Is > 65
n = String(3, UCase(s))
Case Is = 65
n = String(3, LCase(s))
Case Else
n = s
End Select
Print n
End Sub
从键盘输入A,输出的结果是( )。
A.aaa
B.AAA
C.65
D.a
运行下列程序:
Private Sub form_Click( )
s = InputBox("请输入一个字符A:")
Select Case Asc(s)
Case Is > 65
n = String(3, UCase(s))
Case Is = 65
n = String(3, LCase(s))
Case Else
n = s
End Select
Print n
End Sub
从键盘输入A,输出的结果是( )。
A.aaa
B.AAA
C.65
D.a
A
VIP截止日期:2025-01-02 10:41:08
←请使用支付宝扫码支付VIP截止日期:2025-01-02 10:41:08
←请使用微信扫码支付