2. 计算机
  3. 在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n=Val(Text1.Text) if n\2=n/2 T

在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n=Val(Text1.Text) if n\2=n/2 T

admin2010-03-30  51
问题 在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：    Private Sub Command1_Click()      n=Val(Text1.Text)      if n\2=n/2 Then        f=f1(n)      Else        f=f2(n)      End If      Print f；n    End Sub    Public Function f1(ByRef x)      x = x  *  x      f1  =x + x    End Function    Public Function f2(ByVal x)      x = x + x      f2=x+x+x    End Function    程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是
选项 A、72  36
B、108  36
C、72  6
D、108  6
答案1
解析 本题综合考查Function函数的建立，调用与传地址、传值的区别。由于输入的数字为6，6对2的浮点除法与整数除法的结果一致，都是3，所以执行Then后面的语句，即f=f1(n)。根据Function对f1的定义，参数x以传地址的方式传送数值，故n值在被传送到f1函数过程后，通过 x=x*x，变为36。f1值由此变为72，故正确答案为 A。
转载请注明原文地址:https://kaotiyun.com/show/CBmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)