VB选择判断填空
一、单项选择题（25道小题，共25分）
1、VB中工程软件的扩展名为(C )A、ds B、frmC、vbp D、bas
2、把字符串"abcdef "右边的空格去掉应使用( B)函数A、trim B、rtrimC、right D、mid
3、文本框text1的text属性的数据类型是(B )A、整数型B、字符串C、单精度D、双精度
4、下列( B)属性决定窗体标题栏显示内容（1分）A、NameB、CaptionC、TextD、BackStyl
5、命令按钮command1不具有下列哪个事件(B )（1分）A、Click B、KeyPress C、GotFocus D、DblClick
6、为了使文本框同时具有水平和垂直滚动条，应先将MultiLine属性设置为True,然后再把ScrollBars 属性设置为( D)（1分）A、0B、1C、2D、3
7、Dim D(3,1 To 10,1 To 15)语句中，数组的元素个数为(c )A、3*10*16B、3*11*16C、4*10*15D、4*11*15
8、如果整型变量c、d、x的值分别为8、6、0，则下列语句For I=c to d : x=x+i : Next
I 执行结束时，I的值为(A)（1分）A、8B、7C、6D、5
9、假定有以下循环结构Do Until 条件循环体Loop 则正确的描述是( b)（1分）
A、如果"条件"是一个为0的常数，则一次循环体也不执行
B、如果"条件"是一个为0的常数，则至少执行一次循环体
C、如果"条件"是一个不为0的常数，则至少执行一次循环体
D、不论"条件"是否为"真"，至少要执行一次循环体
10、"x是小于100的非负数"，用VB表达式表示正确的是(c )A、0 <= x 0r x < 100B、0 <= x < 100
C、0 <= x And x < 100
D、0 <=x , x < 100
11、下列语句错误的是( d)A、exit forB、exit doC、end subD、exit select
12、Inputbox函数返回的数据类型为( d)A、整型B、逻辑型C、单精度D、字符串
13、假定有以下程序段: For I= 1 To 3: For j = 1 To 5 Step -1:
Print I*j: Next j: Next I 则语句Print I*j 的执行次数是( d)（1分）
A、15
B、18
C、10
D、0
14、如果要清除在窗体中打印输出的文字，可以利用( c)语）A、InputB、LoadC、ClsD、Paint
15、case <表达式表列>,其中的表达式表列不正确的为(d )（1分）A、Case 100*aB、Case 1000 To 2000
C、Case Is<3000
D、Case 2000 16、下列说法错误的是( D)（1分） A、VB声明数组时既可指定上界也可指定下界 B、数组元素类型可以是任意的VB数据类型 C、数组元素的下标可以是数值，也可以是结果在上下界之间的数值表达式 D、VB声明数组时必须指定上界 17、下面的四个数组说明语句语法正确的是(c ) A、DIM X[10]B、DIM EN fn(10) C、DIM X(20) D、DIM ENSION a[10] 18、以下程序段: x = 1: y = 4: Do Until y>4: x = x * y: y = y +1: Loop 执行后x的结果为( b) A、1B、4C、8D、20 19、以下声明和命名标识符错误的是( c)A、必须以字母开头B、变量名的最后一个字符可以是类型声明字符C、长度不能超过8个字符D、不能与关键字同名 20、下列说明错误的是(d )（1分）A、Const MyVar#=123B、Dim myname as stringC、dim a as integer,dim b as singleD、dim MyString="Hello,"+"My friend!" 21、VB中允许出现的数据形式为(b )A、1.89E1.1B、.368C、D32D、2.5E 22、设a=2,b=3,c=4,d=5,下列表达式a>b AND c<=d OR 2*a>c的值是( b)A、TrueB、False C、-1D、1 23、语句6 * 6\6/6的输出结果是( c)A、6B、12C、36D、216 24、给窗体form1加载背景图片，应使用(c ) A、pictureB、ucase C、loadpictureD、image 25、字符串"河南农业大学现教部"的长度是(c )A、18B、10C、9D、16 1、以下叙述中错误的是( A)（1分） A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B、控件的名称可以由编程人员设定 C、窗体文件包含该窗体及其控件的属性 D、Visual Basic 中控件的某些属性只能在运行时设置 2、以下关于窗体的描述中,错误的是( d)（1分） A、窗体的Load事件在加载窗体时发生 B、当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被禁止 C、窗体的Height、width属性用于设置窗体的高和宽 D、执行Unload Form1语句后,窗体Form1消失,但仍在内存中 3、用Static M (60 to 90) As Integer语句定义的数组的元素个数是(c )（1分）A、60 B、30 C、31 D、90 4、如果整型变量a、b的值分别为3和1,则下列语句中For I=a to b : Print I : Next I 循环体的执行次数是(D)（1分）A、3 B、2 C、1 D、0 5、关于语句If x=1 Then y=1 下列正确的说法是(c )（1分） A、x=1和y=1均为赋值语句 B、x=1和y=1均为关系表达式 C、x=1为关系表达式,y=1为赋值语句 D、y=1为关系表达式,x=1为赋值语句 6、用情况选择语句Select Case X,选择|X| >10情况的语句为Case(A)（1分） A、Not (-10 To 10) B、10 To -10 C、Is < -10, Is >10 D、ABS(X) > 10 7、下列哪条语句是错的( c )（1分） A、RTrim() B、Exit Function C、Exit While D、Exit Do 8、在Visual Basic中下面的四个数组声明语句,正确的是( c)（1分） A、Dim a[10] B、Def fn(10) C、Dim a(10) D、Dimension a(10) 9、阅读下面的程序段For i=1 To 3:For j=1 To i:For k=j To 3 :a=a+2:Next :Next:Next 执行上面的三重循环后,a 的值为( c)（1分） A、26 B、27 C、28 D、29 10、下面说法错误的是( b )（1分） A、对象的性质和状态值称为"属性" B、请求对象执行某一操作的要求称为"消息" C、改变对象的一个或多个属性值的操作称为"事件" D、对象发生某事件所执行的程序称为事件驱动程序 11、若使用文本框Text1,为对用户输入内容进行立即检查,应对Text1的哪个事件编程( a )（1分） A、Change B、Interval C、Left D、Top 12、如果数据包含小数,则不应定义为下列哪种类型(c )（1分） A、Double B、Single C、Byte D、Currency 13、下列程序段s=0:for i=9 to 42 step 11:s=s+i:next:if i>50 then s=s+i else s=s-i 运行后s的结果为( d)（1分） A、167 B、139 C、144 D、155 14、有如下程序,m$ ="ABCDE":MID(m$, 1 ,5)="abcde":Print m$,运行后的输出结果是( a )（1分） A、abcdeABCDE B、ABCDEabcde C、abcde D、ABCDE 15、在下列四个式子中,非法的Visual Basic表达式是( c)（1分） A、a=b+e B、5>3+3 C、a=exp D、5<>5 16、表达式INT(6*RND+1)*(INT(6*RND－1))值的范围是( b )（1分） A、[-6,18] B、[-6,24] C、[-3,24] D、[-3,18] 17、字符串"计算机技术基础"的长度是,应使用下列(c )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为( b )（1分） A、false B、true C、0 D、-1 19、下列叙述中正确的是(c )（1分） A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程 C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程 D、在调用过程时,所有局部变量被系统初始化为0或空符串 20、下面的变量名合法的是(c )（1分） A、https://www.wendangku.net/doc/9b15723596.html, B、k%name C、name D、k-name 21、在Visual Basic中,下面四个数据,数据形式错误的是(D )（1分） A、3.456# B、236! C、1.23D-23 D、1.89E1.1 22、已知C>D,S>T,正确表示它们之间关系的式子是( B)（1分） A、Sgn(D-C)-Sgn(S-T)>0 B、Sgn(D-C)-Sgn(S-T)=-2 C、Sgn(D-C)-Sgn(S-T)=0 D、Sgn(D-C)-Sgn(S-T)=1 23、表达式Int(Rnd*11)+100的值的范围是( b)（1分） A、[11,111] B、[100,110] C、[11,100] D、[100,111] 24、下列关于属性设置的叙述正确的是(d )（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、Visual Basic中没有提供下列( d)事件（1分） A、MouseDown B、MouseUp C、MouseMove D、MouseExit 1、如果一个工程喊有多个窗体，则一下叙述中错误的是A、不可以在运行期间改变对象的Name属性的值B、用Hide 方法只是隐藏一个窗体,不能从内存中清除该窗体C、任何时刻最多只有一个窗体是活动窗体D、窗体的Name属性的值是显示在窗体标题栏中的文本 2、下列不能打开属性窗口的操作是(c )（1分） A、执行“视图”菜单中的"属性窗口"命令 B、按F4键 C、按Ctrl+T D、单击工具栏上的"属性窗口"按钮 3、用Dim S (20) As Integer语句定义的数组的元素个数是(C )（1分） A、19 B、20 C、21 D、22 4、如果整型变量a、b的值分别为3和1,则下列语句中For I=a to b : Print I : Next I 循环体的执行次数是( D)（1分） A、3 B、2 C、1 D、0 5、关于语句If x=1 Then y=1 下列正确的说法是(C)（1分） A、x=1和y=1均为赋值语句 B、x=1和y=1均为关系表达式 C、x=1为关系表达式,y=1为赋值语句 D、y=1为关系表达式,x=1为赋值语句 6、用情况选择语句Select Case X,选择|X| >10情况的语句为Case(A )（1分） A、Not (-10 To 10) B、10 To -10 C、Is < -10, Is >10 D、ABS(X) > 10 7、在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是( a )（1分） A、Private Sub Text1_GotFocus( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub B、Private Sub Text1_LotFocus( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub C、Private Sub Text1_Change( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub D、Private Sub Text1_SetFocus( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub 8、在Visual Basic中下面的四个数组声明语句,正确的是(C )（1分） A、Dim a[10] B、Def fn(10) C、Dim a(10) D、Dimension a(10) 9、假设有以下程序段For I=1 to 3:For j=7 to 1 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是( B)（1分） A、21 3 0 B、21 4 0 C、20 3 0 D、20 4 0 10、如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( c )（1分） A、发生一个运行时错误 B、发生一个编译时错误 C、在所有的初始化代码运行后Form1是活动窗体 D、在所有的初始化代码运行后Form2是活动窗体 11、以下控件中可以入选为容器控件的是( b)（1分） A、Image图像框控件 B、PictureBox图片框控件 C、TextBox文本框控件 D、ListBox列表框控件 12、假设变量bool_x是一个布尔型(逻辑型)的变量,则下面正确的赋值语句是( D )（1分） A、bool_x="False" B、bool_x=.False. C、bool_x=#False# D、bool_x=False 13、下列程序段If (2 * 2 = 5) < (2 * 2 = 4) Then:Print "True is greater than false":Else:Print "False is greater than true"的运行结果是(B ) A、True is greater than false B、False is greater than true C、False D、True 14、有如下程序,For j=1 TO 20 :a=a+j\7 :Next运行结束时a的值是(A ) （1分） A、21 B、41 C、63 D、210 15、在下列四个式子中,非法的Visual Basic表达式是(C )（1分） A、a=b+e B、5>3+3 C、a=exp D、5<>5 16、表达式INT(4*RND+2)*(INT(4*RND－2))值的范围是( C)（1分） A、[-10,8] B、[-4,8] C、[-10,5] D、[4,8] 17、要统计出字符串"计算机技术基础visual basic"的长度,应使用下列( C)函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式25\3 mod 3.2*int(2.5)的值为(B )（1分） A、1 B、2 C、3 D、5 19、Dim b1,b2 as boolean语句显式声明变量( d )（1分）!!!!!!! A、b1和b2都为布尔型变量 B、b1是整型,b2是布尔型变量 C、b1和b2都为是可变型变量 D、b1是可变型,b2是布尔型变量 20、下列哪一个是Visual Basic合法变量名( d )（1分） A、IF B、7AB C、A[B]7 D、AB7 21、用变量a存放数据888666.666888,应将变量a的类型定义为(D )（1分） A、Long B、Integer C、Single D、Double 22、下面逻辑表达式值为真的是( C)（1分） A、"A" > "a" B、"9" > "a" C、"That" > "Thank" D、12>12.1 23、函数String(n,"str")的功能是(B )（1分） A、把数值型数据转换为字符串 B、返回由n个字符组成的字符串 C、从字符串中取出n个字符 D、从字符串中第n个字符的位置开始取子字符串 24、如果希望一个窗体在显示的时候没有边框,应该设置的属性是( b )（1分） A、将窗体的Caption设成空字符 B、将窗体的BorderStyle置成None C、将窗体的Enabled属性置成False D、将窗体的ContalBox置成False 25、( b )对象能使用print方法（1分） A、文本框 B、图片框 C、命令按钮 D、标签 1、以下叙述中错误的是(b )（1分） A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体 D、事件可以由用户引发,也可以由系统引发 2、在设计阶段,当双击窗体上的某个控件时,所打开的窗口是( C)（1分） A、工程资源管理器窗口 B、工具箱窗口 C、代码窗口 D、属性窗口 3、用Static M (60 to 90) As Integer语句定义的数组的元素个数是(C )（1分） A、60 B、30 C、31 D、90 4、如果整型变量c、d的值分别为10和5,则下列语句中For I=c to d : Print I : Next I 循环体的执行次数是(D )（1分） A、6 B、5 C、1 D、0 5、a和b中有且只有一个为0,可以用以下的表达式来表示( B)（1分） A、a=0 or b=0 B、a*b=0 and a+b<>0 C、a*b=0or a+b≠0 D、a=0 and not b=0 and b=0 and not a=0 6、用情况选择语句Select Case X,选择|X| >10情况的语句为Case(A )（1分） A、Not (-10 To 10) B、10 To -10 C、Is < -10, Is >10 D、ABS(X) > 10 7、设a=10,b=5,c =1,执行语句a > b > c结果是( A)（1分） A、True B、False C、1 D、出错信息 8、在Visual Basic中下面的四个数组声明语句,正确的是( C)（1分） A、Dim a[10] B、Def fn(10) C、Dim a(10) D、Dimension a(10) 9、假设有以下程序段For I=1 to 3:For j=5 to 1 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是(15,4,0 )（1分） A、12 3 0 B、13 3 1 C、12 4 0 D、13 4 1 10、创建Visual Basic应用程序的主要步骤是：①创建应用程序界面②设置控件③设置属性④编写代码,其中正确的步骤是( d )（1分）!!!!!!!!!!!!!!! A、①②③④ B、①②④ C、②③④ D、①③④ 11、为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )（1分） A、Value B、Default C、Cancel D、Enabled 12、如果数据包含小数,则不应定义为下列哪种类型(C )（1分） A、Double B、Single C、Byte D、Currency 13、下列程序段s=0:for i=9 to 42 step 11:s=s+i:next:if i>50 then s=s+i else s=s-i 运行后s的结果为( )（1分） A、167 B、139 C、144 D、155 14、有如下程序For x=1 TO 2:For y=0 TO x-1:Print x*y:Next:Next,内层循环的循环体的总执行次数是( )（1分） A、1 B、2 C、3 D、4 15、在下列四个式子中,非法的Visual Basic表达式是( C)（1分） A、a=b+e B、5>3+3 C、a=exp D、5<>5 16、表达式INT(4*RND+2)*(INT(4*RND－2))值的范围是( C)（1分） A、[-10,8] B、[-4,8] C、[-10,5] D、[4,8] 17、要统计出字符串"计算机技术基础visual basic"的长度,应使用下列( C)函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为(B )（1 A、false B、true C、0 D、-1 19、下列哪个关键字声明的局部变量在整个程序运行中一直存在( C) A、Dim B、Public C、Static D、Private 20、下面的变量名合法的是( C)（1分） A、https://www.wendangku.net/doc/9b15723596.html, B、k%name C、name D、k-name 21、Visual Basic中不允许出现的数据形式为(C)（1分） A、4.56E-3 B、.368 C、D32 D、0.258 22、设a=2,b=4,c=6,下列表达式值为真的是( C)（1分） A、a>b And c B、a>b Or c C、aa D、b>c Or c 23、要使变量x赋值为1到100间(含1,不含100)的一个随机整数,正面语句正确的是(A )（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 24、下列关于属性设置的叙述正确的是( d )（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、使文本框获得焦点的方法是( B)（1分） A、Change B、GotFocus C、SetFocus D、LostFocus 1、以下叙述中正确的是(C )（1分） A、可以在运行期间改变对象的Name属性的值 B、窗体的Name属性的值是显示在窗体标题栏中的文本 C、窗体的Name属性指定窗体的名称,用来标识一个窗体 D、对象的Name属性可以为空 2、下列不能打开属性窗口的操作是( )（1分） A、执行“视图”菜单中的"属性窗口"命令 B、按F4键 C、按Ctrl+T D、单击工具栏上的"属性窗口"按钮 3、用Dim A (1 to 15) As Integer语句定义的数组的元素个数是(B )（1分） A、14 B、15 C、16 D、17 4、执行下面的程序x=30 :For i=1 To 20 Step ( ):x=x+i\5:Next i 后,X的值为64,则Step为(D )（1分） A、1 B、2 C、3 D、4 5、关于语句If c=2 Then d=2 下列正确的说法是(C )（1分） A、c=2和d=2均为赋值语句 B、c=2和d=2均为关系表达式 C、c=2为关系表达式,d=2为赋值语句 D、d=2为关系表达式,c=2为赋值语句 6、如下程序,n = 10:Select Case n:Case 1 To 20:x = 10:Case 2, 4, 6:x = 20:Case Is < 10:x = 30:Case 10:x = 40:End Select:Text2.Text = x程序运行后,则在Text2中显示的内容为( )（1分）？？？？？？？？？？？？？？？ A、10 B、20 C、30 D、40 7、下列哪条语句是正确的(B )（1分） A、Exit While B、End Sub C、For loop D、Do Exit 8、下列数组声明正确的是( )（1分） A、n=6 : Dim a (1 to n) as integer B、Dim a(10) as integer : ReDim a(1 to 12) C、Dim a() as single : ReDim a(3,6) as integer D、Dim a() as integer : n=6 : ReDim a(1 to n) as integer 9、假设有以下程序段For I=1 to 3:For j=8 to 2 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是(B )（1分） A、21 4 0 B、21 4 1 C、22 4 0 D、22 4 1 10、下列说法正确的是(B )（1分） A、即使数据类型为Variant,数组中的元素类型也必须保持一致 B、数据类型为Variant时,数组中的元素可以包含不同的类型 C、在数组中如果使用Option Base 1语句,则缺省的下界为0 D、在数组中如果没有使用Option Base语句,则缺省的下界为1 11、假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是( c )（1分） A、Print 26 B、Picture1.Print 26 C、Text1.Print 26 D、Debug.Print 26 12、在Visual Basic中单精度的类型说明符为(C 13、"输入一个正数x,并判断x的开平方是否为整数"的语句为( c )（1分） A、x >0 and sqr(x)=chr(x) B、x >0 or sqr(x)=abs(x) C、x >0 and sqr(x)=fix(sqr(x)) D、x >0 or sqr(x)=int(sqr(x)) 14、在如下语句中,d$="123":f="456",则d+f$的结果是( ) A、123456 B、"123456" C、123+"456" D、显示出错信息 15、在Visual Basic中,下面的四个语句中正确的是( )（1分） A、Log(sin(-1)) B、c=abs C、Print TAB(10)"QB" D、a=b=c 16、表达式INT(4*RND+2)*(INT(4*RND－2))值的范围是(C )（1分） A、[-10,8] B、[-4,8] C、[-10,5] D、[4,8] 17、要统计出字符串"计算机技术基础visual basic"的长度,应使用下列(C )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为( )（1分） A、false B、true C、0 D、-1 19、下列叙述中正确的是( c )（1分） A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程 C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程 D、在调用过程时,所有局部变量被系统初始化为0或空符串 20、以下哪一个是变量名是错误的( c )（1分） A、我你他 B、ABC C、AB.C D、A123 21、下列可作为Visual Basic允许的数据形式的是( A )（1分） A、10^(1.256) B、D32 C、2.5E D、12E3 22、已知C>D,S>T,正确表示它们之间关系的式子是(B)（1分） A、Sgn(D-C)-Sgn(S-T)>0 B、Sgn(D-C)-Sgn(S-T)=-2 C、Sgn(D-C)-Sgn(S-T)=0 D、Sgn(D-C)-Sgn(S-T)=1 23、要使变量x赋值为1到100间(含1,不含100)的一个随机整数,正面语句正确的是(A )（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 24、下列关于属性设置的叙述正确的是(D)（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、Visual Basic中没有提供下列(D )事件（1分） A、MouseDown B、MouseUp C、MouseMove D、MouseExit 1、以下叙述中错误的是(A )（1分） A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B、控件的名称可以由编程人员设定 C、窗体文件包含该窗体及其控件的属性 D、Visual Basic 中控件的某些属性只能在运行时设置 2、Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是( B)（1分） A、属性、控件和方法 B、属性、事件和方法 C、窗体、控件和过程 D、控件、过程和模块 3、用Static M (2 to 10) As Integer语句定义的数组的元素个数是( B)（1分） A、8 B、9 C、10 D、11 4、如果整型变量c、d的值分别为6和9,则下列语句中For I=c to d step -3: Print I : Next I 循环体的执行次数是(D )（1分） A、6 B、9 C、4 D、0 5、设有以下循环结构Do : 循环体: Loop While <条件> ,则以下叙述中错误的是( A（1分） A、若"条件"是一个为0的常数,则一次也不执行循环体 B、"条件"可以是关系表达式、逻辑表达式或常数 C、循环体中可以使用Exit Do语句 D、如果"条件"总是为True,则不停地执行循环体 6、假设x的值为5,则在执行以下语句时,其输出结果为"OK"的Select Case的语句是(C)（1分） A、Select Case x : case 10 to 1 : Print "OK" : End select B、Select Case x : case Is>5,Is<5 : Print "OK" : End select C、Select Case x : case Is>5,1,3 to 10 : Print "OK" : End select D、Select Case x : case 1,3 Is>5 : Print "OK" : End select 7、如下程序Do while i<=100:s=s+i: loop运行后的输出结果是(C )（1分） A、5050 B、5051 C、死循环,无输出 D、无穷大的数 8、下列数组声明正确的是( D)（1分） A、r=8 : Dim a (1 to r) as integer B、Dim a(10) as integer : ReDim a(1 to x) C、Dim a(x) as single : ReDim a(3,6) as integer D、Dim a() as integer : x=8 : ReDim a(1 to x) as integer 9、假设有以下程序段For I=1 to 3:For j=7 to 1 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是(D )（1分） A、21 3 0 B、21 4 0 C、20 3 0 D、20 4 0 10、创建Visual Basic应用程序的主要步骤是：①创建应用程序界面②设置控件③设置属性④编写代码,其中正确的步骤是(D )（1分） A、①②③④ B、①②④ C、②③④ D、①③④ 11、若使用文本框Text1,为对用户输入内容进行立即检查,应对Text1的哪个事件编程(A)（1分） A、Change B、Interval C、Left D、Top 12、如果数据包含小数,则可定义为下列哪种类型( D)（1分） A、integer B、string C、Byte D、Currency 13、以下能够正确计算1*2*3*…*n的程序是( C)（1分） A、n=10 : s=1 : Do : s=s*i : i=i+1 : Loop While i B、n=10 : s=1 : i=1 : Do : s=s*i : i=i+1 : Loop While i C、n=10 : s=1 : i=1 : Do : s=s*i : i=i+1 : Loop while i<=n D、n=10 : s=1 : i=1 : Do : s=s*i : i=i+1 : loop While i>n 14、有如下程序For x=1 TO 2:For y=0 TO x-1:Print x*y:Next:Next,内层循环的循环体的总执行次数是(C )（1分） A、1 B、2 C、3 D、4 15、下列语句中合法的是(B )（1分） A、Print a=spc B、Print "SIN(3.14)"+"COS(3.14)" C、Print TAB(10)"QB" D、Print USING"####",1234.56 16、表达式INT(4*RND+1)*(INT(4*RND－1))值的范围是(D )（1分） A、[0,8] B、[-1,8] C、[-3,8] D、[- 4,8] 17、要统计出字符串"VB计算机技术基础"的长度,应使用下列C )函数 A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为(B )（1 A、false B、true C、0 D、-1 19、下列叙述中正确的是( c )（1分） A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程 C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程 D、在调用过程时,所有局部变量被系统初始化为0或空符串 20、下面哪一种变量名是错误的(d )（1分） A、我们 B、a123 C、abc D、a-1 21、在Visual Basic中,下面四个数据,数据形式错误的是( d )（1分 A、3.456# B、236! C、1.23D-23 D、D36 22、设a=2,b=4,c=6,下列表达式值为真的是(C )（1分） A、a>b And c B、a>b Or c C、aa D、b>c Or c 23、数学表达式lg6 在Visual Basic中的正确表示是(D )（1分） A、ln(6)/ln(10) B、log(10)/log(6) C、log(6)/ln(10) D、Log(6)/ Log(10) 24、如果希望一个窗体在显示的时候没有边框,应该设置的属性是(B ) A、将窗体的Caption设成空字符 B、将窗体的BorderStyle置成None C、将窗体的Enabled属性置成False D、将窗体的ContalBox置成False 25、(B)对象能使用print方法（1分） A、文本框 B、图片框 C、命令按钮 D、标签 1、以下叙述中正确的是( C)（1分） A、可以在运行期间改变对象的Name属性的值 B、窗体的Name属性的值是显示在窗体标题栏中的文本 C、窗体的Name属性指定窗体的名称,用来标识一个窗体 D、对象的Name属性可以为空 2、下列不能打开属性窗口的操作是( )（1分） A、执行“视图”菜单中的"属性窗口"命令 B、按F4键 C、按Ctrl+T D、单击工具栏上的"属性窗口"按钮 3、用Dim A (1 to 15) As Integer语句定义的数组的元素个数是(B )（1分） A、14 B、15 C、16 D、17 4、执行下面的程序x=30 :For i=1 To 20 Step ( ):x=x+i\5:Next i 后,X的值为64,则Step为( D)（1分） A、1 B、2 C、3 D、4 5、关于语句If c=2 Then d=2 下列正确的说法是( D)（1分） A、c=2和d=2均为赋值语句 B、c=2和d=2均为关系表达式 C、c=2为关系表达式,d=2为赋值语句 D、d=2为关系表达式,c=2为赋值语句6、如下程序,n = 10:Select Case n:Case 1 To 20:x = 10:Case 2, 4, 6:x = 20:Case Is < 10:x = 30:Case 10:x = 40:End Select:Text2.Text = x程序运行后,则在Text2中显示的内容为( )（1分） A、10 B、20 C、30 D、40 7、下列哪条语句是正确的(B )（1分） A、Exit While B、End Sub C、For loop D、Do Exit 8、下列数组声明正确的是(D )（1分） A、n=6 : Dim a (1 to n) as integer B、Dim a(10) as integer : ReDim a(1 to 12) C、Dim a() as single : ReDim a(3,6) as integer D、Dim a() as integer : n=6 : ReDim a(1 to n) as integer 9、假设有以下程序段For I=1 to 3:For j=8 to 2 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是(B )（1分） A、21 4 0 B、21 4 1 C、22 4 0 D、22 4 1 10、下列说法正确的是( B)（1分） A、即使数据类型为Variant,数组中的元素类型也必须保持一致 B、数据类型为Variant时,数组中的元素可以包含不同的类型 C、在数组中如果使用Option Base 1语句,则缺省的下界为0 D、在数组中如果没有使用Option Base语句,则缺省的下界为1 11、假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是(C )（1分） A、Print 26 B、Picture1.Print 26 C、Text1.Print 26 D、Debug.Print 26 12、在Visual Basic中单精度的类型说明符为(C )（1分） A、% B、# C、! D、& 13、"输入一个正数x,并判断x的开平方是否为整数"的语句为( C)（1分） A、x >0 and sqr(x)=chr(x) B、x >0 or sqr(x)=abs(x) C、x >0 and sqr(x)=fix(sqr(x)) D、x >0 or sqr(x)=int(sqr(x)) 14、在如下语句中,d$="123":f="456",则d+f$的结果是( B) （1分） A、123456 B、"123456" C、123+"456" D、显示出错信息 15、在Visual Basic中,下面的四个语句中正确的是( )（1分） A、Log(sin(-1)) B、c=abs C、Print TAB(10)"QB" D、a=b=c 16、表达式INT(4*RND+2)*(INT(4*RND－2))值的范围是(C )（1分） A、[-10,8] B、[-4,8] C、[-10,5] D、[4,8] 17、要统计出字符串"计算机技术基础visual basic"的长度,应使用下列(C )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为( B)（1分） A、false B、true C、0 D、-1 19、下列叙述中正确的是( C)（1分） A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程 C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程 D、在调用过程时,所有局部变量被系统初始化为0或空符串 20、以下哪一个是变量名是错误的(C )（1分） A、我你他 B、ABC C、AB.C D、A123 21、下列可作为Visual Basic允许的数据形式的是( A)（1分） A、10^(1.256) B、D32 C、2.5E D、12E3 22、已知C>D,S>T,正确表示它们之间关系的式子是( B)（1分） A、Sgn(D-C)-Sgn(S-T)>0 B、Sgn(D-C)-Sgn(S-T)=-2 C、Sgn(D-C)-Sgn(S-T)=0 D、Sgn(D-C)-Sgn(S-T)=1 23、要使变量x赋值为1到100间(含1,不含100)的一个随机整数,正面语句正确的是( A)（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 24、下列关于属性设置的叙述正确的是(D)（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、Visual Basic中没有提供下列(D )事件（1分） A、MouseDown B、MouseUp C、MouseMove D、MouseExit 1、以下叙述中错误的是( d)（1分） A、事件可以由用户引发,也可以由系统引发 B、窗体文件包含该窗体及其控件的属性 C、移动鼠标时,会触发MouseMove事件 D、Visual Basic应用程序只能以解释方式执行 2、下列不能打开属性窗口的操作是(c)（1分） A、执行“视图”菜单中的"属性窗口"命令 B、按F4键 C、按Ctrl+T D、单击工具栏上的"属性窗口"按钮 3、用Dim S (20) As Integer语句定义的数组的元素个数是(c )（1分）A、19 B、20 C、21 D、22 4、如果整型变量c、d的值分别为6和9,则下列语句中For I=c to d step -3: Print I : Next I 循环体的执行次数是(d )（1分） A、6 B、9 C、4 D、0 5、假定有以下循环结构Do Until <条件> : 循环体:Loop ,则正确的描述是( b)（1分） A、如果"条件"是一个为0的常数,则一次循环体也不执行 B、如果"条件"是一个为0的常数,则至少执行一次循环体 C、如果"条件"是一个不为0的常数,则至少执行一次循环体 D、不论"条件"是否为"真",至少要执行一次循环体 6、下列程序段中,能正常结束循环的是( c)（1分） A、I = 1 : Do : I = I + 2 : Loop Until I = 10 B、I = 5 : Do : I = I + 1 : Loop Until I < 0 C、I = 10 : Do : I = I + 1 : Loop Until I > 0 D、I = 6 : Do : I = I - 2 : Loop Until I = 1 7、下列哪条语句是正确的(b )（1分） A、Exit While B、End Sub C、For loop D、Do Exit 8、下列数组声明正确的是( d)（1分） A、t=15 : Dim a (1 to t) as integer B、Dim a(15) as integer : ReDim a(1 to t) C、Dim a(t) as single : ReDim a(3,6) as integer D、Dim a() as integer : t=15 : ReDim a(1 to t) as integer 9、假设有以下程序段For I=1 to 3:For j=5 to 1 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是(c )（1分） A、12 3 0 B、13 3 1 C、12 4 0 D、13 4 1 10、下列说法正确的是( b )（1分） A、即使数据类型为Variant,数组中的元素类型也必须保持一致 B、数据类型为Variant时,数组中的元素可以包含不同的类型 C、在数组中如果使用Option Base 1语句,则缺省的下界为0 D、在数组中如果没有使用Option Base语句,则缺省的下界为1 11、若使用文本框Text1,为对用户输入内容进行立即检查,应对Text1的哪个事件编程(A)（1分 A、Change B、Interval C、Left D、Top 12、在Visual Basic中长整型的类型说明符为(d )（1分） A、# B、! C、% D、& 13、下列程序段If (2 * 2 = 4) < (2 * 2 = 5) Then:Print "True is greater than false":Else:Print "False is greater than true"的运行结果是(b )（1分） A、False is greater than true B、True is greater than false C、False D、True 14、在如下语句中,d$="123":f="456",则d+f$的结果是(b ) （1分） A、123456 B、"123456" C、123+"456" D、显示出错信息 15、在下列四个式子中,非法的Visual Basic表达式是(c )（1分） A、a=abs B、5>3+3 C、a+b=c D、5<>5 16、表达式INT(4*RND+2)*(INT(4*RND－2))值的范围是( c)（1分） A、[-10,8] B、[-4,8] C、[-10,5] D、[4,8] 17、要把字符串" 计算机技术基础"左边所包含的空格去掉应使用下列( c)函数（1分） A、LINSTR B、LSTR C、LTRIM D、RTRIM 18、表达式25\3 mod 3.2*int(2.5)的值为(b )（1分） A、1 B、2 C、3 D、5 19、下列哪个关键字声明的局部变量在整个程序运行中一直存在(C ) A、Dim B、Public C、Static D、Private 20、下列可作为Visual Basic合法变量名的是( d)（1分） A、4*Delta B、A-lpha C、4ABC D、AB 21、Visual Basic中,下面四个数据形式中错误的是(b )（1分） A、123.456# B、1234! C、1.23D-23 D、1.89E1.1 22、下列逻辑表达式值为假的是(b )（1分） A、"a" > "A" B、"b" = "B" C、"3" < "4" D、"Y" = "Y" 23、要使变量x赋值为1到100间(含1,不含100)的一个随机整数,正面语句正确的是(A )（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 24、下列哪个属性,决定文本框内的内容是否允许修改(B)（1分） A、Text B、Locked C、PasswordChar D、Multiline 25、当程序运行时,在窗体上单击鼠标,以下哪个事件(d )是窗体不会接收到的（1分） A、MouseDown B、MouseUp C、Click D、Load 1、以下叙述中错误的是( d)（1分） A、双击鼠标可以触发DblClick事件 B、窗体或控件的事件名称可以由编程人员确定 C、移动鼠标时,会触发MouseMove事件 D、控件的名称可以由编程人员设定 2、下列不能打开属性窗口的操作是(c )（1分） A、执行“视图”菜单中的"属性窗口"命令 B、按F4键 C、按Ctrl+T D、单击工具栏上的"属性窗口"按钮 3、用Dim A(-3 To 5)As Integer语句所定义的数组的元素个数是(d )（1分） A、6 B、7 C、8 D、9 4、如果整型变量c、d的值分别为8和6,则下列语句中For I=c to d : Print I : Next I 循环体的执行次数是( d)（1分） A、3 B、2 C、1 D、0 5、设有以下循环结构Do : 循环体: Loop While <条件> ,则以下叙述中错误的是(a )（1分） A、若"条件"是一个为0的常数,则一次也不执行循环体 B、"条件"可以是关系表达式、逻辑表达式或常数 C、循环体中可以使用Exit Do语句 D、如果"条件"总是为True,则不停地执行循环体 6、用情况选择语句Select Case X,选择|X| >10情况的语句为Case(A)（1分） A、Not (-10 To 10) B、10 To -10 C、Is < -10, Is >10 D、ABS(X) > 10 7、建立新窗体的方法是(b )（1分） A、利用标准工具箱中的窗体控件建立的 B、利用"工程"下拉菜单中的命令建立的 C、由系统自动生成的 D、利用VB的命令建立的 8、在VB中下面的四个数组声明语句,正确的是(c )（1分） A、Dim c[10] B、Def fn(10) C、Dim c(10) D、Dimension c(10) 9、阅读下面的程序段For i=1 To 3:For j=1 To i:For k=j To 3 :a=a+7:Next:Next:Next 执行上面的三重循环后,a 的值为(b )（1分） A、99 B、98 C、97 D、96 10、创建Visual Basic应用程序的主要步骤是：①创建应用程序界面②设置控件③设置属性④编写代码,其中正确的步骤是(D)（1分） A、①②③④ B、①②④ C、②③④ D、①③④ 11、当对命令按钮的Picture属性装入.bmp图形文件后,命令按钮上并没有显示所需的图形,原因是没有对某个属性正确设置,该属性是( d)（1分） A、MousePicture B、Style C、DownPicture D、DisabledPicture 12、Visual Basic中下面( D)不是合法的单精度常数（1分） A、100! B、1E+2 C、100.0 D、100.0D+2 13、下列程序段s=0:for i=9 to 42 step 11:s=s+i:next:if i>50 then s=s+i else s=s-i 运行后s的结果为(d )（1分） A、167 B、139 C、144 D、155 14、有如下程序,a$ ="12":b$ ="24":c$ = b$ + a$:d =V AL(c$):Print d \ 100,运行后的输出结果是( d)（1分） A、12 B、36 C、34 D、24 15、在Visual Basic中,下面的四个语句中存在非法调用错误的是(c )（1分） A、x=SGN(0) B、x=FIX(0) C、x=LOG(0) D、x=ABS(0) 16、表达式INT(5*RND-1)*(INT(5*RND+1))值的范围是(d )（1分） A、[-5,10] B、[-4,15] C、[-4,10] D、[-5,15] 17、要把字符串"计算机技术基础"右边所包含的空格去掉应使用下列(d )函数（1分） A、RINSTR B、RSTR C、LTRIM D、RTRIM 18、表达式(not true or true) and (true or false)的值为(b )（1分） A、false B、true C、0 D、-1 19、在Visual Basic中,有如下数据定义格式Dim e,则以下变量赋值中正确的是(d )（1分） A、e%＝"OK" B、e$= OK C、e= 04/01/2001 D、e= "OK" 20、对变量名说法不确的是(C)（1分） A、必须是字母开头,不能是数字或其他字符 B、不能是Visual Basic的保留字 C、可以包含字母、数字、下划线和标点符号 D、不能超过255个字符 21、Visual Basic中不允许出现的数据形式为(c )（1分） A、4.56E-3 B、8.75D+6 C、D32 D、.369 22、已知X>Y,A>B,正确表示它们之间关系的式子是(b )（1分） A、Sgn(Y-X)-Sgn(A-B)>0 B、Sgn(Y-X)-Sgn(A-B)=-2 C、Sgn(Y-X)-Sgn(A-B)=0 D、Sgn(Y-X)-Sgn(A-B)=1 23、函数String(n,"str")的功能是( b)（1分） A、把数值型数据转换为字符串 B、返回由n个字符组成的字符串 C、从字符串中取出n个字符 D、从字符串中第n 个字符的位置开始取子字符串 24、为启动Timer控件,需要设置Timer的(b )属性（1分） A、Name B、Interval C、Left D、Tob 25、( b)对象能使用print方法（1分）???????????? A、文本框 B、图片框 C、命令按钮 D、标签 一、单项选择题（25 1、以下叙述中正确的是( c )（1分） A、可以在运行期间改变对象的Name属性的值 B、窗体的Name属性的值是显示在窗体标题栏中的文本 C、窗体的Name属性指定窗体的名称,用来标识一个窗体 D、对象的Name属性可以为空 2、双击窗体的任何地方,可以打开的窗口是(a )（1分） A、代码窗口 B、属性窗口 C、工程管理窗口 D、以上三个选项都不对 3、用Static S (100 to 120) As Integer语句定义的数组的元素个数是( c )（1分） A、100 B、20 C、21 D、120 4、如果整型变量c、d的值分别为8和6,则下列语句中For I=c to d : Print I : Next I 循环体的执行次数是(d )（1分） A、3 B、2 C、1 D、0 5、关于语句If c=2 Then d=2 下列正确的说法是(c )（1分） A、c=2和d=2均为赋值语句 B、c=2和d=2均为关系表达式 C、c=2为关系表达式,d=2为赋值语句 D、d=2为关系表达式,c=2为赋值语句 6、设有如下程序a =( ):For i = 1 To 3:Select Case i:Case 1, 3:a = a + 1:Case 2, 4:a = a + 2:End Select:Next i程序运行后,a的值为6,则a的初始值为( c )（1分） A、5 B、3 C、2 D、1 7、下列说法正确的是(d )（1分） A、Visual Basic中的所说的对象是指窗体 B、Do ---Loop语句是循环结构的一种特殊形式,如果循环体中没有Exit Do 语句,程序运行就一定会进入死循环并关闭窗体 C、触发Form_Unload事件,但此时窗还在内存中 D、对象的属性既可在属性窗口中设定又可在程序代码中设定 8、下列数组声明正确的是( d)（1分） A、n=6 : Dim a (1 to n) as integer B、Dim a(10) as integer : ReDim a(1 to 12) C、Dim a() as single : ReDim a(3,6) as integer D、Dim a() as integer : n=6 : ReDim a(1 to n) as integer 9、假设有以下程序段For I=1 to 3:For j=7 to 1 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是(b )（1分） A、21 3 0 B、21 4 0 C、20 3 0 D、20 4 0 10、下列说法正确的是( b)（1分） A、即使数据类型为Variant,数组中的元素类型也必须保持一致 B、数据类型为Variant时,数组中的元素可以包含不同的类型 C、在数组中如果使用Option Base 1语句,则缺省的下界为0 D、在数组中如果没有使用Option Base语句,则缺省的下界为1 11、为了取消窗体的最大化功能,需要把它的一个属性设置为False, 这个属性是(d )（1分） A、ControlBox B、MinButton C、Enabled D、MaxButton 12、在Visual Basic中单精度的类型说明符为(c )（1分） A、% B、# C、! D、& 13、以下能够正确计算1+2+3+…+10的程序是(b )（1分） A、Sum = 0 : I=1 : Do : Sum=Sum+I : Loop Until I<10 : Print Sum B、Sum = 0 : I=1 : Do While I<=10 : Sum=Sum+I : I=I+1 : loop : Print Sum C、Sum = 0 : I=1 : Do : Sum = Sum + 1 : I=I+1 : Loop While I<10 : Print Sum D、Sum = 0 : For I = 1 To 10 : Sum = Sum + 1 : Next I : Print Sum 14、有如下程序段,a%=12.8: b!=14.5:Print a%,b!,其输出结果为(d )（1分） A、12.8 14 B、12 14.5 C、12.8 15 D、13 14.5 15、下列语句中合法的是( c )（1分） A、Print a=spc B、Print "SIN(3.14)"+"COS(3.14)" C、Print TAB(10)"QB" D、Print USING"####",1234.56 16、表达式INT(3*RND+1)*(INT(3*RND－1))值的范围是( c )（1分） A、[0,3] B、[-1,2] C、[-3,3] D、[- 4,2] 17、要统计出字符串"计算机技术基础"的长度是,应使用下列(c )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式8/4*2.5/1.25*(3.7+2.5)的值为(c ) A、12.4 B、6.2 C、24.8 D、62 19、在Visual Basic中,有如下数据定义格式Dim e,则以下变量赋值中正确的是( d ) A、e%＝"OK" B、e$= OK C、e= 04/01/2001 D、e= "OK" 20、下列哪一个是Visual Basic合法变量名(C ) A、IF B、7AB C、A[B]7 D、AB7 21、在Visual Basic中,下面四个数据,数据形式错误的是( d ) A、3.456# B、236! C、1.23D-23 D、D36 22、设a=3,b=5,则以下表达式值为真的是( b ) A、(a>=b) and (b>10) B、(a<0) or (b>0) C、(a<0) and (b>0) D、(-3+5)>a and (b>0) 23、数学式sin25°写成Visual Basic表达式应为( c )（1分） A、sin25 B、Sin(25) C、Sin(25*3.14/180) D、Sin(25) 24、为了暂时关闭计时器,应把该计时器的某个属性设置为False,这个属性是( b )（1分） A、Visible B、Enabled C、Timer D、Interval 25、当程序运行时,在窗体上单击鼠标,以下哪个事件( d )是窗体不会接收到的（1分） A、MouseDown B、MouseUp C、Click D、Load 一、单项选择题（25道小题，共25分） 1、以下叙述中错误的是( c )（1分） A、保存Visual Basic程序时,应分别保存窗体文件及工程文件 B、若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体 C、Visual Basic应用程序只能以解释方式执行 D、事件可以由用户引发,也可以由系统引发 2、以下关于窗体的描述中,错误的是(d )（1分） A、窗体的Load事件在加载窗体时发生 B、当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被禁止 C、窗体的Height、width属性用于设置窗体的高和宽 D、执行Unload Form1语句后,窗体Form1消失,但仍在内存中 3、用Dim S (20) As Integer语句定义的数组的元素个数是(c )（1分） A、19 B、20 C、21 D、22 4、如果整型变量c、d的值分别为9和6,则下列语句中For I=c to d : Print I : Next I 循环体的执行次数是(d )（1分） A、3 B、2 C、1 D、0 5、以下程序代码能执行的是( b )（1分） A、If a = 1 Then b=0 Else c=0 End if B、If a = 1 Then b = 0 ElseIf c = 0 Then d = 0 C、If a = 1 Then b = 0 Else c = 0 D、If a = 1 Then b = 0 ElseIf c = 0 d = 0 End If 6、假设x的值为5,则在执行以下语句时,其输出结果为"OK"的Select Case的语句是( C)（1分） A、Select Case x : case 10 to 1 : Print "OK" : End select B、Select Case x : case Is>5,Is<5 : Print "OK" : End select C、Select Case x : case Is>5,1,3 to 10 : Print "OK" : End select D、Select Case x : case 1,3 Is>5 : Print "OK" : End select 7、设a=10,b=5,c =1,执行语句a > b > c结果是(A )（1分） A、True B、False C、1 D、出错信息 8、下列数组声明正确的是( D)（1分） A、n=5 : Dim a (1 to n) as integer B、Dim a(10) as integer : ReDim a(1 to 12) C、Dim a() as single : ReDim a(3,6) as integer D、Dim a() as integer : n=5 : ReDim a(1 to n) as integer 9、假设有以下程序段For I=1 to 2:For j=6 to 1 Step -1:Print I*j:Next j:Next I则语句Print I*j 的执行次数以及I、j的值分别是( )（1分） A、17 3 0 B、16 3 1 C、15 4 0 D、18 4 1 10、如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( d )（1分） A、发生一个运行时错误 B、发生一个编译时错误 C、在所有的初始化代码运行后Form1是活动窗体 D、在所有的初始化代码运行后Form2是活动窗体 11、当对命令按钮的Picture属性加载.bmp文件后,为让图形在命令按钮上正确显示,需将哪个( B)属性设置为( d )（1分） A、MousePicture 1 B、Style 1 c、DownPicture 0 D、DisabledPicture 0 12、在Visual Basic中双精度的类型说明符为( b )（1分） A、% B、# C、! D、& 13、下列程序段a=3:b=10:for c=b to a step -2:b=b+a:a=a+b:s="*":for d=b to a step -1:s=s&"*":next:next运行后,s的值为( )（1分） A、"****" B、"***" C、"**" D、"*" 14、有如下程序For j=1 TO 3 :Print TAB(3*j);11*(2*j-1); :Next j :Print运行时输出的值分别是( a ) （1分） A、11 33 55 B、55 33 11 C、11 55 33 D、33 55 11 15、在Visual Basic中,下面的四个语句中正确的是( c )（1分） A、Log(sin(-1)) B、c=abs C、Print TAB(10)"QB" D、a=b=c 16、表达式INT(4*RND+1)*(INT(4*RND－1))值的范围是( b )（1分） A、[-2,4] B、[-4,8] C、[-3,8] D、[-3,6] 17、要统计出字符串"计算机技术基础visual basic"的长度,应使用下列( c )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式not 3>4 and not 7-3<=4的值为( b )（1分） A、true B、false C、0 D、-1 19、下列哪个关键字声明的局部变量在整个程序运行中一直存在( c )（1分） A、Dim B、Public C、Static D、Private 20、对变量名说法不确的是( C)（1分） A、必须是字母开头,不能是数字或其他字符 B、不能是Visual Basic的保留字 C、可以包含字母、数字、下划线和标点符号 D、不能超过255个字符 21、假设目前有一参数值为78000,最适合存储此参数的类型为(C)（1分） A、Currency B、Integer C、Long D、String 22、设a=2,b=4,c=6,下列表达式值为真的是( c)（1分） A、a>b And c B、a>b Or c C、aa D、b>c Or c 23、要使变量x赋值为1到100间(含1,不含100)的一个随机整数,正面语句正确的是(d )（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 24、为启动Timer控件,需要设置Timer的( b )属性（1分） A、Name B、Interval C、Left D、Tob 25、( d )对象不能响应Click事件（1分） A、标签 B、图片框 C、窗体 D、计时器 一、单项选择题（25道小题，共25分） 1、以下叙述中错误的是( A )（1分） A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B、控件的名称可以由编程人员设定 C、窗体文件包含该窗体及其控件的属性 D、Visual Basic 中控件的某些属性只能在运行时设置 2、下列可以打开立即窗口的操作是( D)（1分） A、Ctrl+D B、Ctrl+E C、Ctrl+F D、Ctrl+G 3、用Static S (100 to 120) As Integer语句定义的数组的元素个数是(C )（1分） A、100 B、20 C、21 D、120 4、如果整型变量c、d的值分别为9和6,则下列语句中For I=c to d : Print I : Next I 循环体的执行次数是( D)（1分） A、3 B、2 C、1 D、0 5、关于语句If c=2 Then d=2 下列正确的说法是( C)（1分） A、c=2和d=2均为赋值语句 B、c=2和d=2均为关系表达式 C、c=2为关系表达式,d=2为赋值语句 D、d=2为关系表达式,c=2为赋值语句 6、下列程序段中,能正常结束循环的是(C )（1分） A、I = 1 : Do : I = I + 2 : Loop Until I = 10 B、I = 5 : Do : I = I + 1 : Loop Until I < 0 C、I = 10 : Do : I = I + 1 : Loop Until I > 0 D、I = 6 : Do : I = I - 2 : Loop Until I = 1 7、如下程序s = 0:Do Until i <= 100:s = s + i:Loop:Print s运行后,输出结果是(C )（1分） A、1 B、0 C、死循环,无输出 D、无穷大的数 8、在VB中下面的四个数组声明语句,正确的是(C )（1分） A、Dim c[10] B、Def fn(10) C、Dim c(10) D、Dimension c(10) 9、阅读下面的程序段For i=1 To 3:For j=1 To i:For k=j To 3 :a=a+5:Next :Next:Next 执行上面的三重循环后,a 的值为( )（1分） A、50 B、60 C、70 D、80 10、如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( d )（1分） A、发生一个运行时错误 B、发生一个编译时错误 C、在所有的初始化代码运行后Form1是活动窗体 D、在所有的初始化代码运行后Form2是活动窗体 11、为了取消窗体的最小化功能,需要把它的一个属性设置为False, 这个属性是(B )（1分） A、ControlBox B、MinButton C、Enabled D、MaxButton 12、在Visual Basic中长整型的类型说明符为(D )（1分） A、# B、! C、% D、& 13、以下能够正确计算n!的程序是( )（1分） A、n=5 : x=1 : Do : x=x*i : i=i+1 : Loop While i B、n=5 : x=1 : i=1 : Do : x=x*i : i=i+1 : Loop While i C、n=5 : x=1 : i=1 : Do : x=x*i : i=i+1 : Loop while i<=n D、n=5 : x=1 : i=1 : Do : x=x*i : i=i+1 : loop While i>n 14、有如下程序,a$ ="12":b$ ="24":c$ = b$ + a$:d =V AL(c$):Print d \ 100,运行后的输出结果是( )（1分） A、12 B、36 C、34 D、24 15、在下列四个Visual Basic表达式中,不正确的表达式是(D ) （1分） A、a-b+c B、a=b=c C、a*b*c D、Log(sin(-1)) 16、表达式INT(5*RND+1)*(INT(5*RND－1))值的范围是( d)（1分） A、[-5,10] B、[-4,15] C、[-4,10] D、[-5,15] 17、要把字符串" 计算机技术基础"中所包含的空格去掉应使用下列(B )函数（1分） A、INSTR B、TRIM C、LTRIM D、RTRIM 18、表达式(not true or true) and (true or false)的值为(B )（1分） A、false B、true C、0 D、-1 19、以下声明语句中错误的是( b )（1分） A、Const var1=123 B、Dim var2 = 'ABC' C、Dim var5 as long D、Static var3 As Integer 20、下列变量命名正确的是( b )（1分） A、Visual Basic-1 B、myfile C、page＠2 D、cmd..1 21、Visual Basic中不允许出现的数据形式为( C)（1分） A、4.56E-3 B、.368 C、D32 D、0.258 22、下面逻辑表达式值为真的是(C )（1分） A、"A" > "a" B、"9" > "a" C、"That" > "Thank" D、12>12.1 23、数学式sin25°写成Visual Basic表达式应为(C )（1分） A、sin25 B、Sin(25) C、Sin(25*3.14/180) D、Sin(25) 24、下列关于属性设置的叙述正确的是( D)（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、当运行程序时,系统自动执行启动窗体的某个事件过程,这个事件过程是(B )（1分） A、Click B、Load C、Chang D、GotFocus 判断题集锦 1、在if <条件> then 结构中，条件可以是逻辑表达式或关系表达式。（1分）正确 2、计时器（Timer）控件的Interval属性的单位是毫秒，即若将此属性值设为10，则每0.01秒产生一次Timer事件。（1分）正确 3、在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，初值只能取数值。正确 4、窗体的卸载使用Load 语句。（1分）错误 5、表达式268="268" 的结果为True。（1分）错误 6、语句if 0 then print "Hello" 是错误的。（1分）错误 7、在for循环结构对循环变量的赋值中，终值可以大于初值，也可以小于初值。（1分）正确 8、将文本框Text1中的内容清除，可使用语句Text1.cls。错误 9、文件名的命名规则同变量的命名规则一样。（1分）正确 10、通过label1.cls 可以清除由label1所显示的内容。（1分）错误 11、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。（1分）错误 12、设a＝5，则语句print a＝5的运行结果为True。（1分）正确 13、能够改变窗体背景颜色的属性是BackColor。（1分）正确 14、在VB的表达式中，加入括号有时可以改变运算符的优先级。正确 15、语句Print 25*40 执行时输出的结果是1000。（1分）正确 16、在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，步长可以取任意值。（1分）错误 17、可以用Text1.text="" 来清除Text1中的内容。（1分）正确 18、在VB中可以同时打开多个工程。（1分）正确 19、在定义了一个函数后，可以象调用任何一个VB内部函数一样使用它，即可以在任何表达式、语句或函数中引用它。（1分）错误 20、立即窗口既可显示程序调试时新产生的信息，也可执行一行代码。错误 21、变量是指在程序运行过的程中其值可以改变那些量，而值不能改变的是常量。（1分）正确 22、语句a=7:print：a=8:print a 可以输出a的两个值。错误 23、可以在运行期间改变对象的Name属性的值。（1分）错误 24、字符串"AB" 与"ab"是两个相等的字符串。（1分）错误 25、在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，可以写成For a="x" to "z" 。错误 26、VB中请求对象执行某一操作的要求称为"方法"。（1分）正确 27、窗体文件的扩展名是 .frm。（1分）正确 28、在VB中，int(rnd*90)+10的取值范围是[10,99]。（1分）正确 29、Image控件不能用作容器使用。（1分）正确 30、如果一个变量在声明时没有指定类型，则它是Variant类型的。（1分）正确 31、创建VB应用程序的三个主要步骤是：（1）创建应用程序界面（2）设置控件（3）编写代码。错误 32、在VB中，sin(3a+b)是一个合法的表达式。（1分）错误 33、在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，步长可以取任意值。（1分）错误 34、改变窗体的标题也就是改变其属性窗口中的name属性。（1分）错误 35、在VB中可以同时打开多个工程。（1分）正确 36、在VB中，利用表达式int(10+R三、判断题（10道小题，共10分） 37、在VB中，每个变量都有一个名字和相应的数据类型。（1分）正确 38、要想在第15列的位置上输出变量x的值，可以写成print tab(15),x（1分）错误 39、VB声明数组时既可指定上界也可指定下界。（1分）正确 40、在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，循环次数为Int((终值－初值)/步长+1)（1分）正确 41、工程文件的扩展名是 .vbg 。（1分）错误 42、在VB中，利用表达式int(10+RND*90) 来产生一个[10，99]间的整数。（1分）正确 43、程序流程是指在一个程序中语句的执行次序。（1分）正确 44、在VB中，变量可以直接使用（即不声明就使用）。（1分）错误 45、要想在第15列的位置上输出变量x的值，可以写成print tab(15);x（1分）正确 46、能够改变窗体背景颜色的属性是BackColor。（1分）正确 47、在VB中，sin(3a+b)是一个合法的表达式。（1分）错误 48在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，步长可以为正值，也可以为负值。（1分）正确 49、可以用Text1.text="" 来清除Text1中的内容。（1分）正确 50、InputBox函数和MsgBox函数一样，返回的是字符串。错误 51、在VB中，注释语句也是可执行语句。（1分）错误 52、经过说明的符号常量可以在程序代码中修改它的值。错误 53、在VB中，3A_4B是合法的变量名。错误 54、设A=3，B=4，C=5，D=6，则表达式A>B And C<=D Or 2* A>C 的值是False。错误 55、False为字符型常量。（1分）错误 56、Open命令的作用只是打开一个已经存在的文件。正确 57、字符串"hello,河南"的长度是10。错误 58、语句Dim aa(100 to 201) 是正确的。（1分） 59、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。（1分）正确 60、双击工具箱中某个控件，该控件将出现在窗体左上角。错误 61、在VB中，sin(3a+b)是一个合法的表达式。错误 62、在VB中，计时器（Timer）定期激活Timer事件，使Timer中的代码执行一次。正确 63、在VB中可以同时打开多个工程。错误 64、在VB中，函数Fix(-3.6) 的返回值是–4。错误 65、程序流程是指在一个程序中语句的执行次序。正确 66、经过说明的符号常量可以在程序代码中修改它的值。错误 67、要想在第15列的位置上输出变量x的值，可以写成print tab(15);x（1分）正确 68、定义变量的语句Dim abc As String * 3 是正确的。正确5、表达式"123"+123 的结果是"123123"。错误 69、Open命令的作用只是打开一个已经存在的文件。正确 70、在VB中，注释语句也是可执行语句。错误 71、在VB中，变量分为内存变量和字段变量两种。 72、语句Dim a,b,c As Integer 将变量a,b,c声明为整型变量。错误 73、表达式"123"+123 的结果是"123123"。（1分）错误 74、在if <条件> then 结构中，条件可以是逻辑表达式或关系表达式。正确 75、在For <控制变量>＝<初值> To <终值> [Step <步长>] 结构中，步长可以取任意值。错误 76、要想在文本框Text1中显示"Hello",可以用语句Text1.Caption="Hello"。错误 77、Open命令的作用只是打开一个已经存在的文件。正确 78、在VB中，int(rnd*90)+10的取值范围是[10,99]。正确 1、可视化Visual Basic语言是一种通用的程序设计语言，是微软公司开放的，以结构化语言为基础采用事件驱动。程序设计语言可分为高级语言和低级语言两类, Visual Basic以结构化Object pascal语言为基础 2、在Visual Basic6.0中，用Font.Italic属性设置斜体、用Font.Size属性设置字号、用https://www.wendangku.net/doc/9b15723596.html,属性设置字体名称、用Font.StrikeThtouth属性设置删除线。 3、表示整型（Integer）的单一字符是%、长整型（long）是&、单精度（Single）是！、双精度（Double）是#、货币型（currency）是@、字符型（string）是￥、字节型（byte）逻辑型（boolean） 4、一个工程可以包括多种类型的文件,其中可执行文件的窗体名为.frm,扩展名为.vbp 将对象设置为可见的，是将它的属性值Visible设为true, 将对象设置为不可见的，是将它的visual 属性值设为False 6、逻辑型数据只有true ；false两个值、逻辑型变量的关键字是boolean 7、可视化Visual Basic在Visual Basic6 0中，设置对象标题是用属性caption 8、一个工程可以包括多种类型的文件,其中扩展名为.frx的文件表示窗体的二进制数据文件。 9、设A$="Visual Basic",len(a$)函数返回值是12。 10、设A$="Visual Basic是一种可视化编程语言",len(a$)函数返回值是22。",Right$(A$,4)函数返回值是 a si c。",mid$(A$,8,5)函数返回值是basic。nstr(A$,"Basic")函数返回值是8 。 11、单击某个对象时，引发该对象的事件click。双击是Doubleclick执行。 12、三角函数是以为弧度单位。 13、Int(x)函数的含义是取不大于X的最小整数。Rnd函数的含义是生成(0,1)之间随机数Exp(x)函数的含义是e 的x 次方、Fix(x)函数的含义是取整。 14、对象型变量的关键字是object 。没有声明的变量是变量Variant 。变体型变量的关键字是Variant 15、Chr$(数值)函数返回数值代表ASXII码值转化为字符。Chr$(13)为huiche 。 16、在窗体各过程中均有效的变量是全局变量。用关键字public声明。只在一个过程有效，其它过程无效的变量是局部变量、变体型变量的关键字是variant 。 17、For......Next结构是常用于循环次数已知的循环结构、For...Next结构的循环次数为Int（(终值-初值)/步长+1）。 18、、print方法用于在窗体、图片框、调试窗中、打印机等对象上输出文本。在Print方法中，输出项用逗号分隔是按标准紧凑格式输出。在Print方法中，句尾有符号时，是执行下一个Print语句。 19、、程序流程中被重复执行的程序段叫循环结构。 20、程序的流程出现一个或多个分支，按一定的条件选择其中之一执行的结构叫选择结构。 21、设定系统当前日期是2004年5月12日，Month(date)=5 22、在窗体的声明部分，语句Private x% 语句，是将变量定义为窗体模块级变量。 23、顺序文件读操作用open语句。 24、Command1.Visible=False,是将命令按钮1设为隐藏。 25、当鼠标在控件上暂停时，显示提示信息，要用属性ToolTipText属性。 26、Text1.SetFocus语句功能是把焦点移到Text1上。 27、Dim X As Currency 是将变量X定义为货币型。 28、逻辑值转变为数值时，False为0。 29、当某个对象接收到焦点时，发生gostFocus事件。 大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、https://www.wendangku.net/doc/9b15723596.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括（C）。 A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上，应将进行(D)设置。 A、将控件的TabIndex属性设置为0 所有填空题 1、VB6.0是运行于______操作系统环境下的一个快速可视化程序开发工具，用它进行程序设计，有两个基本的特点，即______和______。 答案：1：Windows9x/NT#Windows9x/NT#Windows9x\NT#Windows9x\NT#Windows9x#Windows NT#Windows9x#WindowsNT#windows9x/NT#windows9x/NT#windows9x\NT#windows9x\NT#windows9x#windows NT#windows9x#windowsNT 2：事件驱动编程#可视化设计 3：可视化设计#事件驱动编程 等级：1难度：1 知识点：VB知识点/VB简介 2、VB是一种面向______的可视化编程语言，它采用______的编程机制。 答案：1：对象 2：事件驱动 等级：1难度：1 知识点：VB知识点/VB的编程环境 3、在VB集成开发环境中，运行应用程序的方法有两种：______或______。 答案：1：编译运行模式#解释运行模式#编译运行#解释运行 2：解释运行模式#编译运行模式#解释运行#编译运行 等级：1难度：1 知识点：VB知识点/VB简介 4、VB的对象主要分为______和______两大类。 答案：1：窗体#控件 2：控件#窗体 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 5、VB中，用来描述一个对象的状态或特征的量称之为对象的______。 答案：1：属性 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 6、在VB中，最基本的对象是______。 答案：1：窗体 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 7、一个对象响应某个事件后所执行的操作是通过一段程序代码来实现，这段程序代码称______。 答案：1：事件过程 等级：1难度：1 一、单选题（每小题1分，共99 分） 1. 假定Picture1 和Text1 分别为图片框和文本框的名称，下列语句中不正确的是______ 。 A Picture1.Print 25 B Text1.Print 25 C Print 25 D Debug.Print 25 2. 在Visual Basic 中要将一个窗体从内存中释放，应该使用以下语句中的______ 。 A UnLoad B Stop C Close D Hide 3. 如果组合框ComBo1中已有10项数据，应使用语句______将数据"Mydata"插入到第5项。 A ComBo1.Insert "Mydata", 4 B ComBo1.Insert "Mydata", 5 C ComBo1.AddItem "Mydata", 5 D ComBo1.AddItem "Mydata", 4 4. 如果列表框List1中已有10项数据，应使用语句______将数据"Mydata"插入到列表框的第3项。 A List1.Insert "Mydata", 3 B List1.AddItem "Mydata", 2 C List1.AddItem "Mydata" ,3 D List1.Insert "Mydata", 2 5. 语句If x=1 Then y=1，下列说法正确的是____________。 A x=1和y=1为赋值语句 B x=1为赋值语句，y=1为关系表达式 C x=1为关系表达式，y=1为赋值语句 D x=1和y=1均为关系表达式 6. 删除列表框中指定的项目所使用的方法为______ 。 A Move B Clear C Remove D RemoveItem 7. 不论何控件，共同具有的属性是______________。 A ForeColor B Name C Text 题目描述 418 VB中，（B）控件对象在运行时一定不显示。A:Label B:Timer C:TextBox D:CommandButton 419 VB中，将Interval属性值设置为（D）时，计时器控件每隔5秒钟产生一个计时器事件。A:5 B:500 C:300 D:5000 420 VB中，可以弹出一个对话框的函数是（D）A:Int() B:Rnd() C:V al() D:MsgBox() 421 VB中，Rnd（B）函数的值不可能是（B）A:0 B:1 C:0.1234 D:0.00005 422 VB中，Int(5.9)的返回值是（C）A:3 B:4 C:5 D:6 423 "下面程序的运行结果是（B） Private Sub Command1_Click（B） Text1.Text = ""123"" Text2.Text = ""321"" a = Text1.Text + Text2.Text Print a End Sub" A:444 B:123321 C:321123 D:132231 424 VB中正确的循环语句是（B）A:For x=1 to step 10 B:For x=1 to 10 step 2 C:For x=1 to 10 step -1 D:For x=10 to 1 425 "下面程序的运行结果是（B） Dim a As Integer, b As Integer a=6 b=15 S=1+(a*b)/2 Print S" A:6 B:46 C:15 D:45 426 "VB中,执行下面的程序段后，b的值为（A） a = 100 b = 20 a = a + b b = a - b" A:100 B:120 C:20 D:80 427 "x=10 If x<=12 then y=2*x+6 Else y=x/2 End If 上述程序段中y的值是（A）" A:26 B:25 C:10 D:5 428 "下列程序段的运行结果是（C） x=3 Select Case x Case 5 Print ""优秀"" Case 4 Print ""良好"" Case 3 Print ""通过"" Case Else Print ""不通过"" End Select" A:优秀B:良好C:通过D:不通过 429 执行Do……Loop Until语句时（B）A:先判断后循环B:先循环后判断C:顺序执行D:其余说法都不对 430 VB中，定义a为整型变量的语句是（A）A:Dim a As Integer B:Dim a As Single C:Dim a As Date D:Dim a As Byte 431 对VB窗体中控件的操作错误的是（A）A:单击Delete键一次只能删除一个控件B:单击Delete键一次可以同时删除多个控件C:按住Shift键,依次单击每个要选择的控件,可以同时选中多个控件D:按住Ctrl键,依次单击每个要选择的控件,可以同时选中多个控件 432 VB中，多个语句写在同一行时,每个语句之间用（B）符号分隔。 A:, B:: C:. D:； 433 VB中，一条语句要分行书写,用（C）符号作续行符。A:“-”B:“+”C:“_” D:“…” 434 "下列VB程序段执行后x的值为（B）a=8 If a<9 Then x=9 End If Print x" A:8 B:9 C:0 D:1 435 在VB中，表达式9\4的结果是（B）A:2.5 B:2 C:3 D:40 436 在VB中,Int（23.512）的值为（D）A:-23 B:-24 C:24 D:23 437 VB中，定义a为实型变量的语句是（B） 程序填空〖第1题〗『程序填空』(1分)(题号:59) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- ' 功能：输入一个数,若大于0,则显示"+"；若小于0， ' 则显示 "-"；若等于"0",则显示"零"。 '------------------------------------------------------- Private Sub Command1_Click( ) x = Val Select Case x '**********SPACE********** Case is > 0 = "+" Case Is < 0 '**********SPACE********** = "-" '**********SPACE********** Case is = = "零" End Select End Sub 答案： 1). Case Is > 0 2). = "-" 3). Case 0 或 Case Else 或 Case Is = 0 〖第2题〗『程序填空』(1分)(题号:60) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '功能：输入任何一个英文字母x, ' 若x的值为"a","c","d-f" ,则显示x的大写字母； ' 若x的值为"m","o","p-z",则显示x的小写字母； ' 若x的值为其它的值,则显示xa（如输入的X的值是g，则显示ga）。 '------------------------------------------------------- Private Sub Command1_Click() x = '**********SPACE********** 【】 '**********SPACE********** Case 【】 = UCase(x) Case "m", "o", "p" To "z" = LCase(x) Case Else '**********SPACE********** 【】 End Select End Sub 答案： 1). Select Case x 2). "a", "c", "d" To "f" 3). = Trim(x) + "a" 或 = x + "a" 〖第3题〗『程序填空』 一、有如下程序段： x=7 If x>5 Then y=11-2*x Else y=10+x^2 End If 该程序段运行后，变量y 的值是（） ZR_A=-3 ZR_B=5 ZR_C=10 ZR_D=59 —————————————————————————————————————————二、如图所示算法的功能是（） ZR_A=按从小到大的顺序输出两个变量的值 ZR_B=按从大到小的顺序输出两个变量的值 ZR_C=交换两个变量的值 ZR_D=找出两个变量中的较小者————————————————————————————————————————— 三、有如下程序段： t=5 If t<>5 Then f=10 Else f=10+(t-3)*2 End IF 该程序段运行后，变量f的值是（） ZR_A=5 ZR_B=10 ZR_C=14 ZR_D=20 ————————————————————————————————————————— 四、流程图如图所示，若输入x的值为0，则输出结果是（） ZR_A=10 ZR_B=16 ZR_C=4 ZR_D=-4 —————————————————————————————————————————五、淄博市规定60岁及以上老年人可以办理老年证，办证的流程如下图，这属于（）。 ZR_A=双路径决策ZR_B=多路径决策ZR_C=计数循环ZR_D=变量—————————————————————————————————————————六、某商场香蕉每斤1.5元，为了促销，规定购买4斤或4斤以上打八折，不足4斤的按原价格销售。下面是用VB编写的程序，红线上应填入的语句是（）。 ZR_A=y = 1.5 * x * 0.8 ZR_B=y = 1.5 * x /4 ZR_C=y = 4 * x * 0.8 ZR_D=y = 1.5 * x * 0.2 ————————————————————————————————————————— 序号题干答案 1 VB是一种面向对象的程序设计语言。对 2 VB通过窗体管理构成应用程序的各类文件的集合。错 3 VB支持弹出菜单，所谓“弹出菜单”是指单击鼠标后打开的 菜单。 错 4 Visual Basic程序的运行，仅能从某一窗体启动，如Form1 窗体。 错 5 Visual Basic程序的运行可以从Main()过程启动，也可以从 某 个窗体启动。 对 6 Visual Basic提供的几种标准坐标系统的原点都是在绘图区 域 的左上角，如果要把坐标原点放在其它位置，则需使用自定 义 坐标系统。 对 7 单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件 任务. 错 8 Dim i, j as integer 表明i和j都是整型变量。错 9 Single 和Double型用于保存浮点数,在VB中定义单精度浮 点8位 ,双浮点16位. 错 10 Visual_basic是合法的变量名。对 11 可以用"&"，"+"合并字符串，但是用在数值变量时，"+"可能 会 将两个数值加起来。 对 12 某一过程中的静态变量在过程结束后，静态变量及其值可以 在 其它过程中使用。 错 13 全局变量用global或public关键字声明，且仅在通用声明 处可 以定义。 错 14 如果某子程序add用public static sub add()定义，则该子 程 序的变量都是局部变量。 错 15 设A=3,B=4,C=5,D=6，则表达式A>B And C<=D Or 2*A>C 的值是False。 错 16 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来 定义. 错 17 在VB中，运算 "ABCDE123A" Like "[a*a] " 的结果是True。错 18 在VB中,运算 "D" Like "[! A-Z]" 的结果是True. 错 19 在VB中，运算"ABA"Like"[a?a]"的结果是False。对 20 MsgBox()函数建立的消息框能显示信息也能输入信息。错 21 MsgBox()函数建立的消息框能显示信息也能输入用户的信 息. 错 22 Picture图片框既可用来显示图片和绘制图形,也可用Print 方 法来显示文字. 错 23 在框架控件内的几个单选按钮中，可有一个或多个单选按钮 的Value属性为True。（正确答案：只有一个） 错 24 *.bmp格式的图片，如果在autosize设为False的图片框， 它会 以图片框大小完整显示出来。 错 25 “菜单编辑器”中至少要填“名称”和“标题”这两个框， 才 能正确完成菜单栏的设计。 错 26 ActiveX控件是扩展名为*.ocx的独立文件，使用时需用 “工程”/“部件”载入或移去。 对 27 Circle方法绘制扇形或圆弧图形时，图形的形状不仅与起始 角、 终止角的大小相关，而且与起始角、终止角的正或负相关。 对 28 Frame控件是一种容器控件,因此它可有它自己的坐标系. 错 29 Function函数有参数传递，并且一定有返回值。错 30 Image控件不能用作容器使用。对 31 Image控件使用的资源比Picture控件使用的多. 错 32 Line(500,500) – (2500,2500) 命令能够正确画出矩形。错 33 List1.Clear是清除List1的全部列表项，所以Clear是对象 的方法。 对 34 move方法的一般形式是:对象名.move A,B[,C,D],其中A指 Left ,C 指width. 错 VB测验选择题真题精选 ————————————————————————————————作者：————————————————————————————————日期： VB考试真题精选，考前必备神器20 开通黄钻 21， a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( b )。（1分） A、Sub plus(sum, a , b ): sum = a + b: End Sub B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub D、 D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub 22、通过关键字( c )声明的局部变量，在整个程序运行中一直存在。（1分） A、Dim B、Public C、Static D、Private 23、过程的作用域分为( c )。（1分） A、窗体级和局部级 B、模块级和局部级 C、窗体/模块级和全局级 D、窗体/模块级和局部级 24、在窗体的通用段声明变量时，不能使用( d )关键字。（1分） A、Dim B、Public C、Private D、Static 25、能在一个工程的所有程序中使用的变量，称为( b )。（1分） A、局部变量 B、全局变量 C、窗体级变量 D、模块级变量 27、使用Public Const语句声明一个全局的符号常量时，应该将该语句放在( b )。（1分） VB 编程基础判断题（0错误 1正确） 1. Excel 可以处理电子表格数据，所以它是程序设计语言。答案： 0 2. 每种程序设计语言都有自己的语法和规则。答案：1 3. 使用VB 设计程序时，可以不用创建工程。答案：0 4. 通常状况下，我们会通过两种方法修改对象属性，一种是利用属性窗口，另一种是利用代码。答案：1 5. 在 VB 开发环境中，如果对象窗口工具箱工程资源管理器属性窗口和窗体布局窗口等被关闭，可以通过“视图”菜单再次打开。答案：1 6. 在VB 窗体中添加第一个标签控件后，该标签控件的Caption 标题属性设置的默认值是“command1”。答案：答案：0 7. 在VB 中，可以借助键同时选中多个对象。答案：1 8. 在VB 中，调整选中的多个控件的大小和位置时，要最后选中作为调整依据的控件。答案：1 9. 在VB 中，一个程序可能包含若干个不同的文件，但一定不包括工程文件和窗体文件。答案：0 10. 在VB 中，一个程序中的工程文件扩展名为vbp ，窗体文件扩展名为frm。答案：1 11. 在VB 中，要想让同一窗体上的3 个按钮控件的大小相同，可以使用“格式”菜单中的“统一尺寸”子菜单的“两者都相同”命令。答案：1 12. 在VB 中，标签一般用来显示信息，文本框用来接受用户输入的信息。答案：1 13. 在VB 程序中，被使用的窗体和控件统称为对象。答案：1 14. 在VB 中，属性窗口通常显示的是当前被选中的对象的具体属性。答案：1 15. 在VB 中，对象的“名称”和“Caption”是两种相同的属性。答案：0 16. 在VB 中，标签和命令按钮显示的文字由其“Text”属性确定，文本框中显示的文字由其“Caption”属性确定。答案：0 17. 在VB 中我们可以接触两种程序界面，一种是窗体中不带网格点的设计界面，另一种是带网格点的运行界面。答案：0 18. 属性窗口有两个选项卡，一个是按字母排序别一个是按类进行排，但都是用来显示某一对象的各种属性的。答案：1 19. 在VB 中，语句命令中的符号，都必须是英文字符。答案：1 20. 在VB 中，一个对象只能响应一种事件。答案：0 21. VB 的代码窗口包括对象名框事件过程名框和代码编辑区3 部分。答案：1 22. 在VB 中，125 是数值型数据，"125"也是数据型数据。答案：0 23. 在VB 中，可以使用“User & name”作为变量名。答案：0 24. 在VB 程序中，使用Option Explicit 后，如果再使用未加声明的变量，运行程序时会出现错误提示。答案：1 25. 在VB 中CStr 函数可以将数值型表达式的值转换成对应的字符串。答案：1 填空题 第1题表达式 1 and 0的值 ______________________ 答案： False 第2题把"Visual Basic程序设计"添加到列表框 lstBooks____________________________ 答案： lstBooks.AddItem "Visual Basic 程序设计" 第3题 For k=35 to 0 step 3 next k 语句的循环次数是_______________________答案：0 第4题 Val("123.55ab456")的值是多少 _____________________________ 答案：123.55 第5题每隔定时器控件的Interval属性值时间间隔,单位为毫秒,定时器会触发一次 ________________________事件 答案：Timer 第6题表达式(-3) And 8 的值为 _______________________. 答案：True 第7题 Print "x=" & (2=4) 的结果为 ________________________. 答案： x=False 第8题要使同一类型控件组成一个控件数组,必须要求_______________________. 答案： Name 相同或名称相同 第9题循环语句FOR K=1 TO 10 STEP –1控制的循环次数为___________________. 答案： 0 第10题设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为______________. 答案： False 第11题声明定长为10个字符变量Sstr的语句为______________________. 答案： Dim Sstr as String*10 或 Sstr as String*10 第12题在VB中,若要将字符串"12345"转换成数字值应使用的类型转换函数是 ____________. 答案： VAL 或 Cint 第13题在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer, 则strVar、intVar与sngVar的数据类型分别是Variant、Variant和_____________________. 答案： Integer 第14题滚动条控件主要支持两个事件,它们是scroll和____________________事件. 答案： change 第15题所有控件都具有的共同属性是 ____________________属性. 答案： name 〖第16题〗Visual Basic为添加到窗体上的第一个图片框picture提供的默认对象名为 ______. 答案： Picture1 〖第17题〗A和B同为正整数或同为负整数的VB 表达式为________________. 答案： A=INT(A)★AND★ B=INT(B)★ AND ★ A*B>0 〖第18题〗变量min@表示_______________类型的变量. 答案：货币数据变量或货币 〖第19题〗表达式 32\7 MOD 3^2 的值是____________________. 答案： 4 〖第20题〗把整型数1赋给一个逻辑型变量,则逻辑变量的值为___________________. 答案： True 〖第21题〗求x与y之积除以z的余数的VB表达式为_________________________. 答案： x*y★Mod★z 〖第22题〗以图片框Pic1的中心位置为圆心,以700为半径在Pic1上画一个圆的方法是 ______ 答案： pic1.Circle (pic1.width/2,pic1.height/2),700 〖第23题〗要使一个按钮设为默认按钮,应把此按钮的_____________属性的值设为True. 答案： Default 〖第24题〗在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的______________属性的值设置为True. 答案： MultiLine 〖第25题〗设置计时器控件只能触发 ____________________事件. 答案： timer 〖第26题〗VisualBasic6.0用于开发 ____________________环境下的应用程序. 答案： WINDOWS 定制模块行为 (1) Option Explicit ''强制对模块内所有变量进行声明 Option Private Module ''标记模块为私有，仅对同一工程中其它模块有用，在宏对话框中不显示Option Compare Text ''字符串不区分大小写 Option Base 1 ''指定数组的第一个下标为1 (2) On Error Resume Next ''忽略错误继续执行VBA代码,避免出现错误消息 (3) On Error GoTo ErrorHandler ''当错误发生时跳转到过程中的某个位置 (4) On Error GoTo 0 ''恢复正常的错误提示 (5) Application.DisplayAlerts=False ''在程序执行过程中使出现的警告框不显示 (6) Application.ScreenUpdating=False ''关闭屏幕刷新 Application.ScreenUpdating=True ''打开屏幕刷新 (7) Application.Enable.CancelKey=xlDisabled ''禁用Ctrl+Break中止宏运行的功能 工作簿 (8) Workbooks.Add() ''创建一个新的工作簿 (9) Workbooks(“book1.xls”).Activate ''激活名为book1的工作簿 (10) ThisWorkbook.Save ''保存工作簿 (11) ThisWorkbook.close ''关闭当前工作簿 (12) ActiveWorkbook.Sheets.Count ''获取活动工作薄中工作表数 (13) https://www.wendangku.net/doc/9b15723596.html, ''返回活动工作薄的名称 (14) https://www.wendangku.net/doc/9b15723596.html, ‘返回当前工作簿名称 ThisWorkbook.FullName ‘返回当前工作簿路径和名称 (15) ActiveWindow.EnableResize=False ‘禁止调整活动工作簿的大小 (16) Application.Window.Arrange xlArrangeStyleTiled ‘将工作簿以平铺方式排列 (17) ActiveWorkbook.WindowState=xlMaximized ‘将当前工作簿最大化 工作表 (18) https://www.wendangku.net/doc/9b15723596.html,edRange.Rows.Count ‘当前工作表中已使用的行数 (19) Rows.Count ‘获取工作表的行数(注：考虑向前兼容性) (20) Sheets(Sheet1).Name= “Sum”''将Sheet1命名为Sum (21) ThisWorkbook.Sheets.Add Before:=Worksheets(1) ''添加一个新工作表在第一工作表前 (22) ActiveSheet.Move After:=ActiveWorkbook. _ 1.不论哪种控件，共同具有的属性是Name 2.要使某控件在运行时不可显示，应对其设置的属性是Visible 3.要是窗体在运行时不可改变窗体的大小和没有最大化、最小化按钮，需设置的属性是Borderstyle 4.当程序运行时，系统自动执行启动窗体的事件过程是Load 5.要判断在文本框中是否按下了Enter键，应在文本框的Keypress 事件中判断 6.要使标签控件显示时不覆盖其背景内容，要对其设置的属性是Backstyle 7.复选框的Value属性为0时，表示复选框未被选中 8.将数据项“语文”添加到列表框（list1）中成为第一项应使用的语句是“List1.Addltem”“语文”，“0” 9.执行下面的程序,列表框中的数据项有“1，3” Sub Form_Click() For i = 0 To 4 List1.AddItem i Next For i = 0 To 2 List1.RemoveItem i Next End Sub 10.如果列表框（list1）中没有被选定的项目，则执行List1.RemoveItem List1.ListIndex语句的结果是 D A．移去第一项 B．移去最后一项 C．移去最后加入列表的项 D．其他都不对 11.下列可以把当前目录下的图形文件Pic1.jpg装入图片框Picture1中的语句为“Picture1. Picture=Load Picture(“”Pic1.jpg””)” 12.假定在图片框Picture1中装入了一个图形，为了清除该图形（不是删除图片框）应采用的正确方法是“执行语句Picture1. Picture =Load Picture(“””’”)” 13.当组合框的Style属性值设置为2时，其为下拉式列表框 14.要使定时器无效应将Interval属性取值为0 15.假定定时器控件的Interval属性为1000，Enable属性为Ture，并且有下面的事件过程 Private Sub Timer1_Timer() Beep End Sub 计算机将发出Beep声的次数为 A.1000次 B．0次 C．1次 D．其他都不对 16.下面语句能正确地把列表框list1从1数起的第4项的内容设置为“aaaa”的是“List1.List(3)=””aaaa””” 17. 下面语句能正确地把列表框list1从1数起的第3项的内容设置为“aaaa”的是“List1.List(2)=””aaaa””” 18.在窗体上画一个文本框，为了在程序运行后隐藏该文本框，应使用的语句为Text1.Visible=False 19.在窗体上画一个文本框Text1和一个标签Label1，要求程序运行后，如果在文本框输入字符，则立即在标签中显示相同的内容，一下可以实现上述操作的事件过程的是 “Private Sub Text1_Change() Lebel1.Caption = Text1.Text vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23 25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb 1、下列叙述中，错误的是( A )。（1分） A、一条语句可以分为多行书写，但要在上行末加上VBCrLf B、在同一行上书写多条语句，应在两两语句中加上:号 C、可以用Rem或'注释单行语句 D、VB程序代码不区分字母的大小写 2、下列叙述正确的是( D )。（1分） A、Visual Basic的事件是由用户定义的 B、Visual Basic程序从主窗体开始执行 C、Visual Basic程序是过程驱动的 D、保存一个Visual Basic程序，应分别保存其窗体模块、标准模块和工程文件 3、被对象所识别的动作与对象可执行的动作分别称为对象的( A )。（1分） A、方法、事件 B、事件、方法 C、事件、属性 D、过程、属性 4、下列关于VB编码规则的叙述中，正确的是( C )。（1分） A、一条语句可以分为多行书写 B、多条语句不能书写在同一行上 C、每条语句以分号;结尾 D、应用程序代码字母是区分大小写的 5、( D )不属于面向对象系统的三要素。（1分） A、事件 B、属性 C、方法 D、变量 6、下列叙述中，不正确的叙述是( C )。（1分） A、注释语句是非执行语句，仅对程序的有关内容起注释作用，客观存在不被解释和编译 B、注释语句能放在整个代码程序的最后 C、注释语句可以放在代码中的任何位置 D、代码中加入注释语句的目的是提高程序的可读性 7、下列叙述错误的是( B )。（1分） A、不允许使用行号与标号 B、单条语句可分行书写 C、同一行上可以书写多条语句 D、VB代码不区分字母的大小写 8、窗体设计器是用来设计( B )。（1分） A、应用程序的代码段 B、应用程序的界面 C、对象的属性 D、对象的事件 9、启动Visual Basic后，系统为用户新建的工程起一个名为( A )的临时名称。（1分） A、工程1 B、窗体1 C、工程 D、窗体 10、在界面设计时，双击窗体中的对象后，Visual Basic将显示的窗口是( C )。（1分） A、立即窗口 B、属性窗口 C、代码窗口 D、工程资源管理器窗口 11、VB应用程序在( A )模式下不能编辑代码和设计界面。（1分） A、运行 B、中断 C、设计 D、以上均不能 12、如果要向工具箱中加入控件的部件，可以利用“工程”菜单中的( B )命令（1分） A、引用 B、部件 C、工程属性 D、加窗体 13、如果Visual Basic环境中缺少某个窗口，一般应该从主菜单的( D )下拉菜单中寻找并打开。（1分） A、编辑 B、文件 C、调试 D、视图 14、标准控件不包括( D )控件。（1分） A、驱动器列表框 B、目录列表框 C、文件列表框 D、通用对话框 15、在设计窗体时，如果窗体上没有显示网格会感到不方便，( c )可以使网格出现。（1分） A、使用“编辑”菜单上的相关命令 B、使用“格式”菜单上的相关命令 C、使用“工具”菜单上的相关命令 D、使用“工程”菜单上的相关命令 16、在Visual Basic中，某一事件对应的程序叫( b )。（1分） 目录 一、填空题 (2) 二、选择题 (5) 三、程序填空 (18) 四、阅读程序写结果 (25) 五、编程题 (31) 六、历年全国计算机二级等级考试真题(附答案) (33) 2006年4月全国计算机等级考试二级VB笔试试卷 (33) 2005年9月全国计算机等级考试二级VB笔试试卷 (43) 2005年4月全国计算机等级考试二级VB笔试试卷 (50) 2004年9月全国计算机等级考试二级VB笔试试卷 (57) 一、填空题 1、在程序中使用日期型数据时，必须用符号 将日期型数据括起来。 2、VB 集成发环境窗口，它包括了数个独立的窗口。除必须的"主窗口"外，常用的还有 窗口、 窗口、 窗口、工具箱窗口、对象浏览窗口、工程资源管理等窗口。 3、在计算机上建立一个VB 应用程序的完整过程，一般分：建立用户界面的对象、对象属性的设置 、对象事件过程及编程、 程序的运行和调试 和 保存文件 五个步骤。 4、VB 中每个对象都有自己的属性， visible 属性决定控件是否允许可见。 5、在VB 对象的三要素中，可以把 属性 看作一个对象的性质，把 事件 看作对象的响应，把 方法 看作对象的动作。 6、VB 有三种工作模式，它们分别是 模式、 模式和 模式。 7、如果希望每0.6秒钟产生一个计时事件，那么应将InterVal 属性值应设置为 。 8、在VB 中，为了使一个控件在运行时不可操作，应将控件的 enable 属性设置为 false 。 9、为了防止用户编辑文本框内的内容，应将控件的 locked 属性设置为 true 。 10、当要使标签框的大小随着Caption 属性的值进行扩展或缩小时，应将该控件的 autosize 属性设置为 true 。 11、定义一个长度为8个字符的定长字符串变量(Ch5)的Dim 声明语句是 dim ch5 as string*8 。 12、VB 中拥有多个窗体的程序可用 load 语句窗体装入内存，用 unload 语句从内存中删除指定窗体. 13、在多窗体工程中，可用 show 方法显示一个窗体，用 hide 方法将一个窗体隐藏起来。 14、结构化程序设计方法，把程序的结构规定为 三种基本结构，它们是： 选择结构 、 选择 结 构 、 和 __循环结构_________三种基本结构。 15、VB 逻辑数据类型只有True 与False 两个值。当逻辑数据转换成整型数据时，True 转换为 ，False 转换为 。 16、VB 中依据变量的作用范围将VB 变量的作用范围分为三类，它们是： 局部 变量、 全局 变量和 窗体模块 变量。 17、VB 中，对控件（对象）一些属性的设置，即可以通过在 程序代码 中设置，也可以在 属性窗口 中设置，两种方法来设置。 18、在VB 中，静态数组声明中的下标只能是 常 量 。而动态数组Redim 语句中的下标还可以是已赋值 的变量。 19、产生100～200之间（含100和200）的随机整数的表达式是： 。 20、表达式4 AND 5 的运算结果是 4 。 21、VB 中，当KeyPress 事件发生时会返回一个按键 的 ASCii 值。 22、VB 中，用Option Base 1说明后，Dim A （5，5）定义的数组有 25 个元素。 23、表达式“12345”<>“12345”&“ABC ”的值 是 。 24、在Select case 结构中应至少包含一个 __Case____子句。 25、启动VB6.0时，VB6.0默认的工程类型是 标准EXE 程序 。 26、A=7，B=3，C=4，则表达式A MOD 3 +B^3/C\5的值为 2 。 27、若要求在菜单中包含分隔条，则设计时，在菜单的标题属性中应设置为 “— “ 。 28、在For ……Next 循环中，循环次数由循环控制变量的初值、终值与步长三个因素决定，其计算公式为 循环次数=INT （终值-初值）/步长+1 。 29、激活属性窗口的快捷键是 F4 。 30、字符串常量由任何ASCII 字符组成，在程序中，它必须由 双引号 括起来。大学VB考试题库
VB新题库(填空题)
vb题库(选择与填空)
信息考试选择判断-vb语言
VB题库程序填空
VB程序if语句选择
vb单选判断题题库
VB测验选择题真题精选
vb选择与判断
VB题库-填空练习题
OFFICE VB 语句
VB选择题库(3)
vb练习题及答案.doc
vb真题(选择题)
VB_经典考试题及答案