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

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

admin2010-09-11  54
问题 在窗体上画一个名称为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      f1=x+x+x    End Function    程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是______。
选项 A、72 36
B、108 36
C、72 6
D、108 6
答案A
解析 当在文本框中输入6时，条件“n\2=n/2”成立，调用f1函数过程。在过程的计算中，变量x的值为36，函数名f1为72。由于x是被定义为“ByRef”(按址方式传送)，所以将36反传送给实参n，函数名f1也将72返回给变量f。最后在窗体上显示的是72和36。
转载请注明原文地址:https://www.kaotiyun.com/show/Zump777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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