河南农业大学vb题库VB选择判断填空

河南农业大学vb题库VB选择判断填空

一、单项选择题（25道小题，共25分）

1、VB中工程软件的扩展名为(C ) A、ds B、frm C、vbp D、bas

2、把字符串"abcdef "右边的空格去掉应使用( B)函数 A、trim B、rtrim C、right D、mid

3、文本框text1的text属性的数据类型是(B ) A、整数型B、字符串C、单精度D、双精度

4、下列( B)属性决定窗体标题栏显示内容 A、Name B、Caption C、Text D、BackStyl

5、命令按钮command1不具有下列哪个事件(B ) A、Click B、KeyPress C、GotFocus D、DblClick

6、为了使文本框同时具有水平和垂直滚动条，应先将MultiLine属性设置为True,然后再把ScrollBars 属性设置为( D)

A、0B、1C、2D、3

7、Dim D(3,1 To 10,1 To 15)语句中，数组的元素个数为(c ) A、3*10*16 B、3*11*16 C、4*10*15 D、4*11*15

8、如果整型变量c、d、x的值分别为8、6、0，则下列语句For I=c to d : x=x+i : Next I 执行结束时，I的值为(A)

A、8 B、7 C、6 D、5

9、假定有以下循环结构 Do Until 条件 循环体 Loop 则正确的描述是( B)

A、如果"条件"是一个为0的常数，则一次循环体也不执行B、如果"条件"是一个为0的常数，则至少执行一次循环

C、如果"条件"是一个不为0的常数，则至少执行一次循环体D、不论"条件"是否为"真"，至少要执行一次循环体

10、"x是小于100的非负数"，用VB表达式表示正确的是(C )

A、0 <= x 0r x < 100 B、0 <= x < 100 C、0 <= x And x < 100 D、0 <=x , x < 100

11、下列语句错误的是( C) A、exit for B、exit do C、end sub D、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)

A、15 B、18 C、10 D、0

14、如果要清除在窗体中打印输出的文字，可以利用( C)语 A、Input B、Load C、Cls D、Paint

15、case <表达式表列>,其中的表达式表列不正确的为(D )

A、Case 100*a B、Case 1000 To 2000 C、Case Is<3000 D、Case 2000<Is<3000

16、下列说法错误的是( D)

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、1 B、4 C、8 D、20

19、以下声明和命名标识符错误的是( C)A、必须以字母开头B、变量名的最后一个字符可以是类型声明字符C、长度不能超过8个字符D、不能与关键字同名

20、下列说明错误的是(D)

A、Const MyVar#=123B、Dim myname as string C、dim a as integer,dim b as single D、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、True B、False C、-1 D、1

23、语句6 * 6\6/6的输出结果是( C) A、6 B、12 C、36 D、216

24、给窗体form1加载背景图片，应使用(C ) A、picture B、ucase C、loadpicture D、image

25、字符串"河南农业大学现教部"的长度是(C ) A、18 B、10 C、9 D、16

1、以下叙述中错误的是( A)

A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B、控件的名称可以由编程人员设定

C、窗体文件包含该窗体及其控件的属性 D、Visual Basic 中控件的某些属性只能在运行时设置

2、以下关于窗体的描述中,错误的是( D)

A、窗体的Load事件在加载窗体时发生 B、当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被禁止

C、窗体的Height、width属性用于设置窗体的高和宽 D、执行Unload Form1语句后,窗体Form1消失,但仍在内存中

3、用Static M (60 to 90) As Integer语句定义的数组的元素个数是(C) A、60 B、30 C、31 D、90

4、如果整型变量a、b的值分别为3和1,则下列语句中For I=a to b : Print I : Next I 循环体的执行次数是(D)

A、3 B、2 C、1 D、0

5、关于语句If x=1 Then y=1 下列正确的说法是(C )

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)

河南农业大学vb题库VB选择判断填空

A、Not (-10 To 10) B、10 To -10 C、Is < -10, Is >10 D、ABS(X) > 10

