03-04学年第1学期vb考试题

20032004 学年第一学期计算机应用基础试题 命题教师： 陈勇 审题教师： 李书勤 注意事项：所有答案均写在答题纸上，并请写清题号。 一、选择题（共 10 分，每题 1 分） 1. 对于以下的四个对象，不能使用 PRINT 方法的是:（ ） A. 打印机 B. 窗体 C. 文本框 D. 图片框 2. 在下属性中，可以在代码中设置的是：（ ） A. Name B. Height C. MultiLine D. ScrollBars 3. 以下各选项中，前一个属性的设置不会影响后一个属性设置的是:( ) A.文本框的 MultiLine 与 ScrollBars B.命令按钮的 Style 与 Picture C.标签的 Caption 与 Name D.窗体的 MousePointer 与 MouseIcon 4. 通过文本框得到的数据类型为:（ ） A. 数值 B. 字符串 C. 变体 D. 数值或字符串 5. 一个文本框从得到焦点、输入一个字符“A”再失去焦点，以下事件的发生顺序为：（ ） A. GotFocus、KeyPress、Change、LostFocus B. GotFocus、Change、KeyPress、LostFocus C. LostFocus、Change、KeyPress、GotFocus D. LostFocus、KeyPress、Change、GotFocus 6. 关于 PictureBox 和 Image 对象的说法，不正确的是：（ ） A. 二者都可以用来显示多种图片； B. 二者都可以用来作容器使用； C. 二者在代码中装入图片使用的函数均为 LoadPicture； D. 二者都可以通过属性设置自动调整大小与显示的图片匹配 7. 文本框没有的属性是：（ ） A. Enabled B. Visible C. BackColor D. Caption 8. 给变量赋值时，若变量类型与表达式类型不一致时，以下说法错误的是：（ ） A. 若均为数值型，则变量自动改变类型，以适应表达式值的类型 B. 当变量为数值型，而表达式为数字字符串，则自动转换成数值型再赋值，当表达式中 有非数字字符或是空字符串时，出现“类型不匹配” 。 C. 当变量为数值型，而表达式为逻辑型时，True 转换成-1，False 转换成 0 再赋值，反 之，数值型数据赋给逻辑型变量时，非 0 转换为 True，0 转换成 False。 D. 任何非字符类型赋值给字符型变量，均自动转换为字符型。 9. 关于 Array 函数与 Split 函数的说法，正确的是：（ ） A二者都只能给变体动态数组赋值 B二者只能接收字符型数据 C二者给数组赋值后，数组的最小下标受 Option Base 语句的影响 D通过前者赋值时，数据必须写在代码中，而后者的数据可以在程序运行过程中通过键 盘或其它方式获得 10.顺序文件是因为文件中的记录是按：（ ） A记录号顺序存放 B某关键数据项排序存放 C记录的长度顺序存放 D按记录进入的先后顺序存放 二、指出下列各段程序的错误并改正，除第 6 小题外，不得增删程序行（共 30 分） 1本段程序 2 行有错误（4 分） 。 计算 y=x2，x 的值从键盘输入，如果|x|7,则输出 y 值 Dim x!, y! x = InputBox(“请输入 X 的值“) if x-7 and = 26 x = x * (1 + 0.015) n = n + 1 Loop MsgBox “当“ a(i, j) Next j Print Next i 6以下程序段要完成从键盘上输入若干个数，输出其中的最 大值和最小值，请说明程序的错误并重写程序。 （6 分） Dim x!, max!, min!, i% max = 0: min = 0 For i = 1 To 10 x = InputBox(“请输入第“ For i = 1 To 10 a(i) = Rnd * 90 + 10 Print a(i); Next i Print 确定 a 数组中各元素在 c 数组中的位置，放入 b 数组中 For i = 1 To 9 For j = i + 1 To 10 If Then Else End If Next j Next i 将 a 数组各元素按 b 数组