资源描述
天性健君子以自强不息 地势坤君子以厚德载物 第 12 页 共 12 页 VB期末综合练习一、填空题1、计时器事件之间的间隔通过( )属性设置。2、要想在文本框中显示垂直滚动条,必须把( )属性设置为2,同时还应把( )属性设置为( )3、在过程定义中出现的变量名叫做( )参数,而在调用过程时传送给过程的常量,变量,表达式或数组,叫做( )参数。4、VISUAL BASIC 6.0中的控件在窗体上分为3类,它们是( ),( ) 和( )。5、设计弹出式菜单时,先通过_建立菜单,然后将顶层菜单的Visible属性设置为False,最后在代码中通过窗体对象的_方法显示弹出式菜单。 6、indows可公用的对话框有:_、保存文件对话框、颜色设置、字体设置对话框、打印设置对话框、帮助文件六种,可通过调用通用对话框控件的_、ShowSave、ShowColor、_ 、ShowPrint、ShowHelp方法来使用它们。也可通过设置通用对话框控件的_属性来实现。 7、根据文件的存取方式及其组成结构,将文件分成_、_和_。8、由ARRAY()函数建立的数组的名字必须是_类型。9、强制退出DO.LOOP循环语句是_,强制性退出FOR.NEXT语句是_。10、Visual Basic 应用程序由( )、标准模块和( )。11、设置组合框的风格,可用的属性是( ),按钮VALUE属性的值的类型是( )。12、Visual Basic 中,除了可以指定某个窗体作为启动对象之外,还可以指定( )作为启动对象。13、要将MDI应用程序中的普通窗体设置为MDI子窗体,只需要把( )属性设置为( )即可。14、建立弹出式菜单所使用的方法是( ),要为某个菜单项加分隔线,则该菜单的标题项应设为( )。15、为了使计时器控件TIMER1每隔1秒触发一次TIMET事件,应将TIMER1控件的( )属性设置为( ).16、( )类型也称变体类型,是一种通用的、可变的数据类型,它可表示或存储任何一种数据类型。 17、控件数组的名字由_属性指定,而数组中的每个元素由_属性指定.18、为了把一个窗全装入内存,所使用的语句为_;为了清除内存中指定的窗体,所使用的语句为_.19、在VB中,对象的三要素分别是_,_和_.20、在VB中整型数据占_个字节的内存空间,双精度浮点型数据占_个字节的内存空间.21、为了使标签能自动调整大小以显示全部文本内容,应把标签的_属性设置为TRUE.22、确定复选框是否被选中,应访问的属性是_,要让一控件不显示,应将该控件的_属性设置成FALSE。23、对于计时器控件,如果希望每秒产生10个事件,则应将其INTERVAL设置为_。24、若要屏蔽加上的控件对象,则需要设置( )属性的值为FALSE。25、vb6.0分为3种版本,这3种版本是( )、( )和( )。26、如果打开了不需要的菜单或对话框,可以用( )键关闭。27、属性窗口分为4个部分,这4个部分分别是( ),( ),( ),( ),28、在中窗体文件的后缀名为( ),工程文件的后缀名为( )。 29、提供( ) 函数用于将数字字符转换成数值型,提供( )函数用于将数值转换成字符型。 30、工程文件的扩展名是( ),窗体文件的扩展名( )。31、控件数组的名字由( )属性决定,而数组中的每个元素由( )属性决定。32、在3种不同类型的组合框中,只能选择而不能输入的组合框是( )。33、菜单编辑器可分为3部分,即( )、( )和( )。34、Visual Basic的过程有3种,它们是( )过程、( )过程和( )过程。35、为了显示一个窗体,所使用的方法为( ),而为了隐藏一个窗体,所使用的方法为( )。36、VISUAL BASIC 6.0应用程序由( ),( ),( )三种模块组成。37、计时器事件之间的间隔通过( )属性设置。38、要想在文本框中显示垂直滚动条,必须把( )属性设置为2,同时还应把( )属性设置为( )39、在过程定义中出现的变量名叫做( )参数,而在调用过程时传送给过程的常量,变量,表达式或数组,叫做( )参数。40、VISUAL BASIC 6.0中的控件在窗体上分为3类,它们是( ),( ) 和( )。二、单项选择题 1、打开多重窗体应用程序后( )A、打开一个窗体后,其他窗体都会被关闭B、允许同时打开多个窗体C、打开一个窗体后,其他窗体都会被隐藏起来D、在某一时刻只能打开一个窗体2、下列属性中,目录列表框和文件列表框都有的属性是( )A、List B、Path C、Vale D、Patten3、窗体的Caption属性的作用是( )A、确定窗体的名称 B、确定窗体的标题C、 确定窗体的边界类型 D、确定窗体的字体4、下列不属于Visual Basic应用程序所包含文件的是( )A、窗体文件 B、类表文件 C、文本文件 D、工程文件5、设a=2,b=3,c=4,d=5,则表达式ab And c=d And bc Or cd的值是( )A、True B、False C、-1 D、16、为了用键盘打开菜单和执行菜单命令,第一步应按的键是( )A)功能键F10或ALT B)SHIFT+功能键F4 C)CTRL或功能键F8 D)CTRL+ALT7、VISUAL BASIC 6.0窗体设计器的主要功能是( )A)建立用户界面 B)编写源程序代码 C)画图 D)显示文字8、为了确定一个窗体或控件的大小的属性是( )A)WIDTH,TOP B)WIDTH ,HEITHT C)TOP ,WIDTH D)TOP ,LEFT9、下列可作为VISUAL BASIC 6.0的变量名的是( )A)FILENAME B)A(A+B) C)345D D)PRINT10、下列可作为VISUAL BASIC 6.0中所允许的形式的数是( )A)25.74 B)3.457E-100 C)368 D)1.87E+5011、设A=2,B=3,C=4,D=5,下列表达式的值是( )。32*B and A=C and BC or CDA)true B)false C)-1 D)112、决定标签内显示内容的属性是( )A)TEXT B)NAME C)ALIGNMENT D)CAPTION13、以下语句输出的结果是( ) print format(32548.5,”000,000.00”)A)32548.5 B)32,548.5 C)032,548.5 D)32,548.514、表达式4+56*7/8 mod 9的值( ) A)4 B)5 C)6 D)715、“对象”是将数据和程序( )起来的一个逻辑实体。A、连接 B、封装 C、串接 D、伪装16、下列语句错误的是( )A、Text1.Text=List1.TextB、Label1.Caption=List1.TextC、List1.List(1)=List1.Text+List1.ListIndexD、Command1.Caption=List1.Name+List1.Text17、下列可作为Visual Basic 中所允许的形式的数是( )。A、32 B、2.5E C、368 D、12E318、语句Print5*55/5的输出结果是( )A、5 B、25 C、 D、19、图象框有一个属性,可以自动调整图形的大小,以适应图象框的尺寸,这个属性是( )A、Autosize B、Stretch C、AutoRedraw D、Appearance20、下列程序的执行程序结果为( )a=100 b=50 If ab Then a=a+b Else b=b-aENDIF Print a,bA、5050 B、150 50 C、200 200 D、10 1021、在窗体中添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下代码:Private Sub Command1_click() Dim a , Array1(10,10) As Integer Dim i,j as integer For i=1 to 3 For j=2 to 4 Array1(i,j)=i+j Next j Next i Text1.text=array1(2,3)+array1(3,4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是( )A、12 B、13 C、14 D、1522、设置复选框或单选框标题对齐方式的属性是( )A)ALIGN B)ALIGNMENT C)SORTED D)VALUE23、删除列表框中指定的项目所使用的方法为( ) A)MOVE B)REMOVE C)CLEAR D)REMOVEITEM24、当拖动滚动条中的滚动块时,将触发滚动条的事件是( )A)MOVE B)CHANGE C)SCROLL D)SETFOCUS25、用户在组合框中输入或选择的数据可以通过一个属性获得,这个属性是( )A)LIST B)LISTINDEX C)TEXT D)LISTCOUNT26、为了使标签覆盖背景,应把BACKSTRLE属性设置为( )A)0 B)1 C)3 D)427、为了使标签中的内容居中显示,应把ALIGNMENT属性设置为( )A)0 B)1 C)2 D)328、以下程序的输出结果:( )a=sqr(3):b=sqr(2)c=abprint cA)-1 B)0 C)false D)true29、下列关于键盘事件的说法中,正确的是( )A、按下键盘上的任意一个键都会引发KeyPress事件B、主键盘上的1键和数字键的1键的KeyCode码相同C、KeyDown和KeyUP的事件过程中有KeyAscii参数D、主键盘上的4键的上挡字符是$,当同时按下shift键和主键盘上的4键时,KeyPress事件过程中的KeyAscii参数值是$的Ascii值30、以下语句的输入结果为( )a=Sqr(3)b=Sqr(2)c=abprint cA、-1 B、0 C、False D、True31、要使命令按钮成为默认命令按钮,需使用其( )属性。A、Enabled B、Default C、Value D、Cancel32、在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:private Sub Command1_Click()Dim i ,NumRandomizeDo For i=1 TO 1000 Num=Int(Rnd*100) Print Num; Select Case Num Case 12 Exit For Case 58Exit Do Case 65,68,92 End End SelectNext iLoopEnd Sub程序运行后,单击命令按钮,则正确的描述是( )A、Do循环的次数为1000次B、在For循环中产生的随机数小于或等于100C、当所产生的随机数为12时结束所有循环D、当所有的随机数为65、68或92时结束程序33、设有如下程序段:Option Base 1Private Sub Form_Click() Dim arr Arr=Array(10,20,”ABCDE”)For i=3 to 1 Step -1 Print arr(i)Next iEnd Sub程序运行后,单击窗体,在窗体上显示的内容为( )A、ABCDE 20 10 B、10 20 ABCDEC、ABCDE 10 20 D、出错信息34、使用过程是为了( )A、使程序模块化 B、使程序易于阅读C、提高程序运行速度 D、便于系统的编译35、可视化编程的最大优点是( )A、具有标准工具箱 B、一个工程文件由若干个窗体文件组成C、不需要编写大量的代码来描述图形对象 D、所见即所得36、对话框在关闭之前,不能继续执行应用程序的其他部分,这种对话框属于()A、输入对话框 B、输出对话框C、模式(模态)对话框 D、无模式对话框37、假定有以下程序段: for i=1 to 3 for j=5 to 1 step -1 print i*jnext jnext i 则语句PRINT I*J 的执行次数是( ) A)15 B)16 C)17 D)1838、设A=6,则执行X=IFF(A5,-1,0)后的X值为( ) A)5 B)6 C)0 D)-139、下列程序段执行后的结果是: for i=1 to 3for j=1 to i for k=j to 3 a=a+1 next knext jnext i执行上面的3重循环后,a的值为()A)3 B)9 C)14 D)2140、用下面的语句所定义的数组的元素个数是( ) DIM A(-3 TO 5)AS INTEGER A)6 B)7 C)8 D)941、下列叙述中正确的是( )A.只有窗体才是Visual Basic中的对象B.只有控件才是Visual Basic中的对象C.窗体和控件都是Visual Basic中的对象D.窗体和控件都不是Visual Basic中的对象42当窗体被加载时运行,发生的事件是( )ALoad BUnload CResize DDragDrop43用于Visual Basic程序设计的控件在( )A.工程窗口中 B.工具箱中C.工具菜单中 D.工具栏上44.Visual Basic程序中分隔各语句的字符是( )A. B.: C. D._ 45. 假定窗体的名称(Name属性)为Form1,则把窗体的标题设置为“VB Test”的语句为( )A.Form1 = VB Test B.Caption =VB TestC.Form1.Text = VB Test D.Form1.Name =VB Test46.使用驱动器表框的( )属性可以返回或设置磁盘驱动器的名称。A.CAHNGE B.DRIVE C.DIR D.PATH47. 为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效,必须把它的Style属性设置为( )A.0 B.1 C.True D.False48. 为了使标签覆盖背景,应把BackStyle属性设置为( )A.0 B.1 C.True D.False49. 为了使标签中的内容居中显示,应把Alignment属性设置为( )A.0 B.1 C.2 D.350. 下列可以把当前目录下的图形文件pic1.jpg装入窗体FORM1中的语句为( )A.FORM1 = pic1.jpgB.FORM1.Handle = pic1 .jpgC.FORM1.Picture = LoadPicture(pic 1.jpg)D.FORM1 = LoadPicture(pic 1.jpg)51.决定标签内显示内容的属性是( )A.Text B.Name C.Alignment D.Caption52.为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )A.Value B.Default C.Cancel D.Enabled53.为了在按下Esc键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )A.Value B.Default C.Cancel D.Enabled54.在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:Private Sub Command1_Click()a = Text1.Text + Text2.TextPrint aEnd SubPrivate Sub Form_Load()Text1.Text = Text2.Text = End Sub程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321,然后单击命令按钮,则输出结果为( )A.444B.321123C.123321D.13223155.下列可作为Visual Basic的变量名的是( )A.3*Delta B.PrintChar C.Abs D.AB56. 下列可作为Visual Basic中所允许的形式的数是( )A.25.74 B.3.457E-100 C.368 D.1.87E+5057. 设a=2,b=3,c=4,d=5,下列表达式的值是( )ab AND cc A.True B.False C.-1 D.058.以下语句的输出结果是(在立即窗口中)( )a=Beijing b=ShangHai Print a;b A.BeijingShangHaiB.BeijingShangHaiC.BeijingShangHai D.BeijingShangHai59. 语句Print 5*55/5的输出结果是( )A.5 B.25 C.0 D.160.执行下面的语句后,所产生的信息框的标题是( )a=MsgBox(AAAA,BBBB,5)A.BBBB B.空 C.AAAA D.出错,不能产生信息框三、 程序填空 1、请完成打印下列图形的程序:122333444455555FOR I=1 TO 5FOR J=_PRINT _NEXT J_NEXT I2、打印标准的九九表,完成下列程序:FOR I=1 TO 9 FOR J=( )RPINT ( )NEXT J( )NEXT I2、以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时结束输入,然后输出其中的最高分和最低分数。请将其补充完整。PRIVATE SUB FORM-CLICK()DIM X AS SINGLE,AMAX AS SINGLE ,AMIN AS SINGLEX=INPUTBOX(“ENTER A SCORE”)AMAX=XAMIN=XDO WHILE ( )IF XAMAX THEN AMAX=XENDIFIF ( )THENAMIN=XENDIFLOOPPRINT “MAX=”;AMAX,”MIN=”;AMINEND SUB3、产生50个两位随机整数的程序。DIM S AS INGEGERDIM I AS INGEGERRANDOMIZE TIMERFOR I=( )S=( )PRINT S;NEXT I4、编写在窗口上显示如下图形的程序:-其中-表示空格FOR I=( )PRINT ( )FOR J=( )PRINT “*“;NEXT JPRINTNEXT I5、编写求N!的子过程,通过调用此子过程来计算5!+8!-6!Private Sub FORM1_Click()DIM A&.B&,C&,D&CALL JCH(5,A)CALL JCH(8,B)CALL JCH(6,C)_PRINT DEND SUBSUB _DIM I%P=1FOR I=1 TO NP=P*INEXT IEND SUB6、已知一元二次方程的二次项系数、一次项系数、常数项分别为a、b、c,其中a不等于0。修改程序,求方程的根。 要求:如果方程无实数根,则输出“无实数根”,否则输出两个实数根。 Private Sub Command1_Click() Dim a,b,c,d As Single Dim x1,x2 As Single a=Val(Text1.Text) b=Val(Text2.Text) c=Val(Text3.Text) d=b2-4*a*c If d_ Then x1=(-b+Sqr(d)/(2*a) x2=(-b-Sqr(d)/(2*a) Label1.Caption=x1 Label2.Caption=x2 _ Label3.Caption=_ End If End Sub7、修改程序,使能输出: 1-2+3-4+5-6+.+99-100的值 程序如下: Private Sub Command1_Click() s=_ For i=1 To 100 s=s+(-1)(_)*i Next i Print s End Sub8、填充程序,使能输出如下图形: * * * * * * * * * * * * * * * * * * * * * 程序如下: Private Sub Command1_Click() For i=1 to _ For j=1 to _ Print_ Next j _ Next i End Sub 9、下面的程序是求100以内奇数和s的值(S=1+3+5+7.+99)。程序中有三处错误,请更正。 Private Sub Command1_Click() Dim s As Single Dim i As Single s=1 For i=1 to 100 Step 1 s=s*i Next i Print s End Sub 10、完善已写在“执行”按钮的Click事 件下的程序代码, 将代码段中的“常量”、“变量”、“表达式”处分别换成正确的常量值、变量名和具体的表达式,使得当鼠标单击命令按钮“执行”时,显示出满足条件2+4+6+.+x=80 x=x+常量 s=s+变量 Loop Print 表达式 End Sub四、综合题 一)、设计一个程序,窗体中有2个列表框,左侧列表框中列出若干城市名(大连,沈阳,上海,青铜,大同,天山,辽阳)。”显示”按钮用于复原,”清除”按钮用于清除2个列表框中的内容.两个标签的用于显示”全部的城市”,”部分的城市”.1、单击”按钮,某个城市名从左框消失,同进显示在右框中.2、单击”按钮,左框的全部城市名消失,同时全部显示在右框中.3、单击”按钮,某个城市名从右框消失,同进显示在左框中.4、单击”按钮,右框的全部城市名消失,同时全部显示在左框中.按下列步骤进行解答:1、用户界面设计2、属性设置3、代码设计二)北京、南京、西安、昆明四城市的名胜古迹和风景区如下: 北京:天安门广场、故宫、北海公园、颐和园、香山、天坛南京:雨花台、中山陵、明孝陵、灵谷寺、栖霞山、莫愁湖西安:钟楼、大雁塔、小雁塔、半坡博物馆、兵马俑昆明:金殿、西山龙门、安宁温泉、滇池、大观公园 建立一个弹出式菜单,该菜单包括4个命令,分别为“北京”、“南京”、“西安”、“昆明”。程序运行后,单击弹出菜单中某个命令,在标签中显示相应的城市的名字,而在文本框中显示相应的名胜古迹和风景区的名字。按以下步骤进行设计:1、用户界面设计2、控件属性设置3、菜单项属性设置4、代码设计三)在窗体上画一个文本框,把它的NULTILINE属性设为TRUE,通过菜单命令向文本框中输入信息并对文本框中的文本进行格式化。按下述要求建立菜单程序:1、菜单程序含有3个主菜单,分别为“输入信息”,“显示信息”和“格式”。其中:“输入信息”包括两个菜单命令:“输入”,“退出”;“显示信息”包括“显示”、“清除”两个菜单命令。 “格式”包括5个菜单命令:“正常”、“粗体”、“斜体”、“下划线”、“FONT20”。2、“输入”命令的操作是:显示一个输入对话框,在该对话框中输入一段文字;3、“退出”命令的操作是:结束程序的执行;4、“显示”命令的操作是:在文本框中显示输入的文本;5、“清除”命令的操作是:清除文本框中显示的内容;6、“正常”命令的操作是:文本框中的文本用正常字(非粗体、非斜体、无下划线)显示;7、“粗体”命令的操作是:给文本框中的文本用粗体显示;8、“斜体”命令的操作是:文本框中的文本用斜体显示;9、“下划线”命令的操作是:给文本框中的文本加下划线;10、“FONT20”命令的操作是:把文本框中文本字体的大小设置为20。要求:新输入的文本添加到原有文本的后面。按下列步骤进行解答:1、用户界面设计2、控件属性设置3、菜单项属性设置4、代码设计
展开阅读全文