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

在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并编写有如下事件过程：程序运行后，单击命令按钮，在文本框中显示的是（ ）。A. 2B. 3C. 4D. 5

题目

在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并编写有如下事件过程：程序运行后，单击命令按钮，在文本框中显示的是（ ）。

A. 2

B. 3

C. 4

D. 5

参考答案和解析
正确答案：B
B)    【解析】本题考查循环程序的分析。题中循环变量为i，步长为1，循环体中i每次变化都增加3，因此执行一次循环后，i的值增加4，当i大于10时退出循环，所以每次循环后i的值为：3，7，11。当i为11时退出循环，所以循环共执行了3次。
如果没有搜索结果或未解决您的问题，请直接 联系老师 获取答案。
相似问题和答案

第1题：

（ 32 ） 在窗体上添加一个命令按钮 （ 名为 Command1 ） 和一个文本框 （ 名为 Text1 ） ， 并在命令按钮中编写

如下事件代码：

Private Sub Command1_Click( )

m=2.17

n=Len(Str$(m)+Space(5))

Me!Text1 =n

End Sub

打开窗体运行后，单击命令按钮，在文本框中显示

A ） 5

B ） 8

C ） 9

D ） 10


正确答案：D

第2题：

在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl)，编写如下事件过程：

打开窗体运行后，单击命令按钮，文本框中显示的内容是__________。


正确答案：
15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时，参数有两种传递方式：传址传递和传值传递。如果在函数声明时没有说明传递类型，则默认为传址传递，即形参的结果会传递给实参。本题中形参均为传址传递，即a=x=3，b=y=5，c=z=10。但是在子程序里面对c重新赋值为c=a*b=15，这个值l5会回送给实参2，所以最后显示的值Z也就是l5。

第3题：

在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码：PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后，单击命令按钮，在文本框中显示______。

A．5

B．8

C．9

D．10


正确答案：D

第4题：

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：

打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。


正确答案：12
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。

第5题：

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：

Private Sub Command_Click()

Dim x AS Integer， y As Integer， z As Integer

x=5:y=7:z=0

Me!Textl=””

Call pl(x，y，z)

Me!Text1=z

End Sub

Sub pl(a As Integer，b As Integer，c As Integer)

C=a+b

End Sub

打开窗体运行后，单击命令按钮，文本框中显示的内容是【 】 。


正确答案：12
12 解析：本题考查考生阅读VBA程序的能力。程序中调用p1(x,y,z)函数来将z的值交给文本框Text1，p1(x,y,z)函数实现将x与y相加，然后赋给z的功能。所以在文本框中显示的内容是12，是5+7的结果。

第6题：

在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2.17 n=Len(Str$(m)＋Space(5)) Me!Text1=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示______。

A．5

B．8

C．9

D．10


正确答案：D
解析：程序中“n=Len(Str$(m)+Space(5))”的含义是算出字符串总长度，当把正数转换成字符串时，Str$函数在字符串前面留有一个空格，Space(数值表达式)，则返回由数值表达式确定的空格个数组成的空字符串。 Str$(m)表示5个字符串，Space(5)表示5个字符串，所以n等于10。

第7题：

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，编写如下事件过程：

Private Sub Command1_Click()

Dim x As Integer,y As Integer,z As Integer

Call f(x,y,z)

End Sub

Sub f(a As Integer,b As Integer,c As Integer)

c=b*a

End Sub

打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。


正确答案：15
15

第8题：

在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码： Private Sub Commandl_click() m＝2.17 n＝Len(Str$(m) +Space(5) ) Me!Text1＝n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。

A．5

B．8

C．9

D．10


正确答案：D
解析： 本题考查基本字符串函数的知识。在VBA中，Str函数用于将数字转换成字符串，当数字转换为字符串时，总会预留一个空格给前面的正负号。如果参数是正数，回传的字符串会有一个前置空格。2.17转换成字符串“2.17”，后面再连接上5个空格，然后用Len函数来求长度，最后结果为10。

第9题：

在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后，单击命令按钮，在文本框中显示( )。

A．5

B．8

C．9

D．10


正确答案：C
解析：2170转换为字符串，再在后面加5个空格，所以长度为9。

相关内容