下列程序运行的结果是()。 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
- · 有5位网友选择 D,占比62.5%
- · 有3位网友选择 C,占比37.5%
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
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!