单项选择题
现有如下一段程序: x=UCase(InputBox("输入:")) Select Case x Case "A" To "C" Print "考核通过!" Case "D" Print "考核不通过 !" Case Else Print "输入数据不合法!" End SelectEnd Sub执行程序,在输入框中输入字母"B",则以下叙述中正确的是( )。
A.程序运行错
B.在窗体上显示"考核通过!"
C.在窗体上显示"考核不通过 !"
D.在窗体上显示"输入数据不合法!"
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:Private Sub Command1_Click() a=InputBox( Enter an integer ) b=Text1.Text Text1.Text=b+a End Sub程序运行后,在文本框中输入456,然后单击命令按钮,在输入对话框中输入123,则文本框中显示的内容是( )。
A.579
B.123
C.456123
D.456
点击查看答案&解析
单项选择题
下面程序运行时,若输入 Visual Basic Programming ,则在窗体上输出的是( )。Private Sub Command1_Click() Dim count(25)As Integer, ch As String ch=UCase(InputBox( 请输入字母字符串 )) For k=1 To Len(ch) n=Asc(Mid(ch,k,1))-Asc( A ) If n>=0 Then count(n)=count(n)+1 End If Next k m=count(0) For k=1 To 25 If m<count(k)Then m=count(k) End If Next k Print mEnd Sub
A.0
B.1
C.2
D.3
点击查看答案&解析
相关试题
以下数列:1,1,2,3,5,8,13,...
(1)在考生文件夹下有一个工程文件sjt3...
(1)在名称为Form1、标题为“欢迎”的窗...
假定有以下通用过程:Function Fun(n As...
设有如下通用过程:Public Function f(x...