试卷名称：VB模拟考试1试卷说明：命题教师：北京化工大学北方学院信息院韩海花一、单项选择题（总分50）1.（分值：0.9分）VisualBasic6.0集成环境的主窗口中不包括__C__。A:标题栏B:菜单栏C:状态栏D:工具栏序号：4难度：1考查点：VB概述2.（分值：0.9分）用于从字符串左边截取字符的函数是（C）A:Ltrim()B:Trim()C:Left()D:Instr()序号：6难度：1考查点：VB语言基础3.（分值：0.9分）窗体的标题栏显示内容由窗体对象的（D）属性决定。A:BackColorB:BackStyleC:TextD:Caption序号：9难度：1考查点：数据的输入与输出4.（分值：0.9分）VB中可用（D）语句产生一消息框。A:InputBoxB:ShiftC:BothD:MsgBox序号：15难度：1考查点：数据的输入与输出5.（分值：0.9分）以下属于VisualBasic合法的数组元素是CA:x8B:x［8］C:s(0)D:v［8］序号：26难度：1考查点：数组6.（分值：0.9分）运行下列程序段后，显示的结果为BJ1=4J2=9IfJ1
标准
excel标准偏差excel标准偏差函数exl标准差函数国标检验抽样标准表免费下载红头文件格式标准下载
EXE
工程
路基工程安全技术交底工程项目施工成本控制工程量增项单年度零星工程技术标正投影法基本原理
后，不在工具箱中出现的控件是（C）A:单选按钮B:图片框C:通用对话框D:文本框序号：55难度：1考查点：VB概述9.（分值：0.9分）以下叙述中正确的是AA:窗体的Name属性指定窗体的名称，用来标识一个窗体B:窗体的Name属性的值是显示在窗体标题栏中的文本C:可以在运行期间改变对象的Name属性的值D:对象的Name属性值可以为空序号：57难度：1考查点：VB概述10.（分值：0.9分）在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： PrivateSubTxta_KeyPress(keyasciiasinteger) EndSub 若焦点位于文本框中，则能够触发KeyPress事件的操作是DA:单击鼠标B:双击文本框C:鼠标滑过文本框D:按下键盘上的某个键序号：81难度：1考查点：键盘与鼠标事件过程11.（分值：0.9分）把窗体的KeyPreview属性设置为True，然后编写如下过程：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode+2)EndSub程序运行后，如果在键盘上输入一个字母a，则输出结果为___C___A:AAB:ABC:ACD:AD序号：159难度：1考查点：键盘与鼠标事件过程12.（分值：0.9分）编写如下事件过程：PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)If(ButtonAnd3)=3ThenPrint"AAAA"EndIfEndSub程序运行后，为了在窗体上输出"AAAA"，应按下的鼠标键为___C__A:左B:右C:同时按下左右键D:按什么键都行序号：160难度：1考查点：键盘与鼠标事件过程13.（分值：0.9分）为了使一个窗体从屏幕上消失但仍在内存中，所使用的
方法
快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载
或语句为__B___A:ShowB:HideC:LoadD:Unload序号：151难度：1考查点：多重窗体与环境应用14.（分值：0.9分）InputBox函数返回值的类型为__B__。A:数值B:字符串C:变体D:数值或字符串（视输入的数据而定）序号：36难度：1考查点：数据的输入与输出15.（分值：0.9分）在DoUntilLoop循环中，判断循环表达式与结束循环的关系是(B)A:先判断循环表达式，当表达式值为假时结束循环B:先判断循环表达式，当表达式值为真时结束循环C:先执行循环体，后判断循环表达式，当表达式值为假时结束循环D:先执行循环体，后判断循环表达式，当表达式值为真时结束循环序号：46难度：1考查点：循环结构程序16.（分值：0.9分）以下叙述错误的是DA:在KeyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母（即具有相同的KeyCode）B:在KeyUp和KeyDown事件过程中，将键盘上的"1"和右侧小键盘上的"1"视作不同的数字（即具有不同的KeyCode）C:KeyPress事件中不能识别键盘上某个键的按下与释放D:KeyPress事件中可以识别键盘上某个键的按下与释放序号：154难度：1考查点：键盘与鼠标事件过程17.（分值：0.9分）以下叙述错误的是___C___。A:一个工程只能有一个SubMain过程B:窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体C:窗体的Hide方法和Unload方法的作用完全相同D:若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体序号：150难度：1考查点：多重窗体与环境应用18.（分值：0.9分）下列说法错误的是CA:窗体文件的扩展名为.frmB:一个窗体对应一个窗体文件C:VisualBasic中的一个工程只包含一个窗体D:VisualBasic中一个工程最多可以包含255个窗体序号：201难度：1考查点：多重窗体与环境应用19.（分值：0.9分）下列符号中哪个是VB程序中合法的变量名（A）A:ab7B:7abC:IfD:a*bc序号：16难度：1考查点：VB语言基础20.（分值：0.9分）下列说法有错误的是（D）A:默认情况下，属性Visible的值为FalseB:如果设置控件的Visible属性为False，则运行时控件会隐藏C:Visible的值可设为True或者FalseD:设置Visible属性同设置Enabled属性的功能是相同的，都是使控件处于失效状态序号：19难度：1考查点：VB概述21.（分值：0.9分）不能脱离控件(包括客体)而独立存在的过程是AA:事件过程B:通用过程C:Sub过程D:函数过程序号：33难度：1考查点：过程22.（分值：0.9分）下列叙述不正确的是（D）A:驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框B:驱动器列表框的Drive属性只能在运行时被设置C:从驱动器列表框中选择驱动器能自动变更系统当前的工作驱动器D:要改变系统当前的工作驱动器需要使用ChDrive语句序号：54难度：1考查点：数据文件23.（分值：0.9分）编写如下事件过程：PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6AndButton=2ThenPrint"BBBB"EndIfEndSub程序运行后，为了在窗体上输出"BBBB"，应执行的操作为___D__A:同时按下键和鼠标左键B:同时按下键和鼠标右键C:同时按下,键和鼠标左键D:同时按下,键和鼠标右键序号：161难度：1考查点：键盘与鼠标事件过程24.（分值：0.9分）执行以下程序段后，变量c$的值为（D）a$b$c$="VisualBasicPrograming"="Quick"=b$&Ucase(Mid$(a$,7,6))&Right$(a$,11)A:VisualBASICProgramingB:QuickBasicProgramingC:QUICKBasicProgramingD:QuickBASICPrograming序号：39难度：1考查点：VB语言基础25.（分值：0.9分）设有如下声明：DimXAsInteger如果Sgn(X)的值为-1，则X的值是DA:整数B:大于0的整数C:等于0的整数D:小于0的数序号：59难度：1考查点：VB语言基础26.（分值：0.9分）以下叙述中错误的是CA:一个工程中只能有一个SubMain过程B:窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体C:窗体的Hide方法和Unload方法的作用完全相同D:若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体序号：70难度：1考查点：多重窗体与环境应用27.（分值：0.9分）以下叙述正确的是DA:一个
记录
混凝土 养护记录下载土方回填监理旁站记录免费下载集备记录下载集备记录下载集备记录下载
中所包含的各个元素的数据类型必须相同B:随机文件中的每个记录的长度是固定的C:Open命令的作用是打开一个已经存在的文件D:使用Input#语句可以从随机文件中读取数据序号：86难度：1考查点：数据文件28.（分值：0.9分）计时器控件的（B）属性用于设置Timer事件发生的时间间隔。A:StretchB:IntervalC:ValueD:Length序号：12难度：1考查点：选择结构程序29.（分值：0.9分）要使菜单项MenuOne在程序运行时失效，使用的语句是DA:MenuOne.Visible=TrueB:MenuOne.Visible=FalseC:MenuOne.Enabled=TrueD:MenuOne.Enabled=False序号：27难度：1考查点：菜单与对话框30.（分值：0.9分）当函数EOF()的返回值为-1时，表示文件的指针指向(B)A:开头B:结尾C:第一个记录D:最后一个记录序号：49难度：1考查点：数据文件31.（分值：0.9分）假设有以下程序段：ForI=1to3Forj=5to1Step-1PrintI*jNextjNextI则语句PrintI*j的执行次数I、j的值分别是（A）A:1540B:1631C:1740D:1831序号：52难度：1考查点：选择结构程序32.（分值：0.9分）在VisualBasic中，要将一个窗体加载到内存进行预处理但不显示，应使用的语句是AA:LoadB:ShowC:HideD:Unload序号：29难度：1考查点：多重窗体与环境应用33.（分值：0.9分）下列操作不能向工程中添加窗体的是CA:执行"工程"菜单中的"添加窗体"命令B:单击工具栏上的"添加窗体"按钮C:右击窗体，在弹出的菜单中选择"添加窗体"命令D:右击工程资源管理器，在弹出的菜单中选择"添加"命令，然后在下一级菜单中选择"添加窗体"命令序号：152难度：1考查点：多重窗体与环境应用34.（分值：0.9分）当在滚动条内拖动滚动块时触发CA:KeyUp事件B:KeyPress事件C:Scroll事件D:Change事件序号：211难度：1考查点：键盘与鼠标事件过程35.（分值：0.9分）设有语句 open"c：\Test．Dat"ForOutPutAs#1则以下错误的叙述是DA:该语句打开C盘根目录下一个己存在的文件Test．DatB:该语句在C盘根目录下建立一个名为Test．Dat的文件C:该语句建立的文件的文件号为1D:执行该语句后，就可以通过Print#语句向文件Test．Dat中写入信息序号：80难度：1考查点：数据文件36.（分值：0.9分）目录列表框的Path属性的作用是AA:显示当前驱动器或指定驱动器上的路径B:显示当前驱动器或指定驱动器上的某目录下的文件名C:显示根目录下的文件名D:只显示当前路径下的文件序号：82难度：1考查点：数据文件37.（分值：0.9分）在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerClsY=1Y=Y+5X=5+XPrintX,YEndSub程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为BA:1516B:156C:1515D:56序号：60难度：1考查点：变量与过程的作用范围38.（分值：0.9分）在上题中，如果把窗体的KeyPreview属性设置为False，则文本框显示的内容为BA:abcdefgB:不显示任何信息C:ABCDEFGD:出错序号：157难度：1考查点：键盘与鼠标事件过程39.（分值：0.9分）一个工程必须包含的文件的类型是AA:*.vbp*.frm*.frxB:*.vbp*.cls*.basC:*.bas*.ocx*.resD:*.frm*.cls*.bas序号：232难度：1考查点：多重窗体与环境应用40.（分值：0.9分）用标准工具栏中的工具按钮不能执行的操作是___B___。A:添加工程B:打印源程序C:运行程序D:打开工程序号：5难度：1考查点：VB概述41.（分值：0.9分）退出For循环可使用的语句为（A）A:ExitForB:ExitDoC:EndForD:EndDo序号：8难度：1考查点：循环结构程序42.（分值：0.9分）在窗体上画一个文本框，然后编写如下事件过程：PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimcharAsStringChar=Chr(KeyAscii)KeyAscii=Asc(UCase(char))Text1.Text=String(6,KeyAscii)EndSub程序运行后，如果在键盘上输入一个字母a，则文本框中显示的内容为___D___A:aB:AC:aaaaaaD:AAAAAA序号：158难度：1考查点：键盘与鼠标事件过程43.（分值：0.9分）以下叙述中错误的是CA:一个工程中可以包含多个窗体文件B:在一个窗体文件中用Private定义的通用过程能被其他窗体调用C:在
设计
领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计
VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件D:全局变量必须在标准模块中定义序号：71难度：1考查点：多重窗体与环境应用44.（分值：0.9分）、执行x$=InputBox("请输入x的值")时，在弹出的对话框中输入123，在列表框List1选中1个列表项(数据为456)，使有的值使123456的语句是AA:y=x$+List1.List(0)B:y=x$+List1.List(1)C:y=Val(x$)+Val(List1.List(0))D:y=Val(x$)&Val(List1.List(1))序号：23难度：1考查点：VB语言基础45.（分值：0.9分）在设计阶段，当双击窗体上的某个控件时，所打开的窗口是CA:工程资源管理器窗口B:工具箱窗口C:代码窗口D:属性窗口序号：56难度：1考查点：VB概述46.（分值：0.9分）要将名为MyForm的窗体显示出来，正确的使用方法是AA:MyForm.ShowB:Show.MyFormC:MyFormLoadD:MyFormShow序号：216难度：1考查点：多重窗体与环境应用47.（分值：0.9分）以下不属于键盘事件的是（C）A:KeyDownB:KeyUpC:UnloadD:KeyPress序号：14难度：1考查点：VB概述48.（分值：0.9分）X是小于100的非负数，用VB表达式表达正确的是（C）A:0X100B:0<=X<100C:0<=XandX<100D:0X<100序号：17难度：1考查点：VB语言基础49.（分值：0.9分）下列各控件不包含滚动条的控件是（D）A:ListBoxB:ComboBoxC:TextBoxD:Label序号：20难度：1考查点：VB概述50.（分值：0.9分）下面的属性中，用于自动调整图像框中图形内容的大小的是DA:PictureB:CurentYC:CurrentXD:Stretch序号：24难度：1考查点：数据的输入与输出51.（分值：0.9分）下列语句正确的是CA:IfABThenPrint"A不等于B"B:IfA<>BThenPrintf"A不等于B"C:IfA<>BThenPrint"A不等于B"D:IfABPrint"A不等于B"序号：31难度：1考查点：选择结构程序52.（分值：0.9分）编写如下两个事件过程：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_KeyPress(KeyAsciiAsInteger)PrintChr(KeyAscii)EndSub在一般情况下（即不按住键和锁定大写），运行程序，如果按键，则程序的输出是___A___A:AaB:aAC:AAD:aa序号：155难度：1考查点：键盘与鼠标事件过程53.（分值：0.9分）在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview属性设置为True，然后编写如下代码：DimSaveAllAsStringPrivateSubCommand1_Click()Text1.Text=UCase(SaveAll)EndSubPrivateSubForm_KeyPress(KeyAsciiAsInteger)SaveAll=SaveAll+Chr(KeyAscii)EndSub程序运行后，在键盘上输入"abcdefg"，单击命令按钮，则文本框中显示的内容为CA:abcdefgB:不显示任何信息C:ABCDEFGD:出错序号：156难度：1考查点：键盘与鼠标事件过程54.（分值：0.9分）当一个工程中含有多个窗体时，其中的启动窗体是___D__A:启动VisualBasic时建立的窗体B:第一个添加的窗体C:最后一个添加的窗体D:在"工程属性"对话框中指定的窗体序号：153难度：1考查点：多重窗体与环境应用55.（分值：0.9分）如果在程序中要将c定义为静态变量，且为整型数，则应使用的语句是（B）A:RedimaAsIntegerB:StaticaAsIntegerC:PublicaAsIntegerD:DimaAsInteger序号：21难度：1考查点：变量与过程的作用范围56.（分值：0.9分）Sub过程与Function过程最根本的区别是CA:Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以B:Function过程可以有形参，Sub过程不可以C:Sub过程不能返回值，而Function过程能返回值D:两种过程参数的传递方式不同序号：34难度：1考查点：过程57.（分值：0.9分）设有如下变量声明DimTestDateAsDate为变量TestDate正确赋值的表达方式是AA:TextDate=#1/1/2002#B:TestDate=#"1/1/2002"#C:TextDate=date("1/1/2002")D:TestDate=Format("m/d/yy","1/1/2002")序号：58难度：1考查点：VB语言基础58.（分值：0.9分）设a=3,b=5，则以下表达式值为真的是BA:a>=bAndb>10B:(a>b)Or(b>0)C:(a<0)Eqv(b>0)D:(-3+5>a)And(b>0)序号：61难度：1考查点：VB语言基础二、填空题（总分20）1.（分值：1.5）下列程序是判断一个整数(>=3)是否为素数，请补充完整。DimnAsIntegern=InputBox("请输入一个整数(>=3)")k=Int(Sqr(n))i=2swit=0Whilei<=kAndswit=0IfnModi=0Thenswit=0Elseswit=1EndIfEndIfloopIfswit=0ThenPrintn;"是一个素数。"ElsePrintn;"不是一个素数。"EndIf序号：2难度：1考查点：循环结构程序2.（分值：0.7）用户可以用Type语句语句定义自己的数据类型。序号：14难度：1考查点：变量与过程的作用范围3.（分值：2.2）执行下面程序，单击命令按钮Command1后，显示在窗体上第一行的内容是4第二行的内容是8第三行的内容是16OptionExplicitPrivateSubCommand1_Click()DimNAsInteger,MAsIntegerN=2DOWhilem<3N=N+2IfFun(N)ThenPrintNM=M+1EndIfLoopEndSubPrivateFunctio序号：60难度：1考查点：过程4.（分值：0.7）设有如下程序段：a$="BeijingShanghai"b$=Mid(a$,InStr(a$,"g")+1)执行上面的程序段后，变量b$的值为Shanghai.序号：22难度：1考查点：VB语言基础5.（分值：0.7）要使下列For语句循环执行20次，循环变量的初值应当是多少?Fork=33To-5Step-2序号：93难度：2考查点：循环结构程序6.（分值：0.7）在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用Static关键字在过程中定义局部变量。序号：95难度：2考查点：变量与过程的作用范围7.（分值：0.7）列表框中项目的序号是从0开始的。序号：100难度：2考查点：数组8.（分值：2.2）执行下面程序，单击命令按钮Command1后，显示在窗体上第一行的内容是11第二行的内容是61最后一行的内容是136OptionExplicitDimNAsIntegerPrivateSubCommand1_Click()DimIAsInteger,JAsIntegerForI=3To1Step-2N=Fun(I,N)PrintNNextIEndSubPrivateFunctionFun(AAsInteger)AsInteger序号：58难度：1考查点：过程9.（分值：0.7）整型变量x中存放了一个两位数，要将两位数交换位置，如13变成31，实现的表达式是（xmod10）*10+x\10。序号：88难度：3考查点：VB语言基础10.（分值：1.5）下面程序的功能是产生10个小于100(不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。SubPR()RandomizeDima(10)Forj=1To10a(i)=Int((99*Rnd）+1)Ifa(j)Mod5=0Thenk=k+1Printa(j)NextjPrintPrintk/10EndSub序号：5难度：1考查点：循环结构程序11.（分值：2.2）在窗体上有一个命令按钮，然后编写如下程序：FunctionTrans(ByValnumAsLong)AsLongDimkAsLongk=1DoWhilenumk=k*(numMod10)num=num＼10LoopTrans=kPrintTransEndFunctionPrivateSubCommand1_Click()DimmAsLongDimsAsLongm=InputBox("请输入一个数")s=Trans(m)EndSub程序运行时，单击命令按钮，在输入对话框中输入"789"，输出结果为504,在输入对话框中输入"987"输出504在输入对话框中输入"879"，输出结果为504.序号：4难度：1考查点：过程12.（分值：1.5）在刚建立工程时，使窗体上的所有控件具有区别于默认值的相同的字体格式，应对_Form窗体的Font属性进行设置序号：66难度：1考查点：VB概述13.（分值：1.5）为了显示一个窗体，所使用的方法为<窗体对象名>.Show而为了隐藏一个窗体，所使用的方法为<窗体对象名>.Hide或Me.Hide.序号：27难度：1考查点：多重窗体与环境应用14.（分值：1.5）为了把一个窗体装入内存，所使用的语句是Load<窗体对象名>为了清除内存中指定的窗体，所使用的语句是Unload<窗体对象名>或UnloadMe.序号：26难度：1考查点：多重窗体与环境应用15.（分值：0.7）表达式(7\3+1)*3的值是9。序号：50难度：1考查点：VB语言基础16.（分值：0.7）函数Str$(256.36)的值是256.36.序号：6难度：1考查点：VB语言基础三、编程题（总分30）1.(分值：15.0分)编写程序，输入学生的姓名、学号和成绩（高数、英语和专业课），判断该学生能获得几等奖学金，并输出结果。获奖条件是：一等奖学金要求所有成绩在95分以上；二等奖学金要求所有成绩在90分以上；三等奖学金要求所有成绩在88分以上。参考答案:1序号：13难度：2考查点：选择结构程序2.(分值：15.0分)编写的Function函数，用该函数实现以下表达式求和，n为任意输入的数值。参考答案:12序号：4难度：1考查点：循环结构程序
浙公网安备 33021202002483