资源预览内容
第1页 / 共13页
第2页 / 共13页
第3页 / 共13页
第4页 / 共13页
第5页 / 共13页
第6页 / 共13页
第7页 / 共13页
第8页 / 共13页
第9页 / 共13页
第10页 / 共13页
亲,该文档总共13页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述
2004年9月全国计算机等级考试二级笔试试卷公共基础知识和Visual Basic语言程序设计(考试时间90分钟,满分100分)一、选择题(1)(20)每小题2分,(21)(30)每小题3分,共70分)下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的。请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。 (1)设窗体上有一个文本框,名称为Text1,程序运行后,要求该文本框不能接受键盘输入,但能输出信息,以下属性设置正确的是: A)text1.maxlength=0 B)text1.enabled=false C)text1.visible=flase D)text1.width=0 (2)以下能在窗体Form1的标题栏中显示“VisualBasic窗体”的语句是 A)Form1.Name=VisualBasic窗体 B)Form1.Title=VisualBasic窗体 C)Form1.Caption=VisualBasic窗体 D)Form1.Text=VisualBasic窗体” (3)在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示。 以下能实现上述操作的程序段是 A)Private Sub HScroll_Change()Text1.Text=HScroll1.Value End Sub B)Private Sub HScroll_Click()Text1.Text=HScroll1.Value End Sub C)Private Sub HScroll_Change()Text1.Text=HScroll.Caption End Sub D)Private Sub HScroll_Click()Text1.Text=HScroll.Caption End Sub (4)设菜单中有一个菜单项为“Open”。若要为该菜单命令设计访问键,即按下Alt及字母O时,能够执行“Open”命令,则在菜单编辑器中设置“Open”命令的方式是 A)把Caption属性设置为&Open B)把Caption属性设置为O&pen C)把Name属性设置为&Open D)把Name属性设置为O&pen (5)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()x=InputBox(Input)Select Case x Case 1,3 Print 分支1 Case Is 4 Print 分支2 Case Else Print Else 分支 End Select End Sub 程序运行后,如果在输入对话框中输入2,则窗体上显示的是 A)分支1 B)分支2 C)Else分支D)程序出错 (6)以下关于MsgBox的叙述中,错误的是 A)MsgBox函数返回一个整数 B)通过MsgBox函数可以设置信息框中图标和按钮的类型 C)MsgBox语句没有返回值 D)MsgBox函数的第一个参数是一个整数,该参数只能确定对话框中显示的按钮数量 (7)在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是 A)Timer1.Interval=0.5 B)Timer1.Interval=5 C)Timer1.Interval=50 D)Timer1.Interval=500 (8)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x,y End Sub 程序运行后,连续三次单击Command1按钮后,窗体上显示的是 A)4 2 B)12 18 C)12 30 D)4 6 (9)以下关于多重窗体程序的叙述中,错误的是 A)用Hide方法不但可以隐藏窗体,而且能清除内存中的窗体 B)在多重窗体程序中,各窗体的菜单是彼此独立的 C)在多重窗体程序中,可以根据需要指定启动窗体 D)对于多重窗体程序中,需要单独保存每个窗体 (10)以下关于文件的叙述中,错误的是 A)顺序文件中的记录一个接一个地顺序存放 B)随机文件中记录的长度是随机的 C)执行打开文件的命令后,自动生成一个文件指针 D)LOF函数返回给文件分配的字节数 (11)以下叙述中错误的是 A)事件过程是响应特定事件的一段程序 B)不同的对象可以具有相同名称的方法 C)对象的方法是执行指定操作的过程 D)对象事件的名称可以由编程者指定 (12)以下合法的Visual Basic标识符是 A)ForLoop B)Const C)9abc D)a#x (13)当一个复选框被选中时,它的Value属性的值是 A)3 B)2 C)1 D)0 (14)表达式 5 Mod 3+35*2的值是 A)0 B)2 C)4 D)6 (15)设x=4,y=8,z=7,以下表达式的值是 xz)Or z10,100,-100)fShow fCaption=y End Sub 运行以上程序,正确的结果是 A)Form1的Caption属性值为100 B)Form2的Caption属性值为-100 C)Form1的Caption属性值为-100 D)Form2的Caption属性值为100 (22)在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click()Dim x As Integer Static y As Integer x=10 y=5 Call f1(x,y)Print x,y End Sub Private Sub f1(ByRef x1 As Integer, y1 As Integer)x1=x1+2 y1=y1+2 End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是 A)10 5 B)12 5 C)10 7 D)12 7 (23)设有如下程序 Option Base 1 Private Sub Command1_Click()Dim a(10)As Integer Dim n As Integer n=InputBox(输入数据)If n10 Then Call GetArray(a,n)End If End Sub Private Sub GetArray(b()As Integer,n As Integer)Dim c(10)As Integer j=0 For i=1 To n b(i)=CInt(Rnd()*100)If b(i)/2=b(i)2 Then j=j+1 c(j)=b(i)End If Next Print j End Sub 以下叙述中错误的是 A)数组b中的偶数被保存在数组c中 B)程序运行结束后,在窗体上显示的是c数组中元素的个数 C)GetArray过程的参数n是按值传送的 D)如果输入的数据大于10,则窗体上不显示任何信息(24)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号