（ 34 ）窗体上有一个名为 Command1 的命令按钮，并有下面的程序：

Private Sub Comand1_Click （）

D．im arr （ 5 ） As Integer

F．or k=1 To 5

arr （ k ） =k

Next k

prog arr （）

F．or k=1 To 5

Print arr （ k ）

Next k

E．nd Sub

Sub prog （ a （） As Integer ）

n=U b ound （ a ）

F．or i=n To 2 step -1

F．or j=1 To n-1

if a （ j ） <a （ j+1 ） Then

t=a （ j ） :a （ j ） =a （ j+1 ） :a （ j+1 ） =t

E．nd If

Next j

Next i

E．nd Sub

程序运行时，单击命令按钮后显示的是

A． ） 12345

B． ） 54321

C． ） 01234

D． ） 43210

[单选题](30）窗体上有一个名为Command 1的命令按钮，并有如下程序：Private Sub Command 1_Click()D．im a(10)，x%F．or k＝1To10a(k)=lnt(Rnd*90＋10)x＝x +a(k) Mod 2Next kPrint xE．nd Sub程序运行后，单击命令按钮，输出结果是A．）10个数中奇数的个数B．）10个数中偶数的个数C．）10个数中奇数的累加和D．）10个数中偶数的累加和

[单选题]窗体上有一个名为Commandl的命令按钮，并有下面的程序：Private Sub Command1_Click()D．im art(5)As IntegerF．or k=1 TO 5arr(k)=kNext kprog art()F．or k=1 To 5Print alT(k)；Next kE．nd subSub prog(a()As Integer)n=UBound(a)F．or i=n To 2 step-1F．or j=1 To n-1if a(j)<a(j+1)Thent=a(

[单选题]在窗体上有一个名称为Command1的命令按钮，并有如下程序：程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为（ ）。A． 5 16B． 5 6C． 15 15D． 15 6

[单选题]在窗体中添加一个命令按钮Command1，并有以下程序：F．unctionretnum()nl=Chr(13)+Chr(10)msg$="1.运行VB应用程序"+nl+"2.计算器"msg$=msg$+nl+"请输入数字选择"retnum=InputBox(msg$,Title,Default)E．ndFunctionPrivateSubCommand1_Click()r=retnumIfr=1Thenx=Shell("c:/

[单选题]窗体上有一个名为Command1的命令按钮，并有下面的程序：程序运行时单击命令按钮后显示的是（　　）。A.12345B.54321C.01234D.4

[单选题]窗体上有一个名为Command1的命令按钮，并有下面的程序：程序运行时，单击命令按钮后显示的是（　　）。A.12345B.54321C.01234D.

[单选题]（ 34 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：Private Sub Command1_Click()F．or i=1 To 4x=4F．or j=1 To 3x=3F．or k=1 To2x=x+6Next kNext jNext iMsgBox xE．nd Sub打开窗体后，单击命令按钮，消息框的输出结果是A． ） 7B． ） 15C． ） 157D． ） 538

[单选题]在窗体上添加有一个命令按钮，(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next I MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是 ______。A．7B．15C．157D．538

[单选题]窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序Private Sub Command1_click()D．im 11If Textl．Text<>”123456”Thenn=n+1print“口夸输入错误”＆n＆次”E．nd IfE．nd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的

[单选题]窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：Private Sub Command1_Click( )