在窗体中添加一个命令按钮和一个文本框，并编写如下程序代码： Private Sub Command1_Click() k=0 Do While k ＜ 70 k=k+2 k=k*k+k a=a+k Loop Text1．Text=a End Sub 程序运行后，文本框中显示的是A．20B．32C．44D．78
题目
在窗体中添加一个命令按钮和一个文本框，并编写如下程序代码： Private Sub Command1_Click() k=0 Do While k ＜ 70 k=k+2 k=k*k+k a=a+k Loop Text1．Text=a End Sub 程序运行后，文本框中显示的是
A．20
B．32
C．44
D．78
相似考题
更多“在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:Private Sub Command1_Click() k=0 D ”相关问题
-
第1题：
在窗体中添加一个命令按钮，编写如下程序代码：
在InputBox对话框中输入Hello，运行结果为：______。
正确答案：The Length of Hello is 5
The Length of Hello is 5 解析：通过InputBox对话框输入“Hello”后，通过使用Len()函数计算包含字符串内字符的数目。 -
第2题：
在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码：PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后，单击命令按钮，在文本框中显示______。
A．5
B．8
C．9
D．10
正确答案：D
-
第3题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：
正确答案：
15【解析】本题考查VBA程序中过程调用的知识。由于VBA中，默认情况下，参数是按地址传递(ByRef)，对形参的改变会影响到实参。本题中2的值等于a b，这个z值会返回给实参c，所以文本框中显示的内容为15。 -
第4题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
正确答案：12
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。 -
第5题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl)，编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是__________。
正确答案：
15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时，参数有两种传递方式：传址传递和传值传递。如果在函数声明时没有说明传递类型，则默认为传址传递，即形参的结果会传递给实参。本题中形参均为传址传递，即a=x=3，b=y=5，c=z=10。但是在子程序里面对c重新赋值为c=a*b=15，这个值l5会回送给实参2，所以最后显示的值Z也就是l5。