二零一六08二学期程序设计基础VB试卷.docVIP

2007/08二学期程序设计基础VB试卷 说明：考生应将所有答案填写在答卷上，否则无效。 一、选择题（每小题1分，共8分） 1、控件的Left和Top属性是相对 而言的。 A、对象 B、窗体 C、控件 D、容器 2、在VB中，称对象的数据为 。 A、属性 B、方法 C、事件 D、函数 3、Long类型数据能够表示的最大整数为 A、2 B、215-1 C、2 D、216-1 语句可以在任何时刻执行只删除列表框List1中的最后一项。 A、List1.RemoveItem List1.ListCount-1 B、List1.Clear C、List1.List(List1.ListCount-1)= D、List1.RemoveItem List1.Listindex 5、语句“Circle(1000,1000),400,VbRed,-6.28,-3.14,0.5”所做的图为 。 A、B、 C、 D、 6、单选的列表框选中的文本，用属性A、SelectedB、ListC、TextD、Caption Do Until i=17 i=i+5 Loop A、0次 B、1次 C、2次 D、3次 8、选中复选框控件时，Value属性的值为A、TrueB、FalseC、0D、1⑴ 为基础，由 ⑵ 驱动对象的编程技术。 2、X为一个三位数，用if语句判断其个位与百位是否对称的条件为 ⑶ 。 3、声明有n个元素的integer类型动态数组a，用 ⑷ 语句。 4、声明Double类型全局变量x，写作 ⑸ 。 5、调用过程时对形参的改变就是对相应实参变量的改变，形参采用 ⑹ 传递方式。⑺ 。 7、将通用对话框的类型设置为“字体”对话框可以使用 ⑻ 方法。 8、利用定时器来连续播放动画时，其 ⑼ 属性可以控制播放的动画速度。 9、决定图形或图形控件填充色的属性是 ⑽ 。 10、Shape属性决定形状控件的 ⑾ ，当形状控件的填充样式为透明时，要改变其颜色，必须先修改其 ⑿ 属性、再设置其颜色属性。 三、是非题（每题1分，共10分，请在答卷纸相应题号旁的括号中填“√”或“×”） 1、VB的Double类型数据可以精确表示其数值范围内的所有实数。用Public声明的数组是全局量。Left和Top属性值不会改变。 5、用Cls方法能清除窗体或图片框中用Picture属性设置的图形。 6、在窗体上绘制CommonDialog控件时，控件的大小、位置可由用户自己加以设定。 7、在盘驱动器列表框Drive1的Change事件过程中，代码Dir1.Path=Drive1.Drive的作用是：当Drive1的驱动器改变时，Dir1的目录列表随同驱动器作相应变化。 8、文件列表框与盘驱动器列表框、目录列表框一样，都能响应Change事件。 9、语句“Callshell(e:\aaa.doc)”可以打开Word文档e:\aaa.doc。 10、在设计下拉菜单时，为了创建分隔栏，除了在标题栏中输入单连字符“－”外，还必须给这个字符设定name属性。 四、程序阅读题（共24分） 阅读下列程序，将运行时的输出结果或改错的情况写在答卷纸相应题号下。 程序1. 写出三次单击Command1，分别输入100和75后、16和26、15和8时窗体上的显示结果（6分）。 Private Sub Command1_Click() Dim a As Long,b As Long,r As Long a = InputBox(a=): b = Text2.Text Do While b 0 r = a Mod b: a = b: b = r Loop Print a End Sub 程序2. 运行时在Text1中依次输入以回车结束的字符串ab12c、3cd、＋－×÷，请依次每次所追加的表项是什么? 最后，列表框中所有表项依次是什么？（6分）。 Private Sub Form_load() Text1.Text = : List1.Clear End Sub Private Sub Text1_KeyPress(K As Integer) Dim n As Integer If K = Asc(0) And K =