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

有以下程序:Sub subP(b()As Integer) For i=1 To 4b(i)=2*i Next iEnd SubPrivate Sub Command1_

有以下程序: Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(i)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为______。

A. 2 4 6 8

B.5 6 7 8

C.10 12 14 6

D.出错

提问人:网友qsgamdc 发布时间:2022-01-06
参考答案
查看官方参考答案
如搜索结果不匹配,请 联系老师 获取答案
更多“有以下程序:Sub subP(b()As Integer) …”相关的问题
第1题
有以下程序:Sub subp(b()As Integer) For i=1To4 b(i)=2-i Next i End Sub Private S

有以下程序:

Sub subp(b()As Integer)

For i=1To4

b(i)=2-i

Next i

End Sub

Private Sub Command1_Click()

Dim a (1 To 4)As Integer

A) (1)=5

A) (2)=6

A) (3)=7

A) (4)=8

subpa()

For i=1 To4

Print a (i)

Next i

End Sub

运行上面的程序,单击命令按钮,输出结果为()。 A.2 4 6 8

B.5 6 7 8

C.10 12 14 16

D.出错

点击查看答案
第2题
有程序如下:Sub subP(b() As Integer)For i=1 To 4 b(i)=2*iNext iEnd SubPrivate Sub Command1_

有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序,单击命令按钮,输出结果为______ 。

A. 2 4 6 8

B.5 2 2 2

C.10 12 14 16

D.出错

点击查看答案
第3题
阅读程序 Sub subp(); Next i End Sub 运行上面程序,单击命令按钮,输出结果为

A.2 4 6 8

B.5 6 7 8

C.10 12 14 16

D.程序有错

点击查看答案
第4题
阅读程序:Sub subP(b()As Integer)For i=1 To 4b(i)=2*iNext iEnd SubPrivate Sub Command1_Clic

阅读程序: Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行以上程序,单击命令按钮,输出结果为______ 。

A.2 4 6 8

B.5 6 7 8

C.10 12 14 16

D.出错

点击查看答案
第5题
阅读程序:Sub subP(b() As Integer)For i=1 To 4b(i)=2 * iNext iEnd SubPrivate Sub Command1_C

阅读程序: Sub subP(b() As Integer) For i=1 To 4 b(i)=2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序,单击命令按钮,输出结果为

A.2 4 6 8

B.5 6 7 8

C.10 12 14 16

D.出错

点击查看答案
第6题
请阅读程序:Sub subP(b()As Integer) For i=1 To4 b(i)=2*i Next iEnd SubPrivate Sub Comman

请阅读程序:

Sub subP(b()As Integer)

For i=1 To4

b(i)=2*i

Next i

End Sub

Private Sub Commandl Click()

Dim a(1 To 4)As Integer

a(1)=5:a(2)=6:a(3)=7:a(4)=8

subP a()

For i=1 To 4

Print a(i)

Next i

End Sub

运行上面的程序,单击命令按钮,则输出结果是()。

A.2

4

6

8

B.5

6

7

8

C.10

12

14

16

D.出错

点击查看答案
第7题
下面程序的运行结果是()。Private Sub Commandl_Click()a=1.5b=1.5Callfun(a,B) Printa,bEnd SubP

下面程序的运行结果是()。 Private Sub Commandl_Click() a=1.5 b=1.5 Callfun(a,B) Printa,b End Sub Private Subfun(x,y) x=y*y y=y+x End Sub

A.2.25 1.5

B.1.5 2.25

C.2.25 3.75

D.0.75 1.5

点击查看答案
第8题
请阅读程序:Sub subP(b()As Integer)For i=1 To 4b(i)=2*iNext iEnd SubPrivate Sub Command 1_C

请阅读程序:

Sub subP(b()As Integer)

For i=1 To 4

b(i)=2*i

Next i

End Sub

Private Sub Command 1_Click()

Dim a(1 To 4)As Integer

a(1)=5:a(2)=6:a(3)=7:a(4)=8

subP a()

For i=1 To 4

Print a(i)

Next i

End Sub

运行上面的程序,单击命令按钮,则输出结果是()。

A.2 4 6 8

B.5 6 7 8

C.10 12 14 16

D.出错

点击查看答案
第9题
窗体上有一个组合框,编写下列程序:Private Sub Command1_ Click ()Combo1. RemoveItem 2End subP

窗体上有一个组合框,编写下列程序:Private Sub Command1_ Click () Combo1. RemoveItem 2End subPrivate Sub form. Load() Combo1. AddItem “上海” Combo1. AddItem “北京” Combo1. AddItem “天津” Combo1. AddItem “重庆”End Sub程序执行时,单击Command1,则在组合框中将不再出现______。

A.上海

B.北京

C.天津

D.重庆

点击查看答案
第10题
单击命令按钮时,下列程序的运行结果为Private Sub Command1_Click() Print MyBM(23,18)End SubP

单击命令按钮时,下列程序的运行结果为Private Sub Command1_Click() Print MyBM(23,18)End SubPublic Function MyBM(m As Integer,n As Integer)As Integer Do While m< >n Do While m > n:m=m - n:Loop Do While m < n:n=n - m:Loop Loop MyBM=mEnd Function

A.0

B.1

C.3

D.5

点击查看答案
账号:
你好,尊敬的用户
复制账号
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改
欢迎分享答案

为鼓励登录用户提交答案,简答题每个月将会抽取一批参与作答的用户给予奖励,具体奖励活动请关注官方微信公众号:简答题

简答题官方微信公众号

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

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

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