网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
窗体上有一个名为Commandl的命令按钮，并有下面的程序：
Private Sub Command1_Click()
Dim art(5)As Integer
For k=1 TO 5
arr(k)=k
Next k
prog art()
For k=1 To 5
Print alT(k)；
Next k
End sub
Sub prog(a()As Integer)
n=UBound(a)
For i=n To 2 step-1
For j=1 To n-1
if a(j)<a(j+1)Then
t=a(j)：a(j)=a(j+1)：a(j+1)=t
End If
Next j
Next i
End sub
程序运行时，单击命令按钮后显示的是
A．1 2 3 4 5
B．5 4 3 2 1
C．0 1 2 3 4
D．4 3 2 1 0
参考答案
更多 “ 窗体上有一个名为Commandl的命令按钮，并有下面的程序：Private Sub Command1_Click()Dim art(5)As IntegerFor k=1 TO 5arr(k)=kNext kprog art()For k=1 To 5Print alT(k)；Next kEnd subSub prog(a()As Integer)n=UBound(a)For i=n To 2 step-1For j=1 To n-1if a(j)a(j+1)Thent=a(j)：a(j)=a(j+1)：a(j+1)=tEnd IfNext jNext iEnd sub程序运行时，单击命令按钮后显示的是A．1 2 3 4 5B．5 4 3 2 1C．0 1 2 3 4D．4 3 2 1 0 ” 相关考题
考题
设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮，并有以下事件过程：Private Sub Commandl一Click()x!==Val(Textl．Text)Select Case xCasc Is-10，Is=20Print“输入错误”Case Is0Print 20 xCase ls10Print 20Case Is=20Print x+10End SelectEnd Sub程序运行时，如果存文本框中输入一5，则单击命令按钮后的输出结果是A．5B．20C．25D．输入错误
考题
窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器，并有下面的事件过程：Private Sub Commandl_Click()Timerl．Enabled=TrueEnd SubPrivate Sub Form_Load()Timerl．Interval=10Timerl．Enabled—FalsePrivate Sub Timerl _Timer()Commandl．Left=Commandl．Left+10End Sub程序运行时，单击命令按钮，则产生的结果是A．命令按钮每10秒向左移动一次B．命令按钮每10秒向右移动一次C．命令按钮每10毫秒向左移动一次D．命令按钮每l0毫秒向右移动一次
考题
窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Command_Click()Dim a As Integer，b As Integera=8b=12Print Fun(a，b)；a；bEnd SubPrivate Function Fun(ByVal a As Integer，b As Integer)As Integera=a Mod 5b=b＼5Fun=aEnd Function程序运行时，单击命令按钮，则输出结果是A．3 3 2B．3 8 2C．8 8 12D．3 8 1 2
考题
在窗体上有1个名称为Commandl的命令按钮，并有如下事件过程和函数过程：Private Sub Commandl Click()Dim P As Integerp=m(1)+m(2)+m(3)Print PEnd SubPrivate Function m(n As Integer)As IntegerStatic s As IntegerFor k=1 To ns=s+lNextm=sEnd Function运行程序，单击命令按钮Commandl后的输出结果为
考题
窗体上有一个名为Command1的命令按钮，并有下面的程序：Private Sub Command1 Click（ ）Dim arr(5)As Integer ．For k=1 To 5art(k)=kNext kprog art（ ）For k=1 T0 5Print art(k)；Next kEnd SubSub prog(a（ ）As Integer)n=UBound(a)For i=n To 2 step-1if a(j)a(j十1)Thent=a(j)：a(1)=a(j+1)；a(j+1)=tEnd IfNext jNext iEnd Sub程序运行时，单击命令按钮后显示的是（ ）。A.12345B.54321C.01234D.43210
考题
窗体上有一个名为Command 1的命令按钮和一个名为Timer 1的计时器，并有下面的事件过程：Private Sub Command 1_Click()Timerl.Enabled=TrueEnd SubPrivate Sub Form_ Load()Timerl．Interval＝10Timerl．Enabled＝FalseEnd SubPrivate Sub Timerl_Timer()Command l .Left＝Commandl .Left+10End Sub程序运行时，单击命令按钮，则产生的结果是A）命令按钮每10秒向左移动一次B）命令按钮每10秒向右移动一次C）命令按钮每10毫秒向左移动一次D）命令按钮每10毫秒向右移动一次
考题
窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Command 1_Click()Dim a As Integer, b As Integera=8b=12Print Fun(a, b);a; bEnd SubPrivate Function Fun(ByVal a As Integer, b As Integer)As Integera=a Mod 5b=b、5Fun＝aEnd Function程序运行时，单击命令按钮，则输出结果是A）3 3 2B）3 8 2C）8 8 12D）3 8 12
热门标签
最新试卷