网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
窗体上有一个名为Commandl的命令按钮，并有如下程序：
Private Sub Command 1_Click()
Dim a As Integer, b As Integer
a=8
b=12
Print Fun(a, b);a; b
End Sub
Private Function Fun(ByVal a As Integer, b As Integer)As Integer
a=a Mod 5
b=b、5
Fun＝a
End Function
程序运行时，单击命令按钮，则输出结果是
A）3 3 2
B）3 8 2
C）8 8 12
D）3 8 12
参考答案
更多 “ 窗体上有一个名为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 ” 相关考题
考题
在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click（）Dim s，iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 。
考题
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click() Dim a() a＝Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承
考题
标准模块中有如下程序代码：Public x As Integer，Y As IntegerSub vat_pub()x=10：Y=20End Sub在窗体上有1个命令按钮，并有如下事件过程：Private Sub Commandl—Click()Dim X As IntegerCall vat_pubx=x 4-looY=Y+100Print x；YEnd Sub运行程序后单击命令按钮，窗体上显示的是A．100 100B．100 120C．110 100D．110 120
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 s=s+a(k) Next k Print s End Sub A.10 B.14 C.15 D.120
考题
在窗体上有一个命令按钮Commandl，通用过程fun和命令按钮的事件过程如下： Private Function fun(By m As Integer) If m Mod 2=0 Then fun=2 Else Fun=1 Else If End Funcion Private Sub Commandl_Click() Dim i Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，则窗体上输出A.6 B.7 C.8 D.9
考题
窗体上有一个名为Command1的命令按钮，并有如下程序： Private Sub Corqmand1_Click（ ） Dim a As Integer，b As Integer a=8 b=12 Print Fun(a，b)；a；b End Sub Private Function Fun(ByVal a As Integer，b AS Integer)As Integer a=a Mod 5 b=b＼5 Fun=a End Function 程序运行时，单击命令按钮，则输出结果是（ ）。A.3 3 2B.3 8 2C.8 8 12D.3 8 12
考题
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：Private Sub Command1_Click()Dim a As Integer,b As Integerx=10y=20End Sub打开窗体运行后，单击命令按钮，消息框的输出结果为( )。
考题
在窗体上画一个名为Commandl的命令按钮，然后编写以下程序：Private Sub Commandl—Click()Dim M(10)As IntegerFor k=1 TO 10M(k)=12一kNext kx=8PrintM(2+M(x))End Sub运行程序，单击命令按钮，在窗体上显示的是A．6B．5C．7D．8
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下： Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后，单击命令按钮，输出结果是A．10B．14C．15D．120
考题
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。A．空白B．错误提示C．北京D．上海
考题
窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是A．Private Sub Forml_Click() … End SubB．Private Sub Form_Click() … End SubC．Private Sub Commandl_Click() … End SubD．Private Sub Command_Click() … End Sub
考题
窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Commandl_Click()Dim a(1 0)，x％a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Print xEnd Sub程序运行后．单击命令按钮，输出结果是A．10个数中奇数的个数B．l0个数中偶数的个教C．10个数中奇数的累加和D．10个数中偶数的累加和
考题
窗体上有一个名为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后的输出结果为
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是A．VVVB．VisC．sicD．11
考题
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：Public X As Integer Private Sub Commandl Click（ ）x＝10 Call slCall s2MsgBox x End Sub Private Sub sl（ ）x＝x+20 End Sub Private Sub s2（ ）Dim x As Integer x=x+20End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。A.10B.30C.40D.50
考题
在窗体中添加一个名为Command1的命令按钮，然后编写如下程序：Private Sub s(By Val p As Integer)p=p*2End SubPrirate Sub Command1_Click( )Dim i As Integeri=3Call s(i)If i＞4 Then i=i^2MsgBox IEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
考题
在窗体中有一个标签Lbl和一个命令按钮Commandl，事件代码如下： Option Compare DatabaseDim aAs String*10Private Sub Command 1_Click（ ） a="1234"b=Len（A． Me．Lbl．Caption=bEnd sub打开窗体后单击命令按钮，窗体中显示的内容是（ ）。【考点3 VBA程序设计基础】A.4B.5C.10D.40
考题
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Commandl_Click() Dim a() a=Array(“机床”，“车床”，“钻床”，“轴承”) Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承
考题
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer，b As String，C As Integer a = 1234 : b = Str(A)c = Len(B)Print c End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是A．0B．5C．6D．7
考题
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：Function m(x as Integer，y as Integer) as Integerm=IIf(x＞y，x，y)End FunctionPrivate Sub Commandl Click()Dim a as Integer,b as Integera=1b=2MsgBox m(a,B)End Sub打开窗体运行后，单击命令按钮，消息框的输出结果为【 】。
考题
（ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：Private Sub Command1_Click （）Dim b,kFor k=1 to 6b=23+kNext kMsgBox b+kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。
考题
窗体Form. 1上有一个名称为Command 1的命令按钮，以下对应窗体单击事件的事件过程是A）Private Sub Form. 1_Click() B）Private Sub Form. _Click()End Sub End SubC）Private Sub Commandl_Click() D）Private Sub Command_ Click()End Sub End Sub
考题
(29）在窗体上画一个名为Command 1的命令按钮，然后编写以下程序：Private Sub Commandl_lick()Dim a(10) As IntegerFor k＝10 To 1 Step-1a(k)＝20-2*kNext kk＝k＋7Print a(k-a(k))End Sub运行程序，单击命令按钮，输出结果是A）18B）12C）8D）6
考题
(30）窗体上有一个名为Command 1的命令按钮，并有如下程序：Private Sub Command 1_Click()Dim a(10)，x%For k＝1To10a(k)=lnt(Rnd*90＋10)x＝x +a(k) Mod 2Next kPrint xEnd Sub程序运行后，单击命令按钮，输出结果是A）10个数中奇数的个数B）10个数中偶数的个数C）10个数中奇数的累加和D）10个数中偶数的累加和
考题
窗体上有一个名为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毫秒向右移动一次
考题
(6）在窗体上有1个名称为Command 1的命令按钮，并有如下事件过程和函数过程：Private Sub Command 1_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＋1Nextm=sEnd Function运行程序，单击命令按钮Command 1的输出结果为【6】。
热门标签
最新试卷