7、下列哪条语句是错的( C )

A、RTrim() B、Exit Function C、Exit While D、Exit Do

8、在Visual Basic中下面的四个数组声明语句,正确的是(C)

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)

A、26 B、27 C、28 D、29

10、下面说法错误的是( B )

A、对象的性质和状态值称为"属性" B、请求对象执行某一操作的要求称为"消息"

C、改变对象的一个或多个属性值的操作称为"事件" D、对象发生某事件所执行的程序称为事件驱动程序

11、若使用文本框Text1,为对用户输入内容进行立即检查,应对Text1的哪个事件编程( A )

A、Change B、Interval C、Left D、Top

12、如果数据包含小数,则不应定义为下列哪种类型(C )

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)

A、167 B、139 C、144 D、155

14、有如下程序,m$ ="ABCDE":MID(m$, 1 ,5)="abcde":Print m$,运行后的输出结果是( A )

A、abcdeABCDE B、ABCDEabcde C、abcde D、ABCDE

15、在下列四个式子中,非法的Visual Basic表达式是(C)

A、a=b+e B、5>3+3 C、a=exp D、5<>5

16、表达式INT(6*RND+1)*(INT(6*RND－1))值的范围是( B )

A、[-6,18] B、[-6,24] C、[-3,24] D、[-3,18]

17、字符串"计算机技术基础"的长度是,应使用下列(C )函数

A、TAB B、STR C、LEN D、INSTR

18、表达式(not true or true) and (true or false)的值为(B)

A、false B、true C、0 D、-1

19、下列叙述中正确的是(C)

A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程

C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程

D、在调用过程时,所有局部变量被系统初始化为0或空符串

20、下面的变量名合法的是(C )

A、 B、k%name C、name D、k-name

21、在Visual Basic中,下面四个数据,数据形式错误的是(D )

A、3.456# B、236! C、1.23D-23 D、1.89E1.1

22、已知C>D,S>T,正确表示它们之间关系的式子是( B)

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)

A、[11,111] B、[100,110] C、[11,100] D、[100,111]

24、下列关于属性设置的叙述正确的是(D )

A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变

C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性

25、Visual Basic中没有提供下列( D)事件

A、MouseDown B、MouseUp C、MouseMove D、MouseExit

1、如果一个工程喊有多个窗体，则一下叙述中错误的是

A、不可以在运行期间改变对象的Name属性的值 B、用Hide方法只是隐藏一个窗体,不能从内存中清除该窗体

C、任何时刻最多只有一个窗体是活动窗体 D、窗体的Name属性的值是显示在窗体标题栏中的文本

2、下列不能打开属性窗口的操作是(C )

A、执行“视图”菜单中的"属性窗口"命令 B、按F4键 C、按Ctrl+T D、单击工具栏上的"属性窗口"按钮

3、用Dim S (20) As Integer语句定义的数组的元素个数是(C )

A、19 B、20 C、21 D、22

河南农业大学vb题库VB选择判断填空

4、如果整型变量a、b的值分别为3和1,则下列语句中For I=a to b : Print I : Next I 循环体的执行次数是( D)

A、3 B、2 C、1 D、0

5、关于语句If x=1 Then y=1 下列正确的说法是(C)

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 )

A、Not (-10 To 10) B、10 To -10 C、Is < -10, Is >10 D、ABS(X) > 10

7、在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是( a )

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 )

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)

A、21 3 0 B、21 4 0 C、20 3 0 D、20 4 0

10、如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( C )

A、发生一个运行时错误 B、发生一个编译时错误

C、在所有的初始化代码运行后Form1是活动窗体 D、在所有的初始化代码运行后Form2是活动窗体

11、以下控件中可以入选为容器控件的是( B)

A、Image图像框控件 B、PictureBox图片框控件 C、TextBox文本框控件 D、ListBox列表框控件

12、假设变量bool_x是一个布尔型(逻辑型)的变量,则下面正确的赋值语句是( D )

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 )

A、21 B、41 C、63 D、210

