第1页(共6页)学习中心/函授站_姓名学号西安电子科技大学网络与继续教育学院2013学年下学期《VB程序设计》期末考试试题(综合大作业)题号一二三四总分题分30202030得分考试说明:1、大作业于2013年12月5日下发,2013年12月21日交回;2、考试必须独立完成,如发现抄袭、雷同均按零分计;3、答案须手写完成,要求字迹工整、卷面干净。一、选择题(每小题1分,共30分)1、下列哪个符号是合法的变量名?()A.12aB.ab+cC.a1D.~ab2、下列哪组代码是实现A和B互换?()A.A=BB=CC=AB.A=CC=AA=BC.C=AA=BB=CD.A=A+BB=B+A3、哪个不是VB的数据类型?()A.doubleB.IntC.singleD.string4、VB中不等于号是()。A.!=B.C.!D.5、不是窗体的属性为()。A.VisibleB.HeightC.wideD.Maxbutton6、对字体倾斜的属性为()。A.FontBoldB.FontsizeC.FontItalicD.visible7、下列哪个是数组的正确表示?()A.x[10]B.x(10)C.10x[10]D.x{10}8、下列不是VB中的数据类型的为()。A.字符串类型B.指针类型C.日期类型D.逻辑类型9、关于语句行,不正确的是()。第2页(共6页)A.一行可以写很多条语句B.每行的字符必须为大写字母C.注释用“单引号”D.每行不需要用分号结束10、启动计时器的属性为()。A.EnabledB.IntervalC.beginD.start11、VB的启动有多种方法,下面不能启动VB的是()。A.使用“开始”菜单中的“程序”命令B.使用“开始”菜单中的“运行”命令,在弹出的对话框中输入VB启动文件的名字C.使用“我的电脑”,在VB所在硬盘驱动器中找到相应的VB文件夹D.先打开VB的“文件”菜单,再按Alt+Q组合键12、VB的工程资源管理器可管理多种类型的文件,下面叙述不正确的是()A.窗体文件的扩展名为.frm,每个窗体对应一个窗体文件B.标准模块是一个纯代码性质的文件,它不属于任何一个窗体C.用户通过类模块来定义自已的类,每个类都用一个文件来保存,其扩展名为.basD.资源文件是一种纯文本文件,可以用简单的文字编辑器来编辑13、下列可以打开文件对话框的操作是()。A.Ctrl+DB.Ctrl+EC.Ctrl+FD.Ctrl+G14、下面对哪一种变量的类型说明符的使用是正确的?()A.Dima:a@=2000B.Dima:a%=50000C.Dima:a&=TrueD.Dima:a$=”OK”15、下列变量名中,合法的变量名是()。A.C24B.ABC.A:BD.1+216、用于获得字符串S从第2个字符开始的3个字符的函数是()。A.Mid$(S,2,3)B.Middle(S,2,3)C.Right$(S,2,3)D.Left$(S,2,3)17、计算结果为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)18、在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:PrivateSubCommand1_Click()A=1234B$=Str$(A)C=Len(B$)PrintCEndSub程序运行后,单击命令按钮,则在窗体上显示的内容是()。A.0B.5C.6D.719、定义变量如下:DimMyVarMyVar=”comeseeme“若在立即窗口中显示MyVar的值,下面正确的是()。A.Debug.PrintMyVarB、PictureBox.PrintMyVarC.Printer.PrintMyVarD、PrintMyVar20、在以下Form1窗体中没有采用的控件是()。A.文本框B.水平滚动条C.框架D.选项按钮21、滚动条控件的LargeChange属性所设置的是()。A.单击滚动条和滚动箭头之间的区域时,滚动条控件value属性值的改变量第3页(共6页)B.滚动条中滚动块的最大移动位置C.滚动条中滚动块的最大移动范围D.滚动条控件无该属性22、设置一个单选按钮(OptionButton)所代表选项的选中状态,应当在属性窗口中改变的属性是()。A.CaptionB.NameC.TextD.value23、在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.textb=Text2.textC=Lcase(a)D=Ucase(b)PrintC;DEndSub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是()。A.abcEFGB.abcefgC.ABCefgD.ABCEFG24、假定窗体上有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为()。A.Label1.BackStyle=0B.Label1.BackStyle=1Label1.BorderStyle=0Label1.BorderStyle=1C.Label1.BackStyle=TrueD.Label1.BackStyle=FalseLabel1.BorderStyle=TrueLabel1.BorderStyle=False25、选中一个窗体,启动菜单编辑器的方法有()。A.单击工具栏中的“菜单编辑器”命令B.执行“工具”菜单中的“菜单编辑器”命令C.按Ctrl+ED.按Shift+Alt+M26、比较图片框(PictureBox)和图像框(Image)的使用,正确的描述是()。A.两类控件都可以设置AutoSize属性,以保证装入的图形可以自动改变大小B.两类控件都可以设置Stretch属性,使得图形根据物件的实际大小进行拉伸调整,保证显示图形的所有部分C.当图片框(PictureBox)的AutoSize自属性为Jlase时,只在装入图元文件(*.wmf)时,图形才能自动调整大小以适应图片框的尺寸D.当图像框(Image)的Stretch属性为True时,图像框会自动改变大小以适应图形的大小,使图形充满图像框27、当利用Line方法进行添加图时,以下正确的说法是()。A.有7种不同的线型,而且不管线宽多少都可以绘制虚线/点划线/点线B.使用Line(100,100)-(1000,1200)和Line(100,100)-Step(900,1100)将绘制两条相同位置的直线C.可利用Line方法添加矩形,如Line(300,300)-(2000,2000),BFD.可利用Line方法添加矩形,如Line(300,300)-(2300,2300),B+F28、下面语句中错误的是()。A.RedimPreserveMatrix(10,Ubound(Matrix,2)+1)第4页(共6页)B.RedimPreserveMatrix(Ubound(Matrix,1)+1,10)C.RedimPreserveDynArray(Ubound(DynArray)+1)D.RedimDynArray(Ubound(DynArray)+1)29、可以惟一标识控件数组中的每一个控件属性的是()。A.NameB.CaptionC.IndexD.Enabled30、()不是VB的文件类控件。A.DriveListBox控件B.KirListBox控件C.FileListBox控件D.MsgBox二、填空题(每空1分,共20分)1、在变量定义时,第一字符必须为____________。2、创建VB应用程序的一般步骤为:创建界面;___________;编写代码;保存工程;___________;检查并排除错误;___________。3、表达式有____________、____________、___________和____________。4、变量有____________和____________之分。5、随机生成一个100~1000的随机整数的表达式是___________________。6、设置计时器事件之间的间隔要通过计时器的__________________属性。7、VB菜单条通常情况下有:文件、编辑、视图、_______、格式、_______、_______、查询、图表、________、_______、窗口、帮助等13项菜单项组成。8、下面程序运行后,输出的结果为__________________。PrivateSubCommand1_Click()A$=”Xi’an”B$=”dalian”C$=”shanghai”C$=Instr(LeftA$,2)+Right$(B$,2),C$)PrintC$EndSub9、窗体中有一公共对话框Comdialog1和一个命令按钮Command1,当单击按钮时打开颜色对话框。请在空白处将程序补充完整。PrivateSubCommand1_Click()ComDialog1._____________EndSub10、在VB中,语句定义符rem定义的是___________________。三、填读程序题(每空5分,共20分)1、用消息框语句实现变量a和b之和:PrivateSubCommand1_Click()Dimaassingle,msgassinglea=InputBox(请输入a的值)b=InputBox(请输入b的值)()EndSub2、用输入框函数从键盘任意输入一个单词,并在一行上重复显示4遍:PrivateSubCommand1_Click()DimaAsString,bAsStringb=请学生输入一个单词a=()第5页(共6页)print()EndSub3、请阅读以下程序,回答在程序运行后,输入2,在窗体显示的结果为():PrivateSubCommand1_Click()DimxAsIntegern=InputBox(Pleaseenteranumber:)Fori=1TonForj=1Toix=x+1NextjPrintxEndSub4、设在工程中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelnumAsString*20EndType在窗体上添加一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。请在[14]和[15]处填入适当的内容,将程序补充完整。PrivateSubCommand1_Click()DimBAs______________Open“c:\Person.txt”ForOutputAs#1B.Name=InputBox(“输入姓名”)B.TelNum=InputBox(“输入电话号码”)___________,B.Name,B.TelNumClose#1四、编程序题(每题10分,共30分)1、编写代码实现三角星面积的计算。2、按照如下对话框的功能,编写正确的可实现的代码。第6页(共6页)3、用VisualBasic打印九九乘法表。