题目内容
（请给出正确答案）
提问人：网友lixin080108
发布时间：2022-01-07
[主观题]
Dim x As Integer x = True Print x 执行以上程序段后,输出结果为（）
A．-1
B．0
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
查看官方参考答案
A、22
B、42
C、32
D、52
网友您好，请在下方输入框内输入要搜索的题目：
搜题
题目内容
（请给出正确答案）
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“Dim x As Integer x = True Print x 执行以上程序段后,输出结果为（）”相关的问题
第1题
执行下面程序段后，输出的结果为（ ）。 Dim a(10, 10) As Integer For i = 2 To 4 For j = 4 To 5 a(i, j) = i * j Next j Next i Print a(2, 5) + a(3, 4) + a(4, 5)
第2题
Dim i,j,x For i=i To 20 step 2 x=0 For j=i To 20 step 3 x=x+1 Next j Next i Textl.Value=Str(x) End Sub 文本框中显示的结果
A、1
B、2
C、0
D、3
第3题
单击命令按钮时，下列程序的执行结果为()。 Private Sub Commandl_Click() Dimx As Integer，y As Integer x=12： y=32 CallPCS(x，y) PrintX；y End Sub PubUc Sub PCS(ByValn As Integer，ByValm As Integer) n=nMod 10 m=mMod 10 End Sub
A．1232
B．232
C．23
D．123
第4题
单击命令按钮时,下列程序的执行结果为
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=12: y=32
Call PCS(x, y)
Print x; y
End Sub
Public Sub PCS(ByVal n As Integer, ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A．12 32
B．2 32
C．2 3
D．12 3
第5题
下列代码的运行结果为（ ）。 Private Sub Command1_Click() x = 1: y = 4 Do Until y >= 4 x = x / y y = y + 1 Loop Print x End Sub
A、1
B、4
C、8
D、20
第8题
为保证狭水道操纵安全,水道调查要求掌握狭水道水域__。1地形地貌、水文情况;2助航标志系统;3船舶交通状况;4交通安全法规、航路、航速、避碰等方面的特殊规定
A．②③④
点击查看答案
B．①②③
C．②③
D．①②③④
第9题
Dans le train : laquelle des affirmations suivantes n’est pas vraie ?
A．Les passagers rentrent du travail．
点击查看答案
B．Le train part de Paris．
C．Les voyageurs, assis autour de la femme,sont des amis．
D．Il n’y a pas assez de places assises pour tous les voyageurs．
