下列程序运行的结果是()。 Private Sub Command1_Click() Dim a(6) As Integer, b(6) As Integer n = 5 For i = 1 To 6 a(i) = i b(i) = i ^ 2 - n Next i Print a(n); b(n) End Sub
A.5 10
B.5 20
C.6 30
D.6 31
A.5 10
B.5 20
C.6 30
D.6 31
A、编辑命令 Edit command
B、没有命令 None command
C、透明命令Transparent command
D、绘图命令Draw command
Private Sub Command1_Click()
Print MyBM(23, 18)
End Sub
Public Function MyBM(m As Integer, n As Integer) As Integer
Do While m $amp;Do While m > n: m=m - n: Loop
Do While m < n: n=n - m: Loop
Loop
MyBM=m
End Function()。
A.0
B.1
C.3
D.5
A、List1.ListIndex(2) = "Basic"
B、List1.List(1) = "Basic"
C、List1.List(2) = "Basic"
D、List1.ListIndex(1) = "Basic"
A、Type StuInfo Xm As String*8 Xh As Integer End Type StuInfo
B、Type StuInfo Xm As String*8 Xh As Integer Type End
C、Type StuInfo Xm As String*8 Xh As Integer End Type
D、Type StuInfo Xm String*8 Xh As Integer End StuInfo
A、S1(x,3)
B、Call S1 3,x
C、a=S1(x,3)
D、Call S1(3,x)
A、12 2
B、2 1
C、4 2
D、12 6
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!