一、单项选择题(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