若窗体中已有一个名为Command1的命令按钮、一个名为Label 1的标签和一个名为Text 1的文本框,且文本框的内容为空,然后编写如下事件代码: Private Function f(x As Long) As Boolean If x Mod 2=

admin2010-06-10  26

问题 若窗体中已有一个名为Command1的命令按钮、一个名为Label 1的标签和一个名为Text 1的文本框,且文本框的内容为空,然后编写如下事件代码:
Private Function f(x As Long) As Boolean
If x Mod 2=0 Then
f=True
Else
f=False
End If
End Function
Private Sub Command1_Click( )
Dim  n  As  Long
n=Val(Me!text1)
p=IIf(f(n) ,“Even

选项

答案21isoddnumber

解析  函数过程也可以称为函数,是一系列由Function和End Function语句包含起来的Visual Basic语句。Function过程和Sub过程类似,但函数过程可以返回一个值。此题定义一个整型变量Long,并把n的值赋予它,n为文本框Text 1输入字符转换为数值型的值;若在文本框中输入21,则n的值为21,代入Function函数过程,x为21,对x取模,为偶数时返回True,为奇数时返回False;21是奇数,因此返回False。IIf函数调用格式:IIf(条件式,表达式1,表达式2) ,条
转载请注明原文地址:https://kaotiyun.com/show/Qsup777K
0

最新回复(0)