VB期末考试真题试卷及答案七

一 单选题一 单选题 1 下列 不是 Visual Basic 程序的基本结构 A 层次结构 B 分支结构 C 循环结构 D 顺序结构 2 当文本框的内容发生变化时 必将触发 事件 A LostFocus B KeyPress C Change D Click 3 在 Visual Basic 中 建立一个文本编辑区域 可采用下列 A 命令按钮 B 标签控件 C 文本控件 D 定时器控件 4 在 Visual Basic 中 下列 表达式的值不等于 4 A int 4 1 B int 4 9 C Abs int 3 9 D Abs int 4 5 5 代数表达式中的一元二次方和求根公式中的一个改成 VB 表达式是 A b sqr b b 4 a c 2 a B b sqr b b 4 a c 2 a C b sqr b b 4 a c 2 a D b b b 4 a c 2 a 6 在 Visual Basic 中 下列 程序行是符合语法的 A X Y 5 B A B C 3 C Y 1 Y Y 1 D I 10X 7 假定 X 是一个数值型变量 那么由函数组成的表达式 INT X 2 X 2 作 用是 A 用于测试 X 是否偶数 B 返回一个整数 C 返回一个奇数 D 用于测试 X 是否整数 8 表达式 Abs 3 6 sqr 100 的值是 A 360 B 360 C 36 D 36 9 为了使一个窗体从屏幕消失但仍在内存中 所使用的方法或语句为 A Show B Hide C Load D Unload 10 要改变新建对象的缺省名称 应使用属性 A Font B ForeColor C Name D Height 11 要使一个命令按钮显示文字 确定 正确的设置是把它的属性 设置为 确定 A Font B ForeColor C Caption D BorderStyle 12 在 Visual Basic 中 下列 单词用于注释语句 A Rem B End C Else D Loop 13 在 Visual Basic 中 设置控件的位置 可改变下列 属性 A Height 与 Width B height 与 Top C Left 与 Top D Left 与 Width 14 下列语句中 定义了一个单精度型变量 A Dim I As Integer B Dim Sum As Single C Dim Name As String D wjm 信息技术 15 要使一个控件在运行时无效 正确的设置是 A 把属性 Enabled 设置为 True B 把属性 Enabled 设置为 False C 把属性 Visibled 设置为 True D 把属性 Visibled 设置为 False 16 下面叙述正确的是 A 算法的执行效率与数据的存储结构无关 B 算法的空间复杂度是指算法程序中指令 或语句 的条数 C 算法的有穷性是指算法必须能在执行有限个步骤之后终止 D 算法的时间复杂度是指执行算法程序所需要的时间 17 下面概念中 不属于面向对象方法的是 A 对象 消息 B 继承 多态 C 类 封装 D 过程调用 18 下面描述中 不符合结构化程序设计风格的是 A 使用顺序 选择和重复 循环 三种基本控制结构表示程序的控制逻辑 B 自顶向下 C 注重提高程序的执行效率 D 限制使用 goto 语句 19 可以同时删除字符前导和尾部空格的函数是 A Ltrim B Rtrim C Trim D Mid 20 每一个控件都有的属性是 A Top B Name C Visible D Interval 21 执行以下程序段后 变量 c 的值为 a Visual Basic Programming b Quick c b For i 2 To 5 x 10 请输入第 If Abs x 100 11 Abs Nu 100 Then 12 End If Next i Print vbCrLf Next i For i 1 To n For j 1 To 20 If ia j 21 Then t ia j ia j ia j 1 ia j 1 t End If Next j Print For j 1 To n Print ia j Next j Next i Print 10 完善程序 在窗体中绘制 y Cos x 函数图形 要求鼠标单击窗体时开始绘 制 绘制范围 3 x 3 Dim x y Private Sub 22 x 3 Timer1 Interval 100 End Sub Private Sub Timer1 Timer 23 x 0 05 24 x0 x Line2 X1 y0 y Line1 Y1 Shape1 Move x0 y0 Shape1 Height 2 PSet x0 y0 RGB 255 0 0 If x 25 Then Timer1 Interval 0 End Sub 三 编程题三 编程题 1 编程输入 10 名短跑运动员的姓名及其 100 米跑成绩 输出最好成绩的运动 员姓名及其成绩 再显示低于平均成绩的所有运动员姓名及其成绩 2 素数 质数 是一个正整数 除了 1 和它本身之外 不能被其它任何正整数整 除 编程 求出 1 到 1000 间的所有素数 并将这些素数显示在列表框中 当用 户输入的数不是正整数时 给出提示并要求重新输入一个数 参考答案 可在 vb6 0 种验证 一 选择题 ACCDACADBC CACBBCDCCB DBABBCBBDD 二 填空题 对于与标准答案不同但验证正确的答案同样给分 对于有个别文字不准确而 不致引起误解的答案 可酌情扣 1 分 1 2 2 ccccccc 3 2 18 4 4 5 12 6 100 To 999 7 x 100 a 10 8 X a 3 b 3 c 3 9 Endif 10 Val InputBox 11 3 三 编程题 Private sub form click Dim a 1 To 10 As String b 1 To 10 As Integer i j n p sum aver For i 1 To 10 a i InputBox 请输入第 b i Next i aver sum 10 iMax 1 For i 2 To 10 If b i b iMax Then iMax i Next i Print 最好成绩为 a iMax b iMax Print 10 名运动员的平均成绩为 aver 成绩低于平均成绩的运动员为 For i 1 To 10 If b i 0