窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序： Private Sub Command1_Click() Private Function fun(ByRef n As Integer)

admin2020-01-02 42

问题窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序：
Private Sub Command1_Click()       Private Function fun(ByRef n As Integer)
Dim x As Integer                      If n Mod 3=0 Then
x=Val(InputBox("输入数据"))             n=n+n
Text1=Str(x+fun(x)+fun(x))             Else
End Sub                                  n=n*n
                                          End If
                                          fun=n
                                       End Function
对于上述程序，以下叙述中错误的是

选项 A、语句fun=n有错，因为n是整型，fun没有定义类型
B、运行程序，输入值为5时，文本框中显示655
C、运行程序，输入值为6时，文本框中显示42
D、ByRef表示参数按址传递

答案A

解析本题中的函数fun的功能是判断参数是否能被3整除，若可以整除则将n翻倍，否则将n变为n的平方返回。在函数头部没有声明函数的返回值类型，默认为变体型，可以接受任何数据类型的赋值：ByRef表示参数按址传递，对形参的改变将会影响实参；当输入5的时候输出5+25+625=655；当输入6的时候输出6+12+24=42。

转载请注明原文地址:https://www.kaotiyun.com/show/bQTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序： Private Sub Command1_Click() Private Function fun(ByRef n As Integer)

二级VB

NCRE全国计算机二级

在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，如图所示，对应的事件过程是()。

InputBox函数返回值的类型为()。

假定有如下的Sub过程：SubS(xAsSingle，yAsSingle)t＝x：x＝t／yy＝tModYEndSub在窗体上画一个命令按钮，然后编写如下事件过程：Pri

执行下面的程序段后，变量S的值为()。S＝5Fori＝2．6To4．9Step0．6S＝S＋1Nexti

设“A＝"87654321"”，则表达式Val(Left(A，4)＋Mid(A,4,2))的值为()。

算法的时间复杂度是指()。

如果要把通用对话框作为颜色对话框使用，在程序运行过程中应该进行的操作是()。

有红、黄、绿三种颜色的手套各6双，装在一个黑色布袋里，从袋子里任意取出手套来，为确保至少有2双手套不同颜色，则至少要取出的手套只数是()。

根据《环境影响评价公众参与暂行办法》，建设单位应当在报送环境保护行政主管部门审批或者重新审核前，向公众公告的内容包括()。

下列选项中适用《期货从业人员管理办法》的是()。

狭义的“物流”仅指作为商品的物质资料，在生产者与消费者之间发生的空间位移，它属于流通领域内的()活动。

下列因素中，影响速动比率可信性的重要因素是()。

赫尔巴特等人将儿童的发展看作一种自然过程，主张教师不要过多干预儿童的发展。()

下列有关糖尿病酮症酸中毒发生低钾血症的机制，正确的有

下面叙述中错误的是()。