09年秋季泉州电子科技学校数据库VB程序设计模拟试卷A

1、班级： 姓名： 学号 密 封 装 订 线 密 封 线 内 不 要 答 题泉州电子科技学校VB程序设计会考试卷1(考试时间：90分钟，满分：100分)题号第一题第二题第三题总分得分一、选择题（本大题共45小题，1-30每小题1分，31-45每小题2分，共60分）得分评卷1、VB不具有以下 特点。AVB采用了面向对象的程序设计方法。 BVB是结构化程序设计语言。CVB采用了面向过程的编程机制。DVB提供了可视化的设计工具。2、VB采用了 编程机制。A面向过程 B面向对象 C事件驱动 D可视化3、在VB中，称对象的数据为 。A方法 B封装 C事件 D属性4、在VB6.0集成开发环境中，运行VB程序的

2、快捷菜单为 。AF1 BF2 CF4 DF55、下列关于事件的叙述中不正确的是 。A事件可分为用户事件与系统事件两类。BVB中所有对象的默认事件都是Click。CVB为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。D事件是系统预先为对象定义的能被对象认别的动作。6、对象可以识别和响应的某些操作行为称为 。A多态 B事件 C属性 D方法7、表达式 32*2+3 MOD 104 的值是 。A18 B1 C19 D08、Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是 。A属性、控件和方法 B属性、事件和方法C窗体、控件和过程 D控件、过程

3、和模块9、设有如下语句：Dim a, b As Stringc=2008d=#6/16/2007#以下关于这段代码的叙述中，错误的是 。Aa被定义为String类型变量 Bb被定义为String类型变量Cc中的数据是数值型 Dd中的数据是日期类型10、Rem语句的作用是 。A删除语句 B行号引导语句 C注释语句 D恢复语句11、 属性能够改变窗体的边框线。AFontStyle BBorderStyle CBackStyle DBorder12、下列选项中，为日期型常量的是 。A6/12/2001 B”6/12/2001”C#6,12,2001# D”6,12,2001”13、要使一个文本框可以

4、显示多行文本，就设置 属性的值为True。AWidth BMultiLine CEnabled DMaxLength14、决定一个窗体有无控制菜单的属性是 。AControlBox BCaption CMaxButton DMinButton 15、为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是 。 AValue BDefault CCancel DEnabled16、要想改变一个窗体的标题内容，则应该设置 属性的值。AName BCaption CFont DText17、为了使窗体上的某个控件成为活动控件，应该执行的操作是 。A单击窗体

5、的空白部分 B双击窗体的空白部分C单击该控件 D双击该控件18、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是 。 AValue BText CCaption DName19、InputBox（）函数的返回值类型为 。A变体型 B字符型 C逻辑型 D数值型20、有一个字符串变量s，要得到该字符串变量从第3个字符开始的共4个字符的函数是 。ARight(s, 4) BLeft(s, 4) CMid(s,3,4) DRight(2,4)21、以下 函数用于返回字符串的长度。AString（） B Mid（） CSpace（） D Len（）22、以下

6、 不是VB中合法的自定义标识符。Aa_1 Bsum CLong Dtemp23、用于删除字符串尾随空格的函数是 。ARtrim B Ltrim CTrim DRight24、若要设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于 。A10000 B1000 C1 D1025、为了确定一个控件是否可见，需要设置 属性。AName BCancel CVisible DEnabled26、计算结果为0的表达式是 。AInt(2.4)+Int(-2.8) BCint(2.4)+Cint(-2.8) CFix(2.4)+Int(-2.8) DFix(2.4)+Fix(-2.8)27、要设

7、置S键为某个菜单项的快捷访问键，应该 。A在字母S的前面插入“*”键。B在字母S的后面插入“*”键。C在字母S的前面插入“&”键。D在字母S的后面插入“&”键。28、要禁用计时器控件，需要将 属性设置为False。AEnabled BVisible CTimer DInterval29、若从文本框中输入密码时只显示*号，则应当在此文本框的属性窗口中设 。 AText属性值为* BCaption属性值为* CPassword属性值为空 DPasswordchar属性值为*30、若要使用户不能修改文本框TextBox1中内容，应设置 属性为True。ALocked BMultiLine CPass

8、WordChar DScrollBar31、下列表达式不合法的是 。Aa=”123”+”abc” Bb=123 & ”abc”Cc=1+23 Dd=3*（4+5）-6/732、在代码编辑器中，若一条语句过长，可用 续行符来换行书写语句。A一个下划线“_” B一个空格加一个下划线“_” C一个连字符“-” D一个空格加一个连字符“-”33、表达式x=Int(100 * Rnd +1)生成的随机数的范围为 。A.1x100 B.1x100 C.2x99 D0x10034、 函数InStr(VB程序设计,序)的值为 。 A.3 B.4 C.5 D.635、有变量定义语句 Dim a,b As Int

