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

1泉州电子科技学校《VB程序设计》会考试卷1(考试时间：90分钟，满分：100分)题号第一题第二题第三题总分得分一、选择题（本大题共45小题，1-30每小题1分，31-45每小题2分，共60分）得分评卷1、VB不具有以下特点。A．VB采用了面向对象的程序设计方法。B．VB是结构化程序设计语言。C．VB采用了面向过程的编程机制。D．VB提供了可视化的设计工具。2、VB采用了编程机制。A．面向过程B．面向对象C．事件驱动D．可视化3、在VB中，称对象的数据为。A．方法B．封装C．事件D．属性4、在VB6.0集成开发环境中，运行VB程序的快捷菜单为。A．F1B．F2C．F4D．F55、下列关于事件的叙述中不正确的是。A．事件可分为用户事件与系统事件两类。B．VB中所有对象的默认事件都是Click。C．VB为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。D．事件是系统预先为对象定义的能被对象认别的动作。6、对象可以识别和响应的某些操作行为称为。A．多态B．事件C．属性D．方法7、表达式3^2*2+3MOD10\4的值是。A．18B．1C．19D．08、VisualBasic是一种面向对象的程序设计语言，构成对象的三要素是。A．属性、控件和方法B．属性、事件和方法C．窗体、控件和过程D．控件、过程和模块9、设有如下语句：Dima,bAsStringc=2008d=#6/16/2007#以下关于这段代码的叙述中，错误的是。A．a被定义为String类型变量B．b被定义为String类型变量C．c中的数据是数值型D．d中的数据是日期类型10、Rem语句的作用是。A．删除语句B．行号引导语句C．注释语句D．恢复语句11、属性能够改变窗体的边框线。A．FontStyleB．BorderStyleC．BackStyleD．Border12、下列选项中，为日期型常量的是。A．6/12/2001B．”6/12/2001”C．#6,12,2001#D．”6,12,2001”13、要使一个文本框可以显示多行文本，就设置属性的值为True。A．WidthB．MultiLineC．EnabledD．MaxLength14、决定一个窗体有无控制菜单的属性是。A．ControlBoxB．CaptionC．MaxButtonD．MinButton15、为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是。A．ValueB．DefaultC．CancelD．Enabled16、要想改变一个窗体的标题内容，则应该设置属性的值。A．NameB．CaptionC．FontD．Text17、为了使窗体上的某个控件成为活动控件，应该执行的操作是。A．单击窗体的空白部分B．双击窗体的空白部分C．单击该控件D．双击该控件18、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是。A．ValueB．TextC．CaptionD．Name19、InputBox（）函数的返回值类型为。A．变体型B．字符型C．逻辑型D．数值型20、有一个字符串变量s，要得到该字符串变量从第3个字符开始的共4个字符的函数是。A．Right(s,4)B．Left(s,4)C．Mid(s,3,4)D．Right(2,4)21、以下函数用于返回字符串的长度。A．String（）B．Mid（）C．Space（）D．Len（）22、以下不是VB中合法的自定义标识符。A．a_1B．sumC．LongD．temp23、用于删除字符串尾随空格的函数是。A．RtrimB．LtrimC．TrimD．Right24、若要设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于。A．10000B．1000C．1D．1025、为了确定一个控件是否可见，需要设置属性。A．NameB．CancelC．VisibleD．Enabled26、计算结果为0的表达式是。A．Int(2.4)+Int(-2.8)B．Cint(2.4)+Cint(-2.8)C．Fix(2.4)+Int(-2.8)D．Fix(2.4)+Fix(-2.8)班级：姓名：学号○○密○封○装○订○线○○密封线内不要答题227、要设置S键为某个菜单项的快捷访问键，应该。A．在字母S的前面插入“*”键。B．在字母S的后面插入“*”键。C．在字母S的前面插入“&”键。D．在字母S的后面插入“&”键。28、要禁用计时器控件，需要将属性设置为False。A．EnabledB．VisibleC．TimerD．Interval29、若从文本框中输入密码时只显示*号，则应当在此文本框的属性窗口中设。A．Text属性值为*B．Caption属性值为*C．Password属性值为空D．Passwordchar属性值为*30、若要使用户不能修改文本框TextBox1中内容，应设置属性为True。A．LockedB．MultiLineC．PassWordCharD．ScrollBar31、下列表达式不合法的是。A．a=”123”+”abc”B．b=123&”abc”C．c=1+2\3D．d=[3*（4+5）-6]/732、在代码编辑器中，若一条语句过长，可用续行符来换行书写语句。A．一个下划线“_”B．一个空格加一个下划线“_”C．一个连字符“-”D．一个空格加一个连字符“-”33、表达式x=Int(100*Rnd+1)生成的随机数的范围为。A.1≤x≤100B.1x100C.2≤x≤99D．0x10034、函数InStr(VB程序设计,序)的值为。A.3B.4C.5D.635、有变量定义语句Dima,bAsInteger，变量a的类型和初值是。(A)Integer，0(B)Variant，空值(C)String，(D)Long，0.036、设有如下的程序段，则执行结果为_________。Dima(10)AsInteger,iAsIntegerFori=1To10a(i)=2*i-1NextiPrinta(i)A．19B．17C．1D.下标越界37、若想子过程调用后传递两个结果给调用程序，则该子过程的正确说明为。A.PrivateSubsub1(ByvalaAsInteger,ByvalbAsInteger)B.PrivateSubsub1(aAsInteger,ByvalbAsInteger)C.PrivateSubsub1(ByvalaAsInteger,bAsInteger)D.PrivateSubsub1(ByrefaAsInteger,bAsInteger)38、设有程序段:DimxAsString,yAsStringx=”VisualBasic”y=UCase(Mid(Right(x,5),1,1))则该程序段执行后，变量y的值为。A.BB.bC．AD．a39、x被y整除的逻辑表达式是。A.x/y=0B．x\yC．xmody=0D．xy40、设有如下的程序段，当单击窗体时，执行结果为_________。PrivateSubForm_Click()Dimaa=Array(A,B,C,D,E,F,G,H)Printa(1);a(3);a(5)EndSubA.ACEB.ABCC．BDFD．BCD41、数学算式xemdyxxsin51223的VB算术表达式是________。A．（12*x+5*y-Sqr(Abs(d^3-m^2))）/Exp(-x)/Sin(x)B．（12*x+5y-Sqr(Abs(d^3-m^2))）/Exp(-x)*Sin(x)C．（12x+5y-Sqr(Abs(d^3-m^2))/Exp(-x)/Sin(x)D．（12*x+5*y-Sqr(Abs(d^3-m^2))）/e^(-x)/Sin(x)42、下面的程序段中，Print语句执行的次数为_________。DimB(-5To5)AsInteger,xAsVariantFori=LBound(B)toUBound(B)x=Int(10*Rnd)PrintxNextiA．10B．11C.9D.1243、有如下程序，可以将变量a与b的值互换。A．a=b：b=aB．c=a：a=b：b=cC．a=c：b=a：c=aD．b=a：a=c：c=b44、有如下程序，该程序执行后，在输入框中输入数字15.875，则执行结果是。I=InputBox（”请输入一个数”）J=Instr（I,”.”）PrintjA．3B．15C．0.275D．1645、有如下程序，该程序的执行结果是。a=20b=10PrintabA．1B．0C．TrueD．False二、填空题（本大题共10小题15空，每空2分，共30分）得分评卷31、在VB系统中，语句输入时____________(区分或不区分)大小写字母；在一个语句行内写多条语句时，各语句间用符号分隔；对过长的语句，可通过续行符分成多行。2、在代码窗口中输入某行代码并按回车键之后，如果代码变成颜色，说明该行代码有语法错误。3、设置窗体的属性，可在窗体上显示图片。4、双击工具箱中的控件图标，可在窗体的出现一个尺寸为缺省值的控件。5、控件的属性是对象的名字，其值在程序运行中只能被引用，不能被修改。6、要同时选定窗体上的多个控件，可以按住或键，然后依次单击窗体上的各控件。7、在MsgBox函数中，如果缺省title参数，则使用作为消息框的标题。8、复选框的属性决定复选框是否被选中。9、数值型变量的初值为0，Variant型变量的初值为，布尔型变量的初值为。10、要在菜单中建立分隔条，应在菜单编辑器的中键入符号。三、程序阅读题（本大题共2小题，每小题5分，共10分）得分评卷1、单击命令按钮Command1执行下面的程序后，则窗体上显示的A的值是，B的值是。PrivateSubCommand1_Click()DimAAsSingle,BAsIntegerA=1.3:B=2Callsub1(A,B)PrintA,BEndSubPrivateSubsub1(XAsSingle,ByValYAsInteger)DimIAsIntegerForI=1ToYX=X*2A=A+1NextIY=AEndSub2、单击一次命令按钮之后，下列程序代码的执行结果为。PrivateFunctionF(nAsInteger)StaticSAsIntegerFori=1TonS=S+iNextiF=SEndFunctionPrivateSubCommand1_Click()DimsumAsIntegersum=F(2)+F(3)PrintsumEndSub泉州电子科技学校《VB程序设计》会考试卷1参考答案班级：姓名：学号○○密○封○装○订○线○○密封线内不要答题4一、选择题题号123456789101112131415答案CCDDBBCBACBCBAC题号161718192021222324252627282930答案BCABCDCABCDCADA题号313233343536373839404142434445答案DBABBDDACCABBAC二、填空题：1、不区分冒号（：）空格加下划线（_）2、红色3、Picture4、中央5、Name（名称）6、CtrlShift(顺序可互调)7、工程名8、Value9、空False（假）10、标题-（减号）三、程序阅读题：1、5.2、22、12