违法和不良信息举报 联系客服
免费注册 登录

在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序:Private Sub Commandl Click( )x=

题目

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：

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

窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A.10

B.30

C.40

D.50

如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y = 1 Y = Y + 5 X = 5 + X Print X， Y End Sub 程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为

A．15 16

B．15 6

C．15 15

D．5 6


正确答案：B
解析：本题考查Static的用法。Static用于在过程中定义静态变量及数组变量。与Dim不同，如果用Static定义了一个变量，则每次引用该变量时，其值都会继续保留．本题中，三次单击命令按钮意味着每次Y值加5，X值也加5。由于在事件过程中事先给Y赋值1，所以每次单击按钮，Y值都被初始化为1，但X继续保留上次的值，即在第三次单击命令按钮时，X连加了3次5，Y值为1加5，故正确选项为D。

第2题：

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A. 3

B. 4

C. 6

D. 7


正确答案：A
本题考查VBA中参数传递的知识。在 VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用；若用 ByRef声明，说明此参数为传址调用：没有说明传递类型，则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x，说明为传值调用，此时对X的任何更改不会影响调用它的实参i，所以执行完Call f(i)这条语句后i的值不变仍为3，当然也不满足If语句的条件，故此最后输出结果为3。

第3题：

在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：

打开窗体运行后，单击命令按钮，消息框的输出结果为__________。


正确答案：
20【解析】本题考查IIf函数的知识。对于Ⅱf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x>y为假，所以返回Y的值也就是返回20。

第4题：

在窗体中添加一个命令按钮，名称为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．0

B．5

C．6

D．7


正确答案：B
解析：当一数字用函数Str转换成字符串时，总会在前头保留一个空位来表示正负。如果数字为正，返回的字符串包含一个空格，暗示有一个正号(+)。

第5题：

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As IntegerPrivate Sub Commandl_Click0x=10CaU slCall s2MsgBoxXEndSubPrivate Sub sl0x=X+20EndSubPrivate Sub s20Dim xAs IntegerX=x+20EndSub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A.10

B.30

C.40

D.50


正确答案：B
暂无解析，请参考用户分享笔记

第6题：

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码： Pfivate Sub Command 1 Click（ ）窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。

A. 1

B. 2

C. 3

D. 4


正确答案：A
本题考查条件语句的知识。在 If．．．Then…Elself．．．语句中，当某一个条件满足时，将会执行Then后面的语句，并且随后退出条件分支。在本题中，a=75满足第一个条件“a>60”．将执行Then后的语句。将1赋值给变量g，然后结束条件判断。最后将g的值l输出到消息框，所以消息框的输出结果是1。

第7题：

3在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： PrivateSubCommand1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X PrintX,Y EndSub 程序运行时，3次单击命令按钮Commandl后，窗体上显示的结果为( )。

A．15 16

B．156

C．15 15

D．56


正确答案：B

第8题：

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：

Pfivme Sub f(ByVal x As Integer)

x＝x+4

End Sub

Pfivate Sub Commandl_Click()

i＝3

Call f(i)

Ifi>4 Then i＝i*2

MsgBOx I

End Sub

窗体打开运行后，单击命令按钮，则消息框的输出结果为______。


正确答案：3
3 解析： 本题考查VBA中参数传递的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用；若用ByRef声明，说明此参数为传址调用；没有说明传递类型，则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x，说明为传值调用，此时对x的任何更改不会影响调用它的实参i，所以执行完Call f(i) 这条语句后i的值不变仍为 3，当然也不满足If语句的条件，故此最后输出结果为3。

第9题：

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As Integer Private Sub Commandl_click() x＝10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x＝x+20 End Sub Private Sub

A．10

B．30

C．40

D．50


正确答案：B
解析： 本题考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为10，然后依次调用s1和s2；在s1中对x自加了20；在s2中用Dim定义了一个局部变量 x，按照局部覆盖全局的原则，在s2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为30。

第10题：

在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：

窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。


正确答案：
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。

相关内容