网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
下面程序运行时，若输入“Visual Basic Programming”，则在面体上输出的是（ ）。
A.3
B.2
C.1
D.0
参考答案
更多 “ 下面程序运行时，若输入“Visual Basic Programming”，则在面体上输出的是（ ）。A.3B.2C.1D.0 ” 相关考题
考题
下面程序运行时，若输入“Visual Basic Programming”。则在窗体上输出的是Prirate Sub Command1_Click()Dim count(25)As Integer，ch As Stringch=UCase(InputBox(”请输入字母字符串”))For k=1 To Len(ch)n=Asc(Mid(ch，k，1))-Asc(”A”)If n=0 Thencount(n)=count(n)+1End IfNext km=count(0)For k=1 T0 25IfIncount(k)ThenIll=count(k)End IfNext kPrint mEnd subA．0B．1C．2D．3
考题
下面程序运行时,若输入395,则输出结果是( )。 A.5 9 3B.3 5 9C.5 3 9S
下面程序运行时，若输入395，则输出结果是（ ）。A.5 9 3B.3 5 9C.5 3 9D.3 9 5
考题
有下列程序： Option Base 0 Private Sub Command1_Click() Dim City As Variant x = Array("Visual"，"Basic"，"Microsoft"，"Programming") Print x(2) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是A．MicrosonB．错误提示C．VisualD．Basic
考题
在Visual:Basic的立即窗口内输入以下语句:X=65 Print Chr$(x)在窗口中显示的结果是A.65B
在Visual：Basic的立即窗口内输入以下语句： X=65 ＜CR＞ Print Chr$(x) ＜CR＞ 在窗口中显示的结果是A．65B．AC．aD．x
考题
下面程序运行时，若输入“Visual Basic Prograrmming”，则在窗体上输出的是（ ）。Private Sub Command1Click（ ） Dim cout(25)As Integer，ch As String ch=Ucase(Int,utBox("请输入字母字符串")) For k=1 To i en(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 mcount(k)Then m=count(k) End If Next k Print m End SubA.0B.1C.2D.3
考题
窗体上有一个按钮和一个列表框，执行下列程序后，输出的结果为 Private Sub Command1_Click() List1.AddItem "Visual" List1.AddItem "Basic" List1.AddItem "Programming", 1 Print list1.List(2) End SubA．VisualB．BasicC．ProgrammingD．2
热门标签
最新试卷
