请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
下列程序的输出结果是()。 Dim a a=Array(1，2，3，4，5，6，7，8) i=0 For k=100 To 90 Step-2 s=a(i)^2 If a(i)＞3 Then Exit For i=i+1 Next k Print k；i；s
A．88 6 36
B．88 1 2
C．90 2 4
D．94 3 16
答案
更多“下列程序的输出结果是（)。Dim aa=Array（1，2，3，4，5，6，7，8)i=0For k=100 To 90 Step-2 s=a（i)^2 If”相关的问题
第3题
以下程序的输出结果是()。 Option Base 1 Private Sub Command1_Click() Dim a(10),p(3) as Integer k=5 For I-1 to 10 a(i)=I Next I For j=1 to3 p(i)=a(I*j) Next j For I=l to 3 k=k+ p (I)*2 Next I Print k End Sub
A．33
B．28
C．35
D．37
第4题
A.m=10 n=2
B.m=2 n=5
C.m=5 n=3
D.m=3 n=10
第5题
这是一个用户名校验程序，如用户名正确，即输出欢迎字样，否则，弹出警告窗并直接退出程序。
Dim UserName(2) As String, inputName As String
Dim Flag As Boolean ‘flag=true表示用户名正确;flag=false表示用户名不正确
Private Sub Form_Load()
Dim I As Integer
UserName(0) = "AA" : UserName(1) = "BB" : UserName(2) = "CC"‘共三个用户名
----1----
inputName = InputBox("请输入名称：", "身份确认", " ")
For I = 0 To 2
If ----2----Then
Flag = True
End If
Next I
If Flag =False Then
----3---- ("用户身份确认失败!退出应用", vbOKOnly, " 警告")
End
End If
End Sub
Private Sub Form_Paint()
picShowMsg.Print "欢迎您!" + inputName
End Sub
第6题
A.1,2,3,4,5,6,7,8,9,10，
B.10,9,8,7,6,5,4,3,2,1，
C.9,2,7,4,5,6,3,8,1,10，
D.1,10,3,8,5,6,7,4,9,2，
第7题
有以下程序： #include＜stdio．h＞ void fun(char*C，int d) {*c=*c+1，d=d+1； printf(%"c%，c"，*c，d)； } main（） {char b=aa=A； fun(&b，a)；printf(%"c，%c\n"，b，a)； ) 程序运行后的输出结果是（）。
A.b，B，b，A
B.b，B，B，A
C.a，B，B，a
D.a，B，a，B
第8题
运行下列程序：
Private Sub Command1_Click()
Dim s1 As String * 1
Dim s2 As String
s1 = "a"
For i = Asc(s1) To Asc(s1) + 4
s2 = s2 & Chr(i)
Next i
Print s2
End Sub
单击Command1命令按钮后，则在窗体上显示的结果是()。
A.a
B.abcde
C.aaaa
D.s2
第9题
A.1 2 3 4 5 6
B.6
C.6 5 4 3 2 1
D.1
第10题
在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim Arr1(10)As Integer，arr2(10)As Integer n=3 For i=1 To 5 Arr1(i)=i arr2(n)=2*n+i Next i Print arr2(n)；Arr1(n) End Sub 程序运行后，单击命令按钮，输出结果是 ______。
A．11 3
B．3 11
C．13 3
D．3 13
第11题
下列程序的输出结果是。void main(){int a=1,b=2; a=a+b;b=a-b;a=a-b; printf("%d,%d\n",a,b);}