15、在下列四个式子中,非法的Visual Basic表达式是(C )

A、a=b+e B、5>3+3 C、a=exp D、5<>5

16、表达式INT(4*RND+2)*(INT(4*RND－2))值的范围是( C)

A、[-10,8] B、[-4,8] C、[-10,5] D、[4,8]

17、要统计出字符串"计算机技术基础visual basic"的长度,应使用下列( C)函数

A、TAB B、STR C、LEN D、INSTR

18、表达式25\3 mod 3.2*int(2.5)的值为(B )

A、1 B、2 C、3 D、5

19、Dim b1,b2 as boolean语句显式声明变量(D) !!!!!!!

A、b1和b2都为布尔型变量 B、b1是整型,b2是布尔型变量

C、b1和b2都为是可变型变量 D、b1是可变型,b2是布尔型变量

20、下列哪一个是Visual Basic合法变量名( D)

A、IF B、7AB C、A[B]7 D、AB7

21、用变量a存放数据888666.666888,应将变量a的类型定义为(D )

A、Long B、Integer C、Single D、Double

22、下面逻辑表达式值为真的是( C)

A、"A" > "a" B、"9" > "a" C、"That" > "Thank" D、12>12.1

23、函数String(n,"str")的功能是(B )

A、把数值型数据转换为字符串 B、返回由n个字符组成的字符串

C、从字符串中取出n个字符 D、从字符串中第n个字符的位置开始取子字符串

24、如果希望一个窗体在显示的时候没有边框,应该设置的属性是( B )

A、将窗体的Caption设成空字符 B、将窗体的BorderStyle置成None

河南农业大学vb题库VB选择判断填空

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=0 or 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、 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<a B、a>b Or c<a C、a<b and c>a D、b>c Or c<a

河南农业大学vb题库VB选择判断填空

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

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、显示出错信息

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

19、下列叙述中正确的是(C )（1分）

A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程

C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程

D、在调用过程时,所有局部变量被系统初始化为0或空符串

20、以下哪一个是变量名是错误的( C )（1分）

河南农业大学vb题库VB选择判断填空

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 )

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<n B、n=10 : s=1 : i=1 : Do: s=s*i : i=i+1 : Loop While i<n

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]

河南农业大学vb题库VB选择判断填空

17、要统计出字符串"VB计算机技术基础"的长度,应使用下列C )函数

A、TAB B、STR C、LEN D、INSTR

18、表达式(not true or true) and (true or false)的值为(B )

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 )

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<a B、a>b Or c<a C、a<b and c>a D、b>c Or c<a

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属性可以为空

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、&

河南农业大学vb题库VB选择判断填空

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、显示出错信息

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 )

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,数组中的元素类型也必须保持一致

河南农业大学vb题库VB选择判断填空

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的命令建立的

河南农业大学vb题库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 )

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 =VAL(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均为关系表达式

河南农业大学vb题库VB选择判断填空

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分）

河南农业大学vb题库VB选择判断填空

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

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的值为( )

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的保留字

河南农业大学vb题库VB选择判断填空

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<a B、a>b Or c<a C、a<b and c>a D、b>c Or c<a

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)

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<n B、n=5 : x=1 : i=1 : Do : x=x*i : i=i+1 : Loop While i<n

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 =VAL(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

河南农业大学vb题库VB选择判断填空

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事件。R

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分） 正确

河南农业大学vb题库VB选择判断填空

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属性设置字号、用属性设置字体名称、用Font.StrikeThtouth属性设置删除线 。

3、表示整型（Integer）的单一字符是%、长整型（long）是&、单精度（Single）是！、双精度（Double）是#、货币型（currency）是@、字符型（string）是￥、字节型（byte）逻辑型（boolean）

4、一个工程可以包括多种类型的文件,其中可执行文件的窗体名为.frm,扩展名为.vbp

河南农业大学vb题库VB选择判断填空

将对象设置为可见的，是将它的属性值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

本文来源：https://www.bwwdw.com/article/riej.html