二级二级VB2002年9月全国计算机等级考试二级VB真题
题目内容

在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述功能的代码是

2024-07-09

A.Private Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function

B.Private Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd Function

C.Private Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd Function

D.Private Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function

题目答案

试卷相关题目

最新试卷
热门试卷

长理培训客户端 资讯,试题,视频一手掌握

去 App Store 免费下载 iOS 客户端