题目内容 (请给出正确答案)
[主观题]

'下面的程序运行时,单击窗体后,窗体上显示的结果是()。Private Sub Form_Click(B )Dim a

'下面的程序运行时,单击窗体后,窗体上显示的结果是()。

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

查看答案
如搜索结果不匹配,请 联系老师 获取答案
您可能会需要:
您的账号:,可能会需要:
您的账号:
发送账号密码至手机
发送
更多“'下面的程序运行时,单击窗体后,窗体上显示的结果是()。Pr…”相关的问题

第1题

下列表达式的值是字符串型的是( )。

A.5^2+114/5

B.”2007”&”4”

C.”abcd”<”bcde”

D.(b^(1/3)*5>2) and “bde”>”tre”

点击查看答案

第2题

执行以下程序,在窗体上输出()。

Private Sub Command1_Click()

Dim a(20)As Integer

For j = 1 To 20 Step 2

a(j)= j

Next j

Print a(1)+ a(2)+ a(3)AAAAAAAAa

End Sub

A. 4

B. 5

C. 6

D. 7

点击查看答案

第3题

设置属性的语句格式为( )

A. “对象名.属性名=属性值”

B. “对象名.属性名属性值”

C. “窗体名.属性名=属性值”

D. “窗体名.属性名属性值”

点击查看答案

第4题

设有Function过程:

Private Function f(a As Integer, b As Integer) As Integer

a = a * a:

b = b * b

f = CInt(Sqr(a - b))

End Function

则如下程序段的运行结果是( )。

Private Sub Command1_Click()

Dim X As Integer, Y As Integer

X = 5: Y = 4

a = f(X, Y)

Print a

End Sub

A. 5

B. 4

C. 3

D. 9

点击查看答案
热门考试 全部 >
相关试卷 全部 >
账号:
你好,尊敬的上学吧用户
发送账号至手机
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改
谢谢您的反馈

您认为本题答案有误,我们将认真、仔细核查,
如果您知道正确答案,欢迎您来纠错

警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

微信搜一搜
上学吧
点击打开微信
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反上学吧购买须知被冻结。您可在“上学吧”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
微信搜一搜
上学吧
点击打开微信