VB历年考试真题有答案.doc

第一章1.在设计阶段，当按Ctrl+R键时，所打开得窗口是（）A）代码窗口B）工具箱窗口C）工程资源管理器窗口D）属性窗口2.在VB集成环境中，可以列出工程中所有模块名称的窗口是（）A）工程资源管理器窗口B）窗体设计窗口C）属性窗口D）代码窗口3.在VB集成环境中，要添加一个窗体，可以单击工具栏上的一个按钮，这个按钮是（）A）B） C） D）4.在Vb集成环境的设计模式下，用鼠标双击窗体上的某个控件打开得窗口是（）A）工程资源管理器窗口B）属性窗口 C）工具箱窗口D）代码窗口5.在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是（）A）B）C）D）6.在设计窗体时双击窗体的任何地方，可以打开得窗口是（）A）代码窗口B）属性窗口C）工程资源管理器窗口D）工具箱窗口7.以下叙述中错误的是（）A）标准模块文件的扩展名是.basB）标准模块文件是纯代码文件C）在标准模块声明中声明的全局变量可以在整个工程中使用D）在标准模块中不能定义过程8.以下叙述中错误的是（）A）打开一个工程文件时，系统自动装入与该工程有关的窗体文件B）保存VB程序时，应分别保存窗体文件及工程文件C）VB应用程序只能解释方式执行D）窗体文件包含该窗体及其控件的属性9.以下关于VB特点的叙述中，错误的是（）A）VB是采用事件驱动编程机制的语言B）VB程序既可以编译运行，也可以解释运行C）构成Vb程序的多个过程没有固定的执行顺序D）VB程序不是结构化程序，不具备结构化程序的三种基本结构10.以下叙述中，错误的是（）A）一个VB应用程序可以包含多个标准模块文件B）一个VB工程可以含有多个窗体文件C）标准模块文件可以属于某个指定的窗体文件D）标准模块文件的扩展名是.bas11.以下叙述中，错误的是（）A）在VB中，对象所能响应的事件是由系统定义的B）对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定C）Vb中允许不同对象使用相同名称的方法D）VB中的对象具有自己的属性和方法12.假定一个VB应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是（）A）只保存窗体模块文件B）分别保存窗体模块、标准模块和工程文件C）只保存窗体模块和标准模块文件D）只保存工程文件13.以下叙述中错误得时（）A）VB是事件驱动型可视化编程工具B）Vb应用程序不具有明显的开始和结束语句C）Vb工具箱中的所有控件都具有宽度(width)和高度(height)属性D）VB中控件的某些属性只能再设计时设置二、填空题1）VB应用程序中标准模块文件的扩展名是 。2）VB程序设计采用的编程机制是 。3）资源文件的扩展名为 。第一章：选择题：1-5:CABDD 6-10:ADCDC 11-15:BBC填空：1) .bas 2)事件驱动3）.res第二章一、选择题1.以下描述错误的是（）A）窗体的标题通过其Caption属性设置B）窗体的名称（Name属性）可以再运行期间修改C）窗体的背景图形通过其Picture属性设置D）窗体最小化时的图标通过其Icon属性设置2.设有如下变量声明语句：Dim a , b as Boolean则下面叙述中正确的是（）A）a 和 b都是布尔型变量B）a是变体型变量，b是布尔型变量C）a是整型变量，b是布尔型变量D）a和b都是变体型变量3.下列可作为VISUA L BASICBA变量的是A）A#A B)4ABCC)?XY D)PRINT_TEXT4)假定编写了如下四个窗体事件的事件过程，则运行应用程序并显示窗体后，已经执行的时间过程是A)LOAD B)ClickC)Lostfocus D)Keypress5窗体form1上有一个名为Command1的命令按钮，以下对应窗体单击事件的事件过程是A)Private sub form1_ click() B)Private sub form_ click()End sub end subC)private command1_click() D)private command1_click()End sub END SUB6在程序运行时，下面的叙述正确的是A)用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_load事件过程B)用鼠标左键单击窗体的标题栏，会执行窗体的Form_click事件过程C)只装入而不显示窗体，也会执行窗体的Form_Load事件过程D)装入窗体后，每次显示窗体时，都会执行窗体的FORM_click事件过程7）在VB中，表达式3*25 mod 3的结果是（）A)1 B)9C)3 D)出现错误提示8）以下叙述中正确的是A)窗体的name属性指定窗体的名称，用来标识一个窗体B)窗体的name属性值是显示在窗体标题栏中的文本C)可以在运行期间改变窗体的name属性值D)窗体的name属性值可以为空9）为了清除窗体上的一个控件，下列正确的操作是A)敲回车键 B）按ESC键C选择（单击）要清除的控件，然后按DEL键D)选择（单击）要清除的控件，然后按回车10）以下叙述中错误的是A)打开一个工程文件时，窗体自动装入与该工程有关的窗体、标准模块等文件B)当程序运行时，双击一个窗体，则触发该窗体的Dblclick事件C）VB应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发11）以下能在窗体Form1的标题栏中显示“VB窗体”的语句是A）Form1.Name=”VB窗体”B）Form1.Title=”VB窗体”C）Form1.Caption=”VB窗体”D）Form1.Text=”VB窗体”12）以下叙述中错误的是A）事件过程是响应特定事件的一段程序B）不同的对象可以具有相同的名称的方法C）对象的方法是执行指定操作的过程D）对象事件的名称可由编写者指定13）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500, 500 End Sub程序运行后，单击命令按钮，执行的操作为A）窗体向左、上方向各移动500B）窗体移动到距屏幕左边界、上边界各500的位置C）命令按钮向左、上方向各移动500D）命令按钮移动到距窗体左边界、上边界各500的位置二、填空题1）对象的Visible属性取值是True或 2）在设计阶段，窗体的Icon属性只能在属性窗口中通过 来设置3）窗体 决定了窗体的外观4） 是Vb的基本运行实体5）对象是具有 和 的实体6）在Vb中，要将一个窗体从内存中卸载，应该使用 语句7）要设置窗体最小化时在Windows任务栏上显示的图标，应该使用窗体的 属性进行设置8）在Vb中，窗体文件的扩展名是 第二章：选择题：1-5：BBDAB 6-10:CAACC 11-15:CDB填空：1）False 2）对话框 3）属性4）对象 5）属性 方法6）Unload 7）Icon 8）.frm全真试题训练一、选择题1.确定一个控件在窗体上的位置的属性是A）Width和heightB）width或heightC）Top和Left D)Top或Left2.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = Visual Me.Text1 = Basic Text1 = Program End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A）VisualB）BasicC）ProgramD）出错3.以下叙述中错误得是A）一个工程可以包括多种类型的文件B）VB应用程序既能以编译方式执行，又能以解释方式执行C）程序运行后，在内存中只能驻留一个窗体D）对于事件驱动型应用程序，每次运行时的执行顺序可以不一样4.如果要改变窗体的标题，则需要设置的属性是A）CaptionB）NameC）BackcolorD）BorderStyle5.以下叙述中错误得是A）双击鼠标可以触发DblClick事件B）窗体或控件的事件的名称可以由编程人员确定C）移动鼠标时，会触发MouseMove事件D）控件的名称可以由编程人员设定6.以下关于窗体的描述中，错误的是A）执行Unload Form1语句后，窗体Form1消失，但仍在内存中B）窗体的Load事件在加载窗体时发生C）当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止D）窗体的Height、Width属性用于设置窗体的高和宽7.以下叙述中正确的是A）窗体的Name属性指定窗体的名称，用来标识一个窗体B）窗体的Name属性的值是显示在窗体标题栏中的文本C）可以在运行期间改变对象的Name属性的值D）对象的Name属性值可以为空8.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是A）单选按钮B）图片框C）通用对话框D）文本框9.在C:Pic文件夹下有一个图形文件，名为Welcome.gif。为了将该图形装入窗体Form1，应使用的正确语句是A）Form1.Caption=”Welcome.gif”B）Form1.Picture=C:picwelcome.gifC）Form1.picture=”C:picwelcome.fig”D）Form1.Picture=LoadPicture(“C:picwelcome.gif”)二、填空题1.用于设置对象背景色得属性是（）2.要使一个控件失效，应该将该控件的（）属性设置为False3.一般来说，同一个窗体中的各个控件的（）属性应该各不相同；如果几个控件具有相同的（）属性，则这些控件称为控件数组。4.由VB预先设置好的、能够被对象识别的动作叫（）5.在界面设计阶段，当对窗体中的对象进行双击操作时，VB会显示该对象的（）窗口6.决定窗体标题栏显示内容的属性是（）7.用来在给定时刻触发事件的控件是（）8.事件可以由用户引发，也可以由系统引发。计时器的Timer事件是由（）引发；鼠标操作是由（）引发。.全真试题训练：选择题：1-5：CCCAB 6-10：AACD填空：1）Backcolor 2)Enabled 3)Name Name 4)事件/过程 5）代码 6）Caption 7）计时器或Timer 8）系统 用户第三章1.设a=2，b=3,c=4,d=5，则下面语句的输出是（）Print 32*b or a=c and bc or cdA）false B ) 1C )trueD ) -12.设a=5,b=6,c=7,d=8，执行语句x=iif(ab) and (cd),10,20)后，x的值是（）A）10 B）20C）30 D）2003.print sgn(-62)+abs(-62)+int(-62)的输出结果是（）A）-36 B）1C）-1D）-724.在窗体上画一个名称为Command1的命令按钮，单击命令按钮时执行如下事件过程：Private Sub Command1_Click()a$ = software and hardwareb$ = Right(a$, 8)c$ = Mid(a$, 1, 8)MsgBox a$, , b$, c$, 1End Sub则在弹出的信息框标题栏中显示的标题是（）A )software and hardware B ) hardware C )softwareD )15.设x是整型变量，与函数iif(x0,-x,x)有相同结果的代数式是（）A）|x|B ) -|x|C ) xD) x6.在窗体文件中有下面的事件过程：Private Sub Command1_Click()Dim sa% = 100Print aEnd Sub其中变量a和b的数据类型分别是（）A）整型，整型B）变体型，变体型C）整型，变体型 D)变体型，整型7.下面程序运行时，若输入395，则输出结果是（）Private Sub Command1_Click()Dim x%x = InputBox(请输入一个3为整数)Print x Mod 10, x 100, (x Mod 100) 10End SubA）3 9 5 B )5 3 9C )5 9 3D )3 5 98.以下变量名中合法的是（）A）x2-1B )printC)str_nD)2x9.把数学表达式表示为正确的Vb表达式应该是（）A）（5x+3）/(2y-y)B )x*5+3/2*y-6C)(5*x+3)(2*y-6)D)(x*5+3)/(2*y-6)10.可以产生30-50（含30和50）之间的随机整数的表达式是（）A）int(rnd*21+30)B)int(rnd*20+30)C)int(rnd*50-rnd*30)D)int(rnd*30+50)11.执行语句dim x ， y as interger 后，A）x和 y均被定义为整型变量B）X和Y均被定义为变体类型变量C）X被定义为整型变量，Y被定义为变体类型变量D）X被定义为变体类型变量，Y被定义为整型变量12.以下关系表达式中，其值为true的是（）A）”XYZ”XYZ”B )”VisualBasic”visualbasic”C)”the”=”there” D)”Interger”Int”13.执行以下程序段A$=”Visual Basic Programming“B$=”C+”C$=Ucase(Left$(a$,7) & B$ & right$(a$,12) 后，变量C$的值为（）A）Visual BASIC ProgrammingB)VISUAL C+ ProgrammingC)Visual C+ ProgrammingD)VISUAL BASIC Programming14.若变量a未事先定义而直接使用（例如：a=0 ），则变量a的类型是（）A）Interger B)StringC)BooleanD)Variant15.为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为（）A）Dim pi as intergerB ) dim pi(7) as interger C)Dim pi as single D )Variant16.表达式2*32 +4*2/2+32的值是（）A）30 B）31 C）49 D）4817以下不能输出”Program”的语句是（）A)print mid(“VBProgram,3,7) B)print right(“VBProgram”,7) C)print mid(“VBProgram”,3) D)print left(“VBProgram”,7)18.以下叙述中错误的是（）A）在通用过程中，多个形式参数之间可以用逗号作为分隔符B）在print方法中，多个输出项之间可以用逗号作为分隔符C）在Dim语句中，所定义的多个变量可以用逗号作为分隔符D）当一行中有多个语句时，可以用逗号作为分隔符19.设a=4,b=5,c=6，执行语句print ab and b=0 and X%100 3) 12,345.68 4)Shanghai 5)cos(a+b)2/(3*x)+5 6)BASIC 7)123456789XXX.XXX(其中，XXX.XXX部分为任意长度的任意字符串） 8）A+X(y+2)*sin(x)全真试题训练选择题1. 以下选项中，不合法的VB的变量名是（） A. a5bB. _xyzC. a_bD. andif2.窗体上有一个名称为text1的文本框，一个名称为command1的命令按钮。窗体文件的程序如下：Private Type x a As Integer b As IntegerEnd TypePrivate Sub Command1_Click() Dim y As x y.a=InputBox(“”) if y.a2=y.a/2 Then y.a=y.a*y.a y.a=Fix(y.a/2) End If Text1.Text=y.bEnd Sub对以上程序，下列叙述错误的是（）A.x是用户定义的类型B.InputBox函数弹出的对话框中没有提示信息C若输入的是偶函数，y.b的值为该偶函数的平方。D.fix（y.a/2）吧y.a/2得小数部分四舍五入，转换为整数返回3.执行以下程序后输出的是Private Sub Command1_Click() Ch$=”ABCDEFGH” Print Mid(Right(ch$,6),Len(Left(ch$,4),2)End SubA.CDEFGHB.ABCD C.FG D.AB4.下面程序执行时，在窗体上显示的是Private Sub Command1_Click()Dim a(10)For k=1 To 10 a(k)=11-kNext kPrinta(a(3)a(7)Mod a(5)EndA.3 B.5 C.7 D.95.下面可以正确定义2个整型变量和1个字符串变量的语句是ADim n,m As Integer,s As StringB.Dim a%,b$,c As StringC. Dim aAs Integer,b,c As StringD. Dim x%,y As Integer,z As Stying6.下列表达式中不能判断x是否为偶数的是A) x/2 =int(x/2) B)x mod 2=0C)fix(x/2)=x/2D)x2=07.设a=2,b=3,c=4,下列表达式的值是（）Not a=c or 4*c=b2 and ba+cA) -1 B)1 C)True D)False8.执行以下程序段后，变量C$的值为（）A$=”Visual Basic Programming”B$=”Quick”C$=b$ & ucase(mid$(a$,7,6) & right$(a$,12)A)Visual BASIC ProgrammingB)Quick Basic ProgrammingC)QUICK Basic ProgrammingD)Quick BASIC Programming9.设有如下语句：Dim a , b as intergerC=”VisualBasic”D=#7/20/2005#以下关于这段代码的叙述中，错误得是A）a被定义为interger类型变量 B）b被定义为integer类型变量C）c中的数据是字符串D）d中的数据是日期类型10.以下能从字符串“Visual Basic”中直接取出子字符串“Basic”的函数是（）A）Left B）Mid C)String D）instr11.设a=4,b=3,c=2,d=1，下列表达式的值是ab+1 or cd and b mod cA)True B)1 C)-1 D)012.以下可以作为Visual Basic变量名的是A）A#A B）counstA C)3A D)?AA13.设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是A）print a=x+yB) print “a=”;x+yC)print “a=”+str(x+y) D)print “A=” & x+y14.设a=2,b=3,c=4,d=5,下列表达式的值是 Not a=c or 4*c=b2 and ba+cA)-1 B)1 C)True D)False15.设a=5,b=10，则执行 c=int(b-a)*rnd+a)+1后，C值得范围为A）510 B)69 C）610 D）5916.在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private sub form_load()Text1.text=”Text2.text=”Text1.setfocusEnd subPrivate sub text1_change()Text2.text=mid(text1.text , 8)End sub程序运行后，如果在文本框Text1中输入 BeijingChina，则在文本框Text2中显示的内容是A）BeijingChina B)China C)Beijing D)BeijingC17.设a=5,b=4,c=3,d=2，下列表达式的值是32*b or a=c and bc or cdA ) 1 B)TrueC)FalseD)2二、填空题1.VB的常量分为（） 和（）2.“Sichuan university”为（）常数；“April 5,2002”为（）常数；#April 5,2002#为（）常数3.VB的变量必须以（）开头4.在立即窗口中输入如下内容：A$=”I love Visual Basic”X=instr(a$,”Visual”)Print x则在立即窗口显示的是（）5.在VB中用（）函数来产生一个01之间的单精度随机数。由于一个随机数序列可能反复出现，VB提供了（）语句来消除这种情况。6.写出一个能产生取值范围为30,45 )的单精度随机数的表达式（）7.数学不等式在VB中表示为（）8.算术表达式 14.33.1 和 14.3 mod 3.1 的值分别是（） 和（）9.数学表达式的VB表达式是（）10.&34567是一个（）进制整型数11.VB的变量名的有效字符为（）个12.Chr$（65）的结果是（）13.abs(sgn(val(“-0.003”)的值为（）14.假设当前日期是2002年11月1日，星期五，有下列语句：Print day(now) Print month(now)Print year(now)Print weekday(now)则执行上面语句后，输出结果分别是（）（）（）（）15.用int函数可以实现数值保留到小数点后某位。如下语句： Int(33.3333333*1000+0.5)/1000 保留到小数点后（）位全真试题：选择题：1-5：BDCDD 6-10：DDDAB 11-15：DBADC 16-20：BB填空:1）符号 文字 2）字符型 字符型 日期型 3）字母 4） 8 5）rnd randomize 6）rnd*15+30 7）x=a and x10000为止。程序运行后，发现得不到正确的结果，必须进行修改。下列修改中正确的是（）A.把x=0改为x=1 B.把Do While s=10000改为Do While s10000D.交换x=x+1和s=s+x2的位置5. 设有如下程序： Private Sub Form_Click() Dim s As Long,f As Long Dim n As Integer,i As Long f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 运行程序后，单击窗体，输出结果是（）A.32 B.33 C.34 D.356. 阅读下面的程序段： a=0 For i=1 To 3 For j=1 To i For k=j To 3 a=a+1 Next k Next j Next i执行上面的程序段后，a的值为（）A3 B.9 C.14 D.217.设窗体上有一个名称为HIS的水平滚动条，如果执行了语句：HIS.Value=(HIS.Max-HIS.Min)/2+HIS.Min则：A. 滚动块处于最左端B. 滚动块处于最右端C. 滚动块处于中间位置D. 滚动块可能处于任何位置，具体位置取决于Max，Min属性的值8.为了使标签具有“透明”的显示效果，需要设置的属性是（）A.Caption B.Alignment C.BackStyle D.AutoSize9窗体上有一个名称为Cb1的组合框，程序运行后，为了输出选中的列表项，应使用的语句是（）A.Print Cb1.Selected B.Print Cb1.List(Cb1.ListIndex)C.Print Cb1.Selected.Text D.Print Cb1.List(ListIndex)10.为了窗体上建立2组单选按钮，并且当程序运行时，每组都可以有一个单选按钮被选中，则以下做法正确的是（）A把这2组单选按钮设置为名称不同的2个控件数组B使2组单选按钮的Index属性分别相同C使2组单选按钮的名称分别相同D把2组单选按钮分别画到2个不同的框架中11.如果一个直线控件在窗体上呈现为一条垂直线，则可以确定的是（） A它的Y1，Y2属性的值相等 B它的X1,X2属性的值相等 C它的X1，Y1属性的值分别与X2，Y2属性的值相等D. 它的X1，X2属性的值分别与Y1，Y2属性的值相等12.窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并且有下面的事件过程： Private Sub Command1_Click() Timer1.Enabled=True End Sub Private Sub Form_Load() Timer1.Interval=10 Timer1.Enabled=False End Sub Private Sub Timer1_Timer() Command1.Left=Command1.Left+10 End Sub 程序运行时，单击命令按钮，则产生的结果是（）A. 命令按钮每10秒向左移动一次B. 命令按钮每10秒向右移动一次C. 命令按钮每10毫秒向左移动一次D. 命令按钮每10毫秒向右移动一次13.设窗体有一个名为List1的列表框，并编写下面的事件过程： Private Sub List_Click() Dim ch As String ch=List.List(List1.ListIndex) List.RemoveItem List1.ListIndex List.AddItem ch End Sub 程序运行时，单击一个列表项，则产生的结果是（）A 该列表项被移动到列表的最前面B 该列表项被删除C 该列表项被移动到列表最后面D 该列表项被删除后又在原位置插入14.下列叙述中错误的是（）A列表框与组合框都有List属性B列表框Selected属性，而组合框没有C. 列表框和组合框都有Style属性D. 组合框有Text属性，而列表框没有15.设窗体有一个命令按钮数组，能够区分数组中各个按钮的属性是（）AName B.Index C.Caption D.Left16.滚动条可以响应的事件是（） A.Load B.Scroll C.Click D.MouseDown17.在窗体上画一个图片框，再画一个命令按钮，位置如图所示。则命令按钮的Top属性值是（） A.200 B.300 C.500 D.70018.在窗体上画一个文本框（名称为Text）和一个标签（名称为Label1），程序运行后，如果在文本框中输入文本，则标签中立即显示相同的内容，以下可以实现上述操作的事件过程是（） A.Private Sub Text1_Change() Label1.Caption=Text1.Text End Sub B.Private Sub Labell_Change() Label1.Caption=Text1.Text End Sub C.Private Sub Text1_Click() Label1.Caption=Text1.Text End SubD.Private Sub Labell_Click() Label1.Caption=Text1.Text End Sub19.下列说法错误的是（） A如果把一个命令按钮的Default属性设置为True，则按回车键与单击该命令按钮的作用相同 B.可以用多个命令按钮组成命令按钮数组 C.命令按钮只能识别单击（Click）事件 D通过设置命令按