在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述功能的代码是
A.Private Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function
B.Private Sub Command1_Click()x=InputBox(“请输入整数”)a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd Function
C.Private Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd Function
D.Private Sub Command1_Click()x=InputBox(“请输入整数”)F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function
试卷相关题目
- 1下列叙述中正确的是
A.在窗体的Form_Load事件过程中定义的变量是全局变量
B.局部变量的作用域可以超出所定义的过程
C.在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程
D.在调用过程时,所有局部变量被系统初始化为0或空字符串
开始考试点击查看答案 - 2设有如下程序:Option Base 0Private Sub Form_Click()Dim aDim i As Integera=Array(1,2,3,4,5,6,7,8,9)For i=0 To 3Print a(5-i);Next End Sub程序运行后,单击窗体,则在窗体上显示的是
A.4 3 2 1
B.5 4 3 2
C.6 5 4 3
D.7 6 5 4
开始考试点击查看答案 - 3在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Command1_Click()Dim i As Integer,j As IntegerDim a(10,10)As IntegerFor i=1 To 3For j=1 To 3a(i,j)=(i-1)*3+jPrint a(i,j);Next jPrintNext jEnd Sub程序运行后,单击命令按钮,窗体上显示的是
A.123246369
B.234345456
C.147258369
D.123456789
开始考试点击查看答案 - 4在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10,10) As IntegerDim i,j As IntegerFor i=1 To 3For j=2 To 4array1(i,j)=i+jNext jNext IText1.Text=array1(2,3)+array1(3,4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是
A.12
B.13
C.14
D.15
开始考试点击查看答案 - 5在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then xit forNextText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是
A.2
B.3
C.4
D.5
开始考试点击查看答案 - 6在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:Private Sub Command1_Click()Dim x,y,z As Integerx=5y=7z=0Text1.text=“”Call P1(x,y,z)Text1.Text=Str(x)End SubSub P1(ByVal a As Integer,ByVal b As Integer,c As Integer)c=a+bEnd Sub程序运行后,如果单击命令按钮,则在文本框中显示的内容是
A.0
B.12
C.Str(z)
D.没有显示
开始考试点击查看答案 - 7以下叙述中错误的是
A.如果过程被定义为Static类型,则该过程中的局部变量都是Static类型
B.Sub过程中不能嵌套定义Sub过程
C.Sub过程中可以嵌套调用Sub过程
D.事件过程可以像通用过程一样由用户定义过程名
开始考试点击查看答案 - 8以下叙述中错误的是
A.在KeyUp和KeyDown事件过程中,从键盘上输入A或a被视作相同的字母(即具有相同的KeyCode)
B.在KeyUp和KeyDown事件过程中,将键盘上的“1”和右侧小键盘上的“1”视作不同的数字(具有不同的KeyCode)
C.KeyPress事件中不能识别键盘上某个键的按下与释放
D.KeyPress事件中可以识别键盘上某个键的按下与释放
开始考试点击查看答案 - 9以下叙述中错误的是
A.在同一窗体的菜单项中,不允许出现标题相同的菜单项
B.在菜单的标题栏中,“%26”所引导的字母指明了访问该菜单项的访问键
C.程序运行过程中,可以重新设置菜单的Visible属性
D.弹出式菜单也在菜单编辑器中定义
开始考试点击查看答案 - 10设在菜单编辑器中定义了一个菜单项,名为menu1。为了在运行时隐藏该菜单项,应使用的语句是
A.menu1.Enabled=True
B.Munu1.Enabled=False
C.Menu1.Visible=True
D.Menu1.Visible=False
开始考试点击查看答案
最新试卷
注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2014年安全工
类别:建筑类其它注册安全工程师注册安全工程师安全生产管理知识2013年注册安
类别:建筑类其它