《2010-2011-2vb试卷1》由会员分享，可在线阅读，更多相关《2010-2011-2vb试卷1（7页珍藏版）》请在金锄头文库上搜索。
1、一、填空题（20%，每空 1 分）1在 VB中，重定义坐标系的方法是 。2Print Int(12345.6789*100+0.5)/100 的结果为_。3在 DOLOOP循环中，如果关键字 While和 Until不写，则形成 。4VB 有两种类型的数组：固定大小的 数组和在程序运行时大小可以改变的 数组。5VB 应用程序通过 技术来访问和操作数据库中的数据。 6按文件的访问模式分类。可将文件分为 、 、 。7在绘图过程中，若在坐标值（X，Y）前加上关键字 Step，则坐标值（X，Y）表示对象上的 坐标位置。8从 Table1表中获取所有记录的 SQL语句是 。 9数据模型是数据库系统的核心
2、和基础， 模型已经成为数据库设计的标准。10选择通用对话框的 方法，可以打开“字体”对话框。11 方法可清除列表框的所有内容。12如果要每隔 15s产生一个 Timer事件，则 Interval属性应设置为 。 13产生一个 100200 之间（含 100和 200）的随机整数的表达式是 。14. VB的注释语句采用 字符开头，续行符采用空格加下划线，若一行上书写多句语句则各语句间用 字符分隔。 15在多窗体工程中，可用 方法显示一个窗体，用 方法将一个窗体隐藏起来。二、选择题（40%，每空 1 分）1在开发 VB应用程序时，一个工程一般至少应含有（ ） 。A）标准模块文件和类模块文件 B）工
3、程文件和窗体文件C）工程文件和类模块文件 D）工程文件和标准模块文件2设置命令按钮的标题文字时，应改变的属性是（ ） 。A) Text B) Name C) Caption D) (名称)3以下不属于 Visual Basic系统的文件类型是 （ ） 。A）.frm B）.bat C）.bas D）.vbp4以下能判断是否到达文件尾的函数是（ ） 。A）BOF B）DOC C）LOF D）EOF5字符数据应该在数据的( )括起来。A) 前后各用一个双引号 B) 前后各用一个单引号C) 前后各用一个圆括号 D) 前后各用一个“#”号6若要使用户不能修改文本框 TextBox1中内容，应修改（ ）
4、属性。A) Locked B) MultiLine C) PassWordChar D) Text7下列赋值语句中，语法不正确的是（ ） 。A) x+y=5 B) iNumber =15 C) Labell.caption =“time” D) sLength =x+y8下列正确的变量名是（ ） 。A） AA-1 B） Private C） A&B6 D） Pow19用 Dim b(-1 to 4) As String语句所定义的数组的元素个数是（ ）个。A) 2 B) 4 C) 6 D) 710以下叙述中错误的是 （ ） 。A）在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件
5、 B）以.BAS 为扩展名的文件是标准模块文件 C）窗体文件包含该窗体及其控件的属性 D）一个工程中可以含有多个标准模块文件11若 X=26、Y=4、Z=8 则 X Y *Z 的结果为（ ） 。A）52 B）48 C）0 D）0.8125 12. 设窗体上有一个文本框，名称为 text1,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是（ ） 。A)text1.maxlength=0 B)text1.enabled=false C)text1.visible=false D)text1.width=0 13. 指令: Circle (500, 500), 500,
6、8, , , 2 将绘制（ ） 。 A）椭圆 B）画圆 C）圆弧 D）扇形14. 以下叙述中错误的是（ ） 。A）事件过程是响应特定事件的一段程序 B）不同的对象可以具有相同名称的方法 C）对象的方法是执行指定操作的过程 D）对象事件的名称可以由编程者指定 15. 赋值语句：a=123+MID(“123456”,3,2)执行后，a 变量中的值是( )。A） “1234” B）123 C）12334 D）15716. 当一个复选框被选中时，它的 Value属性的值是 （ ） 。A) 3 B) 2 C) 1 D) 0 17数学式子 Sin250写成 VB表达式是( )。A) Sin 25 B) S
7、in(25) C) Sin“25” D) Sin(25*3.14/180)18. 多分支选择结构的 Case语句，下列写法错误的是（ ） 。A) Case 1,5,7,9 B) Case 8 to 10 C) Case 10 to 2 D) Case Is 6 Print num; num = num + 2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 （ ） 。A）1 3.4 5.8 B）1 3 5 C）1 4 6 D）无数据输出24在窗体上画一个名称为 Text1的文本框，然后画一个名称为 HScroll1的滚动条，其Min和 Max属性分别为 0和 10
8、0。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值, 以下能实现上述操作的程序段是（ ） 。 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
9、.Caption End Sub 25. 假定除学号字段外，表 Student和 Class内无同名字段，下列 SQL语句中可正确执行的是（ ） 。 A）Select Student.姓名,成绩 From Class,Student Where 学号=Class.学号 B）Select 姓名,成绩 From Class,Student Where Student.学号=Class.学号 C）Select 姓名,成绩 From Class,Student Where Student.学号=学号 D）Select Student.姓名,成绩 From Class,Student Where Stu
10、dent.学号=学号 26. Timer控件可用于后台进程中，可在 Timer事件内编程，要停止触发 Timer事件，需要设置的属性是（ ） 。A）Visible=False 或 Enabled=False B）Interval=0 或 Visible=False C）Interval=0 或 Enabled=False D）Interval=0 且 Enabled=False27在 Visual Basic 中，要将一个窗体从内存中释放，应使用( )语句。A) Show B) Hide C) Load D) Unload28. 要使图像框可以自动调整图形的大小，则需设置（ ）_属性。 A）S
11、tretch B）Appearance C）Autosize D）AutoRedraw29 设有如下通用过程（ ） 。Public Sub Fun(a(), ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n
12、) Text1.Text = n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是 A）10 B）15 C）20 D）2530下列对过程调用时参数传递的不正确说法是（ ） 。A） 参数传递有传值和传址两种B） 传址是实参的值随着形参的改变而改变C） 传值是实参的值不会随着形参的改变而改变D） 传址是形参的变化不会影响到实参31. 要以读方式打开 D盘的一个顺序文件 Stu.dat，应使用的语句是（ ） 。A）Open Stu.dat For Output As #1 B）Open D:Stu.dat For Input As #1C）Open D:Stu.dat For Ou
13、tput As #1 D）Open Stu.dat For Input As #132为了在运行时把 d:pic文件夹下的图形文件 a.jpg装入图片框 Picture1中，所使用的语句为（ ） 。 A）Picture1.Text=LoadPicture(d:pica.jpg) B）Picture1. Picture =LoadPicture(d:pica.jpg) C）Picture1. Picture =LoadPicture(d:pica.jpg) D）Picture1. Picture =Load(d:pica.jpg)33数学关系 8y= A And c = Z ThenPrint #1, LCase(c);End IfNext iCloseEnd Sub程序运行后,单击命令按狃,文件 ff.txt中的内容是 。4. 在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：Private Sub Form_Load()List1.AddItem 357List1.AddItem 246List1.AddItem 123List1.AddItem 456Text1.Text=End SubPrivate Sub List1
