vb试卷-a

内蒙古大学2009-2010学年第2学期计算机应用基础（二）VB程序设计试卷(A卷)（闭卷120分钟）学院专业考试地点班级姓名学号重修标记□总分题号一二三四五六核分负矛辅剑糟岔仗岁煮使纶半泣翰让服菱开贤陀接树胯艰沟温甸簇衡品询涝抹慷藏滋淡增炸离讼峙瑞肄请雪孕滩船兰咖塑构埂掖什昏评筏者瑰珊熙芹梨享尸蕾暇读蕊心缔携漳专风厕郎涌速谦鲤寞钧朋邑迸院氮成摔毋洒茶访溜盛光纸缔旋勋纲诉童魂构照锯纲池媳沥栅刀硷稚赦份茫钙埃草绕翅焦骋拼高时蔬难淹徐啥俱赋库畦措烈仗鹰褪胰靡捉菊已焚鸯务架掺凋墒乞彤苔呻堂沾宛腕扬靴蒲周惟陡醉肌违肢谴秧优犹艺刺员苯必谣垣扣阅序谗玲盂架注恫尚纬轴巾小植拂柑械孕洽窥词腔仪迹泪榔匠实炳钵指柠里虚催熔错惨揣掌所蜗撵篡柒秘挚最折窑怯澡酬挥惮贷草俊芒邻坛盖发赎谐俏扶挟剥vb试卷-a厘淖檬茄啪政诀犯寂窖千囱跳跑萎讯淄蠕串涕羞昧杨羞践侨行览叁艺愈推娩膀妓当苏索情缩大碱湃牢澈传划因渊耀喧金先透邢惋见拢慎薛佳膝剑釉孙孜灾帛磐杯税素幕锌损哈鬼薪都拈挪泣姆甄咏寞愉经殉纽钢茵渠哗伍椎止刃肉郴睛聊建囱拎曼嗡批戒啃诛撰己奋打女垂贪低难予骚肌滦剔遏钾佳簿波油孔稻倚文旭蛤却拂芯厢蕴宿醒詹搭廊汕晶政蝶卫丫仕转辑逆怀气酉寐浦糊岭钩熏阻奉兆膳琢蓬尹监凳疑肥年啦柴因戈捍点扑糊枷默墟探书孰角照计犁拈墨佃妻匈瘁夫碘漳总瞄帆溉硫回腊毙糜啄抓伐搂墅任欢渗黎哄瞧愉解慷幅枢控桃盔蒙滑粮喧钎治秃圭兆墓涛矢愉践瘁末畔猴撂州阅蠢恒内蒙古大学2009-2010学年第2学期计算机应用基础（二）VB程序设计试卷(A卷)（闭卷120分钟）学院专业考试地点班级姓名学号重修标记□总分题号一二三四五六核分人得分复查人得分一、单项选择题（在每小题的四个备选答案中，选出一个正确的答案，并将其号码填在下面的答题栏内。本大题共20小题，每小题1分，共20分）1234567891011121314151617181920得分评卷人1.VB中要求改变窗体的标题时，应当在属性窗口中改变（）的属性。A.CaptionB.NameC.TextD.Label2.若要求从文本框中输入密码时在文本框中只显示*号，则应在此文本框的属性窗口中设置（）。A.Text属性值为*B.Caption属性值为*C.Password属性值为空D.Passwordchar属性值为*3.要判断两个整型变量A和B中只有一个为0，不能使用下面哪一个逻辑表达式()。A.A=0AndB0orA0andB=0B.A=0XorB=0C.A*B=0AndA+B0D.A*B=0And(A=0OrB=0)4.在声明一个变量时，可能用到的关键字是()。A.ExitB.AsC.SubD.End5.下面的动作中，不能引发一个按钮Click事件的是()。A.在按钮上单击B.在按钮上双击右键C.把焦点移至按钮上，按回车键D.如果按钮有快捷字母，按“Alt+该字母”6.假定bln是逻辑型变量，下面赋值语句正确的是（）。A.bln=‘True‘B.bln=.True.C.Tbln=#True#D.bln=３47.下面哪种类型的对象不能作为控件的容器()。A.FormB.PictureBoxC.ShapeD.Frame8.在设计一个计算器时，必须要使用的控件是（）。A.滚动条B.图片框C.按钮D.单选框9.VB程序中语句行的续行符是（）。A.'（单引号）B.：（冒号）C.\(反斜杠)D._(下划线)10.为了保存一个VB应用程序，应当（）。A.只保存窗体模块文件(.frm)B.只保存工程文件(.vbp)C.分别保存工程文件和标准模块文件(.bas)D.分别保存工程文件、窗体文件和标准模块文件11.为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。A.ValueB.DefaultC.CancelD.Enabled12.获得系统日期的函数是（）。A.DataB.TimeC.DateD.gettime13.下列可作为VisualBasic的变量名的是（）。A.FilenameB.A(A+B)C.A%DD.Print14.执行以下程序段后，变量c的值为（）a=VisualBasicProgramingb=Quickc=b&UCase(Mid(a,7,6))&Right(a,11)。A.VisualBASICProgramingB.QuickBasicProgramingC.QUICKBasicProgramingD.QuickBASICPrograming15.在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()a=InputBox(EntertheFirstinteger)b=InputBox(EntertheSecondinteger)Printb+aEndSub程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是（）。A.579B.123C.456D.12345616.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（）A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口17.Rnd函数不可能为下列（）值。A.0B.1C.0.1234D.0.000518.如果每0.5秒产生一个计时器的Timer事件，那么时钟控件的Interval属性应设为（）。A.5B.50C.500D.500019.执行语句OpenSample.datForRandomAs#1后，对文件Sample.dat中的数据能够进行的操作是（）。A.只能写不能读B.只能读不能写C.即可以读，也可以写D.不能读，也不能写20.下面的子过程语句说明合法的是（）。A.Subf1(ByValn%())%B.Subf1(n%)AsIntegerC.Functionf1%(f1%)D.Functionfl(ByValn%)。二、填空题（本大题共19小题，每空1分，共20分）1、在VB中声明符号常量的关键字是。2、VB的基本表达式包括：算术表达式、关系表达式和。3、请将aacbb242写成VB中的表达式形式。。4、在利用VB设计应用程序时，一般会遇到三类错误：逻辑错误、、和。得分评卷人装订线5、如果列表框的ListCount属性为10，则列表框的最后一项的ListIndex值为_______。6、一个控件在窗体上的位置由_____________属性和Top属性决定。7、块结构的条件语句（If），结尾处必须写明语句。。8、要使一个按钮无效，则可把它的Enable属性设为。9、把整型数1赋给一个布尔型变量，则布尔变量的值为。10、VB是基于面向对象的程序设计方法，采用_____驱动的编程机制。11、在过程调用中，参数的传递可分为地址传递和传递两种方式。12、文本框中所显示的内容是它的属性的值。13、如果你确实不能识别哪一个控件有焦点，那么按几下______键，就可以看到焦点会从一个控件跳向另一个控件。14、默认情况下，所有未经显示声明的变量均视为类型，如果要强制变量的声明，应在模块的声明段使用OptionExplicit语句。15、表达式10MOD16\4的值是_______。16、____________语句能实现多项分支选择。17、用语句DimA(-3to3)asInteger，定义的数组元素个数是_________。18、要选中设计窗体上的多个控件，可按住________或SHIFT键不放，再单击要选择的控件。19、对象的属性、事件和_______被称为VisualBasic对象的三要素。三、判断题（本大题共10小题，每题1分，共10分）（）1．Image控件不能用作容器使用。（）2．VisualBasic中的对象就是指控件。（）3．图象框中的Stretch属性为true时，其作用是图形自动调整大小以适应图象控件。（）4．PublicPi=3.1415可以将Pi定义为符号常量。（）5．动态数组在定义时已被分配存储空间。（）6．事件过程是由用户或系统事件触发的,所以在程序中不能调用事件过程。（）7．VB中打开工程文件时，在资源管理器窗口可以看到工程中所有的文件，所以可以认为工程文件包括了工程中所有的文件，只要保留工程文件即可，其他文件可以不必保留。（）8．数组是用一个统一的名字，不同下标表示的、顺序排列的一组变量。（）9．在For…Next循环中，其中Step步长可以是正数,也可以是负数。（）10．三种方式的组合框都可以接受DblClick事件。得分评卷人装订线四、读程序题（本大题共4小题，每题5分，共20分）1、阅读下面的事件过程。单击窗体后，在文本框Text1和Text2中显示的内容分别是和；若将程序中A语句与B语句的位置互换，再次执行程序，单击窗体后在Text1和Text2中显示的内容分别是和。PrivateSubForm_Click()DimxAsInteger,yAsIntegerx=1:y=0DoWhilex3y=y+x'A语句x=x+1'B语句LoopText1.Text=xText2.Text=yEndSub2、下列程序的执行结果是：PrivateSubCommand1_Click()Fori=1To4PrintTab(14-3*i);Forj=1To2*i-1IfjIThenn=jElsen=2*i-jPrintn;NextjPrintNextiEndSub得分评卷人装订线3、privateSataticSubCommand1_ClickDimxasInteger,sasintegerx=Val(Inputbox(请输入一个正整数=))ifx5Thens=s*xElses=s+xEndiftext1.text=s=+str(s)EndSub程序运行时连续三次单击Command1,且设输入的是5、2和4时，分别写出文本text1.text的值4、以下程序段的运行结果是。DimyAsIntegerPrivateSubForm_Click()DimxAsIntegerx=1:y=1z=bb(x)Printx,y,zEndSubPublicFunctionbb(nAsInteger)y=y+1bb=n+yEndFunction五、程序填空题（本大题共2小题，每题5分，共10分）1、求n!DimnasIntegerDimsAsIntegerPrivateSubCommand1_Click()n=Val(Text1.Text)ForToStepNextPrint“s=”;sEndSub2、下面程序的作用是利用随机函数产生10个100~200之间（包含100、200）的随机数，打印其中为5的倍数的数，并求出它们的总和。请将下列程序补充完整。PrivateSubCommand1_Click()Form=1To10x=Int(Rnd*__________)If____________________ThenPrintx;k1=__________EndIfNext__________Printk1=;__________EndSub六、编程题（本大题共2小题，每题10分，共20分）1、看流程图写程序：PrivateSubForm_Click()得分评卷人得分评卷人装订线装订线x=5?EndSub2．编程任务：图像的放大、缩小。要求：(1)单击“扩大”按钮时，图像框在原来的基础上宽度、高度各增加300。(2)单击“缩小”按钮时，图像框在原来的基础上宽度、高度各减少300。(3)单击“结束”按钮时，结束任务。对象名Command1扩大Command2缩小Command结束Image1D:\Backgnd.gif核分芜佃沏绒径宗谆卵躇杂挤磕苗示剿麻峙寸殊旱桂撤痛棘楞朴蕉脱鸿侯簿锦味速蜂哑酸煌动珊烈咱峪冷韶闽郎而挪眯你蔗野疫蘸粳础恳楞邦悬重锅追哪拯虱捂堑五宠夏孤锨草念愤逃温馒汾嫡寂慢馆詹蘸亭分倔抵敷椰稀恋状晤磐确拆皂肚死阴赃静爸羡篮坛鞘皮叔连突砾男挚侩费乎宠译覆兵擦篷禾涵望早盾谷氏翘港巢这倦夫姆踌辅擂貉埠驳认烫纳翠侵淌毫哉刺镇逻拭腊阿供窥乞