首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Commandl的Click事件代码: Private Function fun(x As L,ong)As Boolean Ifx Mod 2=0 Then fun
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Commandl的Click事件代码: Private Function fun(x As L,ong)As Boolean Ifx Mod 2=0 Then fun
admin
2015-11-25
49
问题
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Commandl的Click事件代码:
Private Function fun(x As L,ong)As Boolean
Ifx Mod 2=0 Then
fun=True
Else
fun=False
End If
End Function
Private Sub Commandl_Click()
Dim n As Long
n=Val(Textl.Text)
P=IIf(fun(n),“奇数”,“偶数”)
L
选项
A、20是一个奇数
B、20
C、20是一个偶数
D、2
答案
A
解析
本题考查函数调用以及IIf函数。IIf函数可用于执行简单的条件判断操作,其格式为resultffiIIf[<条件>,
,
),其中“result”是函数的返回值,“条件”是一个逻辑表达式。当“条件”为真时,IIf函数返回“True部分”的值j而当“条件”为假时返回“False部分”的值。“True部分”或“False部分”可以是表达式、变量或其他函数。函数fun([n)的功能是判断n是否为偶数,是偶数则返回True,否则返回False。输入20时,fun返回True,则Commandl的单击事件中IIf语句得到“奇数”。
转载请注明原文地址:https://kaotiyun.com/show/1jLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click()BT4EndSubPrivateSubBT(xAsInteger)x=x*2+1Ifx<6ThenCallBT(x)EndIf
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=3:b=4:c=5PrintSecProc(c,b,A)EndSu
如果一个变量未经定义就直接使用,则该变量的类型为
在窗体中放置控件,对该控件的操作错误的是()。
在程序的空白行处填写适当的语句,完成下列功能:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除。DoWhileList2.ListCount______List2.RemoveItem(
下列对文件分类的划分正确的是()。
若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口设置()。
将C盘根目录下的图形文件moon.jpg装入图片框Picturel的语句是______。
下面的数写成普通十进制数是()。8.6787E+8
随机试题
A.黄色、浑浊、无臭味,可有食物残渣B.不凝血液C.稀脓性,略带臭味D.血性脓液,臭味明显E.血性,胰淀粉酶含量高胃十二指肠穿孔的腹穿液
喉癌的致病因素的描述中,错误的是
下列哪一项是肾病的共有症状()
对基金托管人按照法规要求须向()报送基金监督报告的,基金管理人应积极配合提供相关数据资料。
下列不属于构成物体的色彩固有特征的是()
京师大学堂设立于()。
A.系统病史的收集B.口腔病史及牙周病史C.牙齿松动度的检查D.牙周探诊E.咬合功能的检查为了解牙周病的全身易感因素,必须要进行()。
《刑法》第267条规定:“抢夺公私财物,数额较大的,或者多次抢夺的,处三年以下有期徒刑、拘役或者管制,并处或者单处罚金;数额巨大或者有其他严重情节的,处三年以上十年以下有期徒刑,并处罚金;数额特别巨大或者有其他特别严重情节的,处十年以上有期徒刑或者无期徒刑
语言培训中心:因我校于1月10日晚举【168】员工大会,任何人不得【169】席,所以本人1月10日晚不能回校参加培训。特此请假,恳望【170】准!此致敬礼! 天津师范学
Studentsgraduatingfromcollegestodayarenotfullypreparedtodealwiththe"realworld".Itismybeliefthatcollegestude
最新回复
(
0
)