9、eger，变量 a 的类型和初值是 。(A) Integer，0 (B) Variant，空值 (C) String， (D) Long，0.0 36、设有如下的程序段，则执行结果为_ _。 Dim a(10) As Integer, i As Integer For i = 1 To 10 a(i) = 2*i-1 Next i Print a(i)A19 B17 C1 D.下标越界37、若想子过程调用后传递两个结果给调用程序，则该子过程的正确说明为 。A. Private Sub sub1(Byval a As Integer,Byval b As Integer)B. Private S

10、ub sub1(a As Integer,Byval b As Integer)C. Private Sub sub1(Byval a As Integer, b As Integer)D. Private Sub sub1(Byref a As Integer, b As Integer)38、设有程序段: Dim x As String, y As String x=”Visual Basic”y=UCase(Mid( Right(x,5),1,1)则该程序段执行后，变量y的值为 。A.B B.b CA Da39、x被y整除的逻辑表达式是 。A.x/y=0 Bxy Cx mod y=0 D

11、xy40、设有如下的程序段，当单击窗体时，执行结果为_ _。 Private Sub Form_Click() Dim a a = Array(A, B, C, D, E, F, G, H) Print a(1); a(3); a(5)End SubA . ACE B.ABC CBDF DBCD41、数学算式的VB算术表达式是_。 A（12*x+5*y-Sqr(Abs(d3-m2)）/Exp(-x)/Sin(x)B（12*x+5y-Sqr(Abs(d3-m2)）/Exp(-x)*Sin(x)C（12x+5y-Sqr(Abs(d3-m2)/Exp(-x)/Sin(x)D（12*x+5*y-Sqr

12、(Abs(d3-m2)）/e(-x)/Sin(x)42、下面的程序段中，Print语句执行的次数为_ _。 Dim B(-5 To 5) As Integer, x As Variant For i=LBound(B) to UBound(B) x = Int(10 * Rnd) Print xNext iA10 B11 C.9 D.1243、有如下程序， 可以将变量a与b的值互换。Aa=b：b=a Bc=a：a=b：b=cCa=c：b=a：c=a Db=a：a=c：c=b44、有如下程序，该程序执行后，在输入框中输入数字15.875，则执行结果是 。I=InputBox（”请输入一个数”）J

13、=Instr（I,”.”）Print jA3 B15 C0.275 D1645、有如下程序，该程序的执行结果是 。 a=20 b=10 Print abA1 B0 CTrue DFalse二、填空题（本大题共10小题15空，每空2分，共30分）得分评卷1、在VB系统中，语句输入时_(区分或不区分)大小写字母；在一个语句行内写多条语句时，各语句间用 符号分隔；对过长的语句，可通过续行符 分成多行。2、在代码窗口中输入某行代码并按回车键之后，如果代码变成 颜色，说明该行代码有语法错误。3、设置窗体的 属性，可在窗体上显示图片。4、双击工具箱中的控件图标，可在窗体的 出现一个尺寸为缺省值的控件。5、

14、控件的 属性是对象的名字，其值在程序运行中只能被引用，不能被修改。6、要同时选定窗体上的多个控件，可以按住 或 键，然后依次单击窗体上的各控件。7、在MsgBox函数中，如果缺省title参数，则使用 作为消息框的标题。8、复选框的 属性决定复选框是否被选中。9、数值型变量的初值为0，Variant型变量的初值为 ，布尔型变量的初值为 。10、要在菜单中建立分隔条，应在菜单编辑器的 中键入 符号。三、程序阅读题（本大题共2小题，每小题5分，共10分）得分评卷1、单击命令按钮Command1执行下面的程序后，则窗体上显示的A的值是 ，B的值是 。Private Sub Command1_Clic

15、k() Dim A As Single, B As Integer A = 1.3 : B = 2 Call sub1(A, B) Print A, BEnd SubPrivate Sub sub1(X As Single, ByVal Y As Integer) Dim I As Integer For I = 1 To Y X = X * 2 A = A + 1 Next I Y = AEnd Sub2、单击一次命令按钮之后，下列程序代码的执行结果为 。Private Function F(n As Integer) Static S As Integer For i = 1 To n S = S + i Next i F = SEnd FunctionPrivate Sub Command1_Click() Dim sum As Integer sum = F(2) + F(3) Print sumEnd Sub班级： 姓名： 学号 密 封 装 订 线 密 封 线 内 不 要 答 题泉州电子科技学校VB程序设计会考试卷1参考答案一、选择题题 号123456789101112131415答 案CCDD