有如下程序,运行后输出的是()。Option Base 1Private Sub Commandl_click()Dim aj(1 To 10)Forj=6
有如下程序,运行后输出的是()。 Option Base 1 Private Sub Commandl_click() Dim aj(1 To 10) Forj=6 To 10 aj(j)=j*2 Nextj Printaj(1)+aj(j) End Sub
A.5
B.20
C.22
D.显示出错信息
有如下程序,运行后输出的是()。 Option Base 1 Private Sub Commandl_click() Dim aj(1 To 10) Forj=6 To 10 aj(j)=j*2 Nextj Printaj(1)+aj(j) End Sub
A.5
B.20
C.22
D.显示出错信息
第2题
有如下程序
a$="Flying":b$="IS":c$="funny!"
Print a$+""+LCase$(b$)+""+UCase$(c$)
End
运行后输出的结果是【 】。
第3题
有如下程序,运行后输出s的值是______。 For j=1 To 20 x=2*j-1 If x Mod 3=0 0r x Mod 7=0 Then s=s+1 Next j Print s
A.5
B.9
C.11
D.15
第4题
有如下程序
aS-"Flying"b$="IS":c$""funny!"
PrInt aS+""+LCase$(b$)+""+UCase$(cS)
End
运行后输出的结果是【 】。
第5题
有如下程序
程序运行后的输出结果是
A.FALSE OUT:a=1,b=1
B.FALSE_OUT:a=0,b=2
C.TRUE_0UT:a=1,b=2
D.TRUE_DUT:a=0,b=11
第6题
有如下程序:
AS="Flying": b$="Is":c$="funny!"
Print a$+""+LCase$(b$)+""+ UCase$(e$)
End
运行后输出的结果是【 】。
第7题
有如下程序,运行后的输出结果是 ______。 a = 5 If a <= 3 Then Print 3; End If If a <= 4 Then Print 4; End If If a <= 5 Then Print 5; End If If a <= 6; Print 6; End If
A.3456
B.456
C.56
D.6
第9题
A.321
B.23
C.不输出任何内容
D.陷入死循环
第10题
有如下程序: DefStr X-Z X = "123" Y = "456" Z = X$+Y$ Print Z$ End运行后,输出的结果是()。
A.显示出错结果
B.123456
C.579
D.579
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!