题目内容
(请给出正确答案)
[单选题]
下列代码的运行结果是_______。 Private Sub Command1_Click() n = 100 For I = 1 To n If I Mod 25 = 0 Then Print "*" Next I End Sub
A.4个"*"
B.5个"*"
C.25个"*"
D.100个"*"
提问人:网友ykexin
发布时间:2022-01-07
A.4个"*"
B.5个"*"
C.25个"*"
D.100个"*"
A、5 10
B、5 20
C、6 30
D、6 31
A、20 10 10 10
B、10 15 20 10
C、20 15 10 15
D、20 10 20 10
A、A
B、B
C、C
D、D
A.EeFF
B.eEfF
C.EEFF
D.eeFF
Private Sub Form_Click(B )
Dim a(1 To 5)As Integer
a(1)= 2: a(2)= 3: a(3)= 1: a(4)= 5: a(5)= 4
n = 5
For i = 1 To n - 1
Min = i
For j = i + 1 To n
If a(j)< a(Min)Then Min = j
Next j
t = a(i): a(i)= a(Min): a(Min)= t
Next i
For i = 1 To n
Print a(i);
Next i
End Sub
A. 2 3 1 5 4
B. 1 2 3 4 5
C. 9 8 7 6 5
D. 5 5 5 5 5
A、窗体、属性、事件、程序
B、窗体、属性、事件、模块
C、模块、方法、事件、程序
D、窗体、程序、属性、事件
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!