（ 28 ）在窗体上画一个命令按钮（名称为 Command1 ） ，并编写如下代码：Functin Fun1(Byval a As Integer ,b As Integer) As IntegerDim t As Integert=a-bb=t+aFun1=t+bEnd FunctionPrivate Sub Command1_Click()Dim x As IntegerX=10Print Fun1(Fun1(x,(Fun1(x,x-1))),x-1)End Sub程序运行后，单击命令按钮，输出结果是
题目
（ 28 ）在窗体上画一个命令按钮（名称为 Command1 ） ，并编写如下代码：
Functin Fun1(Byval a As Integer ,b As Integer) As Integer
Dim t As Integer
t=a-b
b=t+a
Fun1=t+b
End Function
Private Sub Command1_Click()
Dim x As Integer
X=10
Print Fun1(Fun1(x,(Fun1(x,x-1))),x-1)
End Sub
程序运行后，单击命令按钮，输出结果是
A ） 10
B ） 0
C ） 11
D ） 21
相似考题
参考答案和解析
更多“( 28 )在窗体上画一个命令按钮(名称为 Command1 ) ,并编写如下代码:Functin Fun1(Byval a As Int ”相关问题
-
第1题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第2题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() y = 8 Print fun1(1 + fun1(fun1(fun1(y)))*10) End Sub Private FLinctiOn fUnl(A)funl(A)= 1 + a End Function 程序运行后，单击命令按钮，则窗体上显示的内容是
A．112
B．2
C．909090
D．1001
正确答案：A
解析：此题目主要是多次循环调用函数funl，处理过程如下：fun1(1+fun1(fun1(fun1(8)))*10=fun1(1+fun1(fun1(9))*10)=fiat(1+fun1(10)*10)=fun1(1+11*10)，fun1(111)=112。逐层计算即可返回正确结果。 -
第3题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（）
a = 12345
Print Format$（a, "000.00"）
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）。
A．123.45
B．12345.00
C．12345
D．00123.45
正确答案：B
-
第4题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3，a＄) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
正确答案：A
解析：String返回n个字符。如果为字符串，则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。 -
第5题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
正确答案：
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。