vb试卷(A卷)(含答案).docVIP

　宜春学院　2011－2012学年第二学期考试卷 课程名称：　vb程序设计　　试卷类型：　A　（A/B）考试方式：　闭(开/闭) 学院：　　数计学院　　　　适用班级：　11理工，经管，化生等　　　　　　　　　 题号 一 二 三 四 五 六 七 八 九 总分 分数 评卷人  承诺：我将严格遵守考场纪律，并知道考试违纪、作弊的严重性，承担由此引起的一切后果。 专业　　　　　　　　班级　　　　　　　　学号　　　　　　　　学生姓名：　　　　　　　　　 第 页 共 页 专业　　　　　　　　班级　　　　　　　　学号　　　　　　　　学生签名：　　　　　　　　　 第 页 共 页 命题人：谢青念 审核人： 一、选择题（每题2分，共40分） 1、在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是（D） A.Drive1_Click B. Dir1_Click C.Dir1_Change D.Drive1_Change 2、多分支结构的Case语句，下列写法错误的是（C） A.Case 1,5,7,9 B. Case 8 to 10 C.Case 10 to 2 D.Case Is man 3、窗体的标题栏显示内容由窗体对象的（C）属性决定。 A.backcolor B.backstyle C. caption D. text 4、若要使命令按钮失效，可设置（B）属性为false来实现。 A.value B.enabled C.visible D.cancel 5、可实现从字符串任意位置截取字符的函数是（B）。 A.instr() B.mid() C.left() D.right() 6、实现将小写字母转换成大写字母的函数是（C） A.str() B.upper() C.ucase() D.lcase() 7、下列（B）语句可以将变量A、B的值互换 A. A=B：B=A B.A=A+B：B=A-B：A=A-B C. A=C：C=B：B=A D. A=(A+B)/2:B=(A-B)/2 8、语句“Print 5\5*5”的运行结果是（C） A.5 B. 25 C.0 D.1 9、在窗体上画了一个名称为“Text1”的文本框和一个名称为“Command1”的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, n As Integer For i = 0 To 50 i = i + 3 n = n + 1 If i 11 Then Exit For Next Text1.Text = Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（B） A.2 B.4 C.3 D.5 10、下列程序段的运行结果是（D） s = 0: t = 0: u = 0 For x = 1 To 4 For y = 1 To x For z = y To 4 s = s + 1 Next z t = t + 1 Next y u = u + 1 Next x Print s; t; u A.3 6 14 B.14 6 3 C.14 3 6 D.30 10 4 11、复选框或单选按钮的当前状态可通过（A）属性来设置或访问。 A.Value B.Checked C.Selected D.Caption 12、当拖动滚动块时，将触发滚动条的（C）事件。 A.Move B.Change C.Scroll D.GotFocus 13、用一下语句所定义的数组，元素的个数是（D） Dim a(-1 to 5) As Integer A.4 B.5 C. 6 D.7 14、在窗体上画一个命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a = Array(4, 3, 2, 1) j = 1 For i = 4 To 1 Step -1 s = s + a(i) * j j = j * 10 Next i Print s End Sub 运行上面的