vb - 复习资料

无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 46

46)货币型数据的类型标识符为______。 答案：@

47)以下程序用来输出1到100所有奇数的和，请补充完该程序。 Private Sub Command3_Click() Dim s As Long Dim x As Integer s = 0

For x=1 to 100 step____ s = s + x Next x Print s End Sub 答案：2

48)假设有一复选框控件，名为Check1，在程序中，我们用“check1.value=1”语句设置Value属性的值，则该程序执行后，复选框处于____状态。 答案：选中

49)激活属性窗口的快捷键是______。 答案：F4

50)下列程序的执行结果是_______。 A = 75

If a>60 Then I = 1

ElseIf a>70 Then I = 2

ElseIf a>80 Then I = 3

ElseIf a>90 Then I = 4 End If Print I 答案：1

记录 36

36)______属性用来设置窗体的标题。它确定和改变显示在窗体的标题栏中的文本。 答案：CAPTION

37)假定有一个文本框，其名称为Textl，为了使该文本框具有焦点，应执行的语句是______。 答案：TEXT1.SETFOCUS

38)执行下面的程序段后，s的值为____。 S=5

For I=2.6 To 4.9 Step 2 s=s+1 Next I

答案：7

39)表达式“12345”<>“12345”&“ABC”的值是_____。 答案：TRUE

40)下列程序用来计算1+2+3??+10的值，请补充完程序。 Dim t,k as single K=0

DO While k<10 K=k+1:______ loop print t 答案：T=T+K

31)Visual Basie 提供了列表框控件， 当列表框中的项目较多、超过了列表框的长度时，统会自动在列表框边上加一个______。 答案：滚动条

32)一个程序最多可以有________窗体。 答案：255

33)将一般窗体转换为MDI窗体的子窗体时要把MDIChild属性的值设置为_______。 答案：TRUE

34)要选择多个不相邻的控件，按住_______或SHIFT键不放，再单击要选择的控件。 答案：CTRL

35)表达式：\的值是_______。 答案：FALSE

26)以下程序计算2到50间所有偶数的和，请补充完该程序 Sub mult()

Dim Sum As Integer Sum=0

Dim I as integer For___to 50

If I MOD 2=___Then___ Next I Print sum End Sub

答案：I=2#0#SUM=SUM+I

27)A=7,B=3,C=4,则表达式 A MOD 3+B^3/C\\5的值为____。 答案：2

28)下列循环语句，要求和数达到10既停止累加，退出循环，请补充完程序。 For j=1 to 10 s=s+j

If s>=10 then______。 Next j

答案：EXIT FOR

29)下列程序段的运行结果是： Sub sele()

Dim n as Integer

系 I=21:n=3 Do While I>n I=I-n Loop Print I End Sub

打印结果_____。 答案：3

30)Visual Basie中的常量分为两种，一种是文字常量，一种是____常量。 答案：符号

记录 21

21)为了能自动放大或缩小图象框中的图形以与图象框的大小相适应,必须把该图象框的Stretch属性设置为______。 答案：TRUE

22)根据变量的定义位置和所使用的变量定义语句的不同，VB中的变量可以分为3类，即_____、模块变量和全局变量。 答案：局部变量

23)表达式3>4 and 7=5的值是______。 答案：FALSE

24)以下的程序用来输出100到2000间不能被3整除的数字，请补充完该程序。 Private Sub Commmand1_Click() Dim x As Integer x = 100

Do Until x > _____ If x Mod 3 <> 0 Then Print x End If x = x + 1 Loop End Sub 答案：X>200

25)下列程序段的执行时，共循环____次。 For a=0 To 1 For b=1 To 2 For c=1 To 3 I=I+1 Next c Next b next a 答案：12

46)复选对象是否被选中，是由其_____属性决定的。 a) Checked b) Value c) Enabled

d) Selected 答案：B

47)没有Caption属性的控件是_____。 a) Label

b) OptionButton c) Frame d) LisBox 答案：D

48)下列符号是Visual Basic中合法变量名的是_____。 a) IF b) 7AB c) A[B]7 d) AB_7 答案：D

49) 使窗体自动向下移动的语句是Move_____。 a) Left, Top+100 b) Top+100 c) Top+100

d) Top=Top+100 答案：A 50)

RGB函数通过红、绿、蓝三基色混合产生某种颜色，其语法为RGB（红、绿、蓝），括号中红、绿、蓝三基色的成分使用0-255之间的整数。若使用3个滚动条分别输入3种基色，为保证输入数值有效，则应设置_____属性。 a) Max和Min

b) SmallChange和LargeChange c) Scroll和Change d) Value 答案：A

41) 用InputBox函数可帮助生成_______。 a) 消息框

b) “保存”对话框 c) 简单输入框

d) “颜色”对话框 答案：C

42)______对象不能响应Click事件。 a) 列表框 b) 图片框 c) 窗体 d) 计时器 答案：D

43)17 mod 3的运算结果是_____。 a) 0.5 b) 1 c) 1.5

d) 2 答案：D

44)变量X=32769，则变量声明时不能将其声明为_____。 a) Intrger b) Variant c) Long d) Single 答案：A

45)表达式2*3^2+2*8/4+3^2的值为_____。 a) 64 b) 31 c) 49 d) 22 答案：B

36) _____是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。 a) 文件 b) 属性 c) 方法 d) 窗体 答案：C

37) 刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是_____。 a) 单选按钮 b) 图片框 c) 通用对话框 d) 文本框 答案：C

38) 下列各项不是Visual Basic的基本数据类型的是_____。 a) Char b) String c) Integer d) Double 答案：A

39) 下列运算结果中，值最大的是 ______。 a) 3\\4 b) 3/4 c) 4 mod 3 d) 3 mod 4 答案：D

40) 以下不属控件的一项是_____。 a) 文本框 b) 标签框 c) 列表框 d) 消息框 答案：D

31)有如下程序，该程序将______。 For I=1 to 10 step 0 K=k+2 Next I

a) 形成无限循环。

b) 循环体执行一此后结束循环。 c) 语法错误。

d) 循环体不执行即结束循环。 答案：A

32)有如下程序段，该程序段执行完毕后，共循环了________。 For I=1 To 5 For j=1 To I For k=j To 4 Print \ Next k Next j Next I a) 4 b) 5 c) 38 d) 40 答案：D

33)有如下程序，该程序的运行结果为______。 Dim k As Integer n=5:m=1:k=1 Do While k<=n m=m*2 k=k+1 Loop Print m a) 1 b) 5 c) 32 d) 40 答案：C

34)以下程序输出1到1000之间所有的偶数之和，请补充完该程序。 Private Sub Command_Click() Dim x As Double For I=0 To 1000 If ____ Then x=x+I End If Next I Print x End Sub

a) i Mod 2 = 0 b) x Mod 2 = 0 c) I Mod 2 <> 0 d) x Mod 2 <> 0 答案：A

35)以下是计算10的阶乘的程序，请补充该程序。 Dim t as single Dim k as Integer k=0:t=1

While_______ k=k+1 t=t*k Wend Print t a) k<10 b) k>10 c) k=10 d) k>=10 答案：A

记录 31 到 35 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库 单项选择题判断题填空题编程题

26)执行下列程序后，变量a的值为____。 Dim I as integer dim a as integer a=0

for I=0 to 100 step 2 a=a+1 next I a) 1 b) 10 c) 51 d) 100 答案：C

27)执行下列程序后，X的值为______。 X=3 y=6

Do While y<=6 x=x*y y=y+1 Loop a) 3 b) 6 c) 18 d) 20

答案：C

28)执行下列程序段后，整型变量c的值为___。 A=24 b=328

select case b\\10 case 0

c=a*10+b case 1 to 9 c=a*100+b case 10 to 99 c=a*1000+b end select a) 537 b) 2427 c) 24328 d) 240328 答案：C

29)执行完下面的程序段后，循环将执行____次。 For I=1.7 To 5.9 Step 0.9 a=a+1 Print a Next I a) 3 b) 4 c) 5 d) 6 答案：C

30)有如下语句，执行后该段语句的循环次数是_____。 Dim s,I,j as integer For I =1 to 3

For j=3 To 1 Step-1 S=I*j Next j Next I a) 9 b) 10 c) 3 d) 4 答案：A

21)下面程序段的循环结构执行后， 的输出值是_____。 程序段为：

For I=1 to 10 step 2 y=y+I Next I print I;

a) 25 b) 10 c) 11

d) 因为Y的初值不知道，所以不确定 答案：C

22)写列程序段的执行结果____。 A=\ for I=6 to 2 step -2 x=mid(a,I,I) y=left(a,I) z=right(a,I) z=x & y & z next I

print Ucase(z) a) ABA

b) AABAAB c) BBABBA d) ABBABA 答案：C

23)以下语句输出结果是（在立即窗口中）_____。 A=\ b=\ Print a;b

a) Beijing ShangHai b) Abeijing ShangHai c) BeijingShangHai d) Abeijing 答案：C

24)有如下程序： For I=1 To 3

For j=5 To 1 Step-1 Print I+j Next j,I

其循环执行的次数为______。 a) 12 b) 13 c) 14 d) 15 答案：D

25)有如下程序段，该程序执行后，变量a的值为______。 For I=1 To 2 For J=I To 2 For K=1 To J a=a+2 Next K Next J

Next I a) 2 b) 8 c) 10 d) 20 答案：C

记录 21 到 25 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库 单项选择题判断题填空题编程题

16)下列程序的执行结果为_____。 A=100:b=50 If a>b Then a=a-b Else

b=b+a End if Print a a) 50 b) 100 c) 200 d) 10 答案：A

17)下列程序的执行结果为________。 Dim intsum As Integer Dim I As Integer intsum=0

For I=0 To 50 Step 10 intsum=intsum+I Next I

Print intsum a) 150 b) 200 c) 50 d) 0 答案：A

18)下面程序执行后，X的结果为_____。 X=0

For I =1 to 5 For j=I to 5 X=X+1 Next j Next I Print X a) 5 b) 10

c) 15 d) 20 答案：C

19)下面程序执行的结果是____。 Private Sub Form_Click() A$=\ C=Val(A$)+Val(B$) Print C\\100 End Sub a) 123 b) 3 c) 5 d) 579 答案：C

20)下列循环语句将执行______次。 A=100 Do

Print a a=a+1

Loop until a<=10 a) 1 b) 10 c) 100 d) 死循环 答案：D

记录 16 到 20 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库 单项选择题判断题填空题编程题

11)下列程序的运行后s的值是_____。 S=0

For x=99 to 1 Step-2 s=s+x Next x Print s a) 100 b) 500 c) 2500 d) 5000 答案：C

12)下列程序的执行结果是____。 K=0

For I=1 To 3 a=I^I^K print a; Next I

a) 1 1 1 b) 1 2 3 c) 0 0 0 d) 1 4 9 答案：A

13)下列程序的执行结果是_____。 Dim a(5) As String Dim b As Integer Dim I As Integer For I =0 To 5 a(I)=I+1 Print a(I) Next I

a) 123456 b) 6

c) 654321 d) 0 答案：A

14)下列程序的执行结果为_____。 Dim intsum As Integer Dim I As Integer intsum=0

For I=20.2 To 5 Step -4.7 intsum=intsum +I Next I

Print intsum a) 150 b) 200 c) 50 d) 0 答案：C

15)下列程序的执行结果为_____。 Dim S As Integer,n As Integer S=0:n=1

Do While n<=100 S=S+n n=n+1 Loop Print S a) 5050 b) 2500 c) 3000 d) 4000 答案：A

记录 11 到 15 (总共 351 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库

单项选择题判断题填空题编程题

6)当执行以下程序时，在名为lblResult的标签框内将显示_____。 Private Sub cmdlt_click() Dim I,R R=0

For I=1 To 5 Step 1 R=R+I Next I

lblResult.Caption=Str（R） End Sub

a) 字符串15 b) 整数15 c) 字符串5 d) 整数5 答案：A

7)如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里输入______。

X=1 do

x=x+3 print x loop until(___) a) x>=8 b) x<=8 c) x>=7 d) x<=7 答案：A

8)若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为______。 If a>5 then if b<4 then c=a-b else

c=b-a End if

elseif b>3 then c=a*b else

c=a mod b End if a) 2 b) -1 c) 1 d) 6 答案：A

9)设有如下语句：

str1=inputbox(\输入\练习\

从键盘上输入字符串“示例”后，str1的值是___。 a) “输入” b) “”

c) “练习” d) “示例” 答案：D

10)我们在一个窗体上建立两个文本框，名称分别为Text1和Text2，事件过程如下， Private Sub Text1_change( ) Text2.text=ucase(Text1.text) End Sub

则在Text1文本框输入“visual basic”，Text2将______。 a) Text2中无内容显示。

b) Text2显示\。 c) Text2显示\ d) Text1显示\ 答案：B

记录 6 到 10 (总共 351 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 16

16)下列程序的执行结果是____。 T = O : m = 1 : Sum = 0 Do

t = t + m : Sum = Sum + t : m = m + 2 Loop While m <= 9 Print Sum 答案：55

17)一组具有相同名称，不同下标的下标变量称为______。 答案：数组

18)给定年份，下列程序用来判断该年是否闰年，请补充完该程序。

提示：闰年的条件是年号可以被4整除但不能被100整除，或者能被400整除。 Private Sub Command6_Click() Dim y As Integer

y=InputBox(\请输入年号\

If(y Mod 4=0______y Mod 100<>0) or (y Mod 400=0) Then Print \是闰年\

Else Print \是普通年份\ End If End Sub 答案：AND

19)设a=2,b=3,c=4,d=5下列a>b and c<>d or c=a表达式的值是_____。 答案：FALSE

20)假定在C：盘根目录下有一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框，应执行的语句为_____。

答案：PICTURE1.PICTURE=LOADPICTURE(\

到 20 (总共 103 个记录) 第一页 前一页 下一页 最后一页 vb期末复习题库Visual Basic 期末复习题库 单项选择题判断题填空题编程题

1)下列程序运行后，输出的结果为______。 B=1

Do while (b<40) b=b*(b+1) Loop Print b a) 42 b) 39 c) 6 d) 1 答案：A

2)设执行以下程序段时依次输入1、3、5，执行结果为_____。 Dim a(4) As Integer Dim b(4) As Integer For K =0 To 2

a(K+1) =Val(InputBox(“请输入数据：\ b(3-K) =a(K+1) Next K Print b(K) a) 1 b) 3 c) 5 d) 0 答案：A

3)下列程序执行后，变量s的值为______。 Dim s As long ,x As Integer s=0:x=1

Do While (x<10) s=s+x x=x+2 Loop Print s a) 10 b) 25 c) 50 d) 100 答案：B

4)编写如下事件过程：

Private Sub Form_MouseDown(Button As Integer ,Shift As Integer,X As Single,Y As Single)

If Shift=6 And Button=2 Then Print \

End If End Sub

程序运行后，为了在窗体上输出\，应在窗体上执行以下_______操作。 a) 同时按下 Shift 键和鼠标左键 b) 同时按下 Shift 键和鼠标右键 c) 同时按下Ctrl、Alt 键和鼠标左键 d) 同时按下 Ctrl、Alt 键和鼠标右键 答案：D

5)当变量x=2,y=5时，以下程序的输出结果为____。 Do until y>5 x=x*y y=y+1 loop print x a) 2 b) 5 c) 10 d) 20 答案：C

记录 1 到 5 (总共 351 个记录) 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

49)组合框的属性style=0表示下拉式组合框。 对 错 答案：对

50)简单组合框，它由一个文本框和一个标准列表框组成，列表框是下拉式的。 对 错 答案：错

51)图片框和图像框的主要区别是：image除了可以显示图形之外，还可以作为其它控件的容器。

对 错 答案：错

记录 81 到 83 (总共 83 个记录) 第一页 前一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

44)复选框的value有2个值，即0或1。 对 错 答案：错

45)列表框 (ListBox)用于返回列表框中所有选项的个数,其属性listcount只能在程序代码中调用和设置。 对 错 答案：对

46)列表框的listindex返回当前选项的索引号，索引号从0开始。如果没有选项被选中，该属性为1。

对 错 答案：错

47)列表框List属性可以得到列表中任何选项的值，它以数组的方式存在。 对 错 答案：对

48)列表框Columns属性可以用来设置列表框多列显示。 对 错 答案：对

记录 76 到 80 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

39)将定时器的时间间隔设置为1秒，那么定时器的Interval属性值应设为1。 对 错 答案：错

40)计时器对象不能响应Click事件。 对 错 答案：对

41)框架由于是一种辅助性的控件，功能较单一，属性较少所以有name属性,没有caption属性。 对 错 答案：错

42)选择框架中的多个控件，按下Shift键点击各控件或按下Ctrl键的同时用鼠标拖拉框架内的控件。

对 错 答案：对

43)复选框的功能是独立的，如果一个窗体上有多个复选框，用户可根据需要选择一个或几个。 对 错 答案：对

记录 71 到 75 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

34)Index 属性决定了按Tab键时焦点在各个控件之间移动的顺序。 对 错 答案：错

35)改变控件在窗体中的上下位置应修改控件的Width 属性。 对 错 答案：错

36)将命令按钮Command1设置为不可见，应修改该命令按钮的Enabled 属性。 对 错 答案：错

37)要改变Label控件中文字的颜色，可以设置Label控件的ForeColor属性。 对 错 答案：对

38)复选框对象是否被选中，是由其Value属性决定的。 对 错

答案：对

记录 66 到 70 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

29)局部变量的作用域仅限于声明它的过程。 对 错 答案：对

30)静态局部变量是在过程中用Static语句声明的。 对 错 答案：对

31)局部变量在声明它的过程执行完毕后就被释放了。 对 错 答案：错

32)逻辑表达式Not\的值为true 。 对 错 答案：对

33)为使文本框显示滚动条，必须首先设置ScrollBars属性。 对 错 答案：错

记录 61 到 65 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

24)对象可以识别和响应的某些行为称为事件 对 错 答案：对

25)Double类型的数据由 4 个字节组成。 对 错 答案：错

26)整型数的取值范围为–32768～+32768 。 对 错 答案：错

27)3abc为合法变量。 对 错 答案：错

28)局部变量是指那些在过程中用Dim语句或Static语句声明的变量。 对 错 答案：对

记录 56 到 60 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

19)事件是Visual Basic预先定义的对象能识别的动作。 对 错 答案：对

20)属性是指对象的名字、大小、位置和颜色等特性。 对 错 答案：对

21)在Visual Basic中通过FontColor 属性来设置字体颜色。 对 错 答案：错

22)窗体的Name与其Caption属性相同。 对 错 答案：错

23)方法是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。 对 错 答案：对

记录 51 到 55 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

14)单击滚动条的滚动箭头时，产生的事件是Change。 对 错 答案：对

15)图片框的默认属性为Caption。 对 错 答案：错

16)在Visual Basic设计界面中,工程窗口 是不能隐藏的窗口。 对 错 答案：对

17)对象名.函数名 可以构成语句。 对 错 答案：错

18)事件驱动不是Visual Basic的特点。 对 错 答案：错

记录 46 到 50 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

9)建立控件时系统自动给控件一个名称，第一个建立的命令按钮名称是Command。 对 错 答案：错

10)标签框有Text属性。 对 错 答案：错

11)文本框没有Caption属性。 对 错 答案：对

12)Visual Basic 提供了列表框控件，当列表框中的项目较多、超过了列表框的长度时，系统

会自动在列表框边上加一个滚动条。 对 错 答案：对

13)用面向对象的编程思想观点来看，一只黑色的台球被打进袋内，则台球是对象、黑色是方法。

对 错 答案：错

记录 41 到 45 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 11

11)逻辑常量值为TRUE或_______。 答案：FALSE

12)货币类型的数据小数点的位置是固定的，精确到小数点后_____位。 答案：4

13)表达式（2+8*3）/2的值是______。 答案：13

14)以下程序用来判断一个整数X是否为偶数，并将其中的偶数在窗体上显示，请补充完该程序。

If X___2=____ Then Print X 答案：MOD#0

15)当对窗体中的对象进行_____操作时，Visual Basic 就会显示该对象的代码窗口。 答案：双击

到 15 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

4)在Select case结构中应至少包含一个1子句。 对 错 答案：对

5)启动VB6.0时，VB6.0默认的工程类型是标准EXE程序。 对 错 答案：对

6)当对窗体中的对象进行单击操作时，Visual Basic就会显示该对象的代码窗口。 对 错 答案：错

7)Visual Basic的对象是窗体和控件的总称。 对 错 答案：对

8)用窗体的Caption属性可以设置窗体的标题。 对 错 答案：对

记录 36 到 40 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

82)控件的事件过程内容决定事件发生时的执行代码。 对 错 答案：对

83)通常，文本框的Setfocus方法不能使用在Form_load事件中。 对 错 答案：对

1)在Visual Basic程序设计中,TextBox对象没有Caption属性。 对 错 答案：对

2)保存新建工程时，默认的路径是c:\\Windows。 对 错 答案：错

3)当按钮的Enable属性设置为False时，该按钮为不可见。 对 错 答案：错

记录 31 到 35 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

77)要禁用计时器控件、需要将Visible属性设置为false。 对 错 答案：错

78)要获得文件列表框中当前被选中的文件的文件名，则应使用Filename。 对 错 答案：对

79)要获得当前驱动器应使用驱动器列表框的Dir属性。 对 错 答案：错

80)使用a=b:b=a 语句可以将变量A和B的值互换。 对 错 答案：错

81)将当前窗体中显示的文字及绘制的图形全部清除，可以用方法me.cls。 对 错 答案：对

记录 26 到 30 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

72)在Visual Basic中按文件的访问方式不同，可以将文件分为数据文件和可执行文件。 对 错 答案：错

73)在Visual Basic 中，要使一个窗体不可见，但不从内存不释放，应使用UnLoad语句。 对 错 答案：错

74)要想改变一个窗体的标题内容，则应该设置Name属性的值。

对 错 答案：错

75)要使窗体Form1的标题栏中显示“正在复制文件?”，应在代码中输入：Form1.Text=\正在复制文件?”。 对 错 答案：错

76)要使文本框在程序运行时不能由用户直接输入数据，应设置文本框的Visible属性设置为False。

对 错 答案：错

记录 21 到 25 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

67)可以用剪切+复制的方法将已有控件放入框架中。 对 错 答案：对

68)框架内所有的控件会随框架一起移动、显示、消失和屏蔽。 对 错 答案：对

69)在一个语句行内写多条语句时，语句之间应该用逗号分隔。 对 错 答案：错

70)在语句Label1.caption=\欢迎\被执行之前，标签控件Label1的Caption属性为默认值，则该语句被执行后，标签控件Label1的Name属性和Caption属性的值分别为：“label”、 “欢迎”。 对 错 答案：错

71)在visual basic中，要将一个窗体从内存中释放，应使用load语句。 对 错 答案：错

记录 16 到 20 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

62)当在滚动条内拖动滑动块时只触发Scroll事件。 对 错 答案：错

63)控件中不能改变大小的只有timer。 对 错 答案：错

64)若要使标签透明，则可使用属性BackColor。 对 错 答案：错

65)滚动条的最小值、最大值、最小变动值、最大变动值属性均可自行设计。 对 错

答案：对

66)滚动条所处的位置可由Value属性标识。 对 错 答案：对

记录 11 到 15 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

57)计时器不只有Timer事件，interval也是计时器的事件。 对 错 答案：错

58)滚动条通常用于浏览显示内容、确定位置，也可以作为数据输入的工具。通过编程控制，可以为不具备滚动能力的控件提供滚动功能。 对 错 答案：对

59)滚动条在常用工具栏是一个控件。 对 错 答案：错

60)当滚动条位于最右端或顶端时，表示其值最大，反之为最小。 对 错 答案：错

61)滚动条上，当单击滚动箭头、单击滚动条区域或拖动滑动块结束时将触发Change事件。 对 错 答案：对

记录 6 到 10 (总共 83 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 判断题选择题填空题编程题

52)LoadPicture（）函数用于在程序的代码中对窗体、图片框或图像框的Picture属性赋值，以便在程序的运行阶段加载图形文件。 对 错 答案：对

53)图像框的功能较单一，可以用于显示动态图像。 对 错 答案：错

54)计时器（Timer）的Interval属性的默认单位为毫秒。 对 错 答案：对

55)计时器（Timer）的Interval属性的取值范围0-65535。 对 错 答案：对

56)计时器（Timer）的Interval属性的取值为0时表示计时器触发次数最多。 对 错 答案：错

记录 1 到 5 (总共 83 个记录) 下一页 最后一页 无标题文档Visual Basic 期末复习题库

填空题判断题选择题编程题

记录 101

101)有如下程序段，该程序段执行完毕后，共循环了_____次。 For I =1 to 2 For J =1 to I For k =1 to J Print\ Next K Next J Next I 答案：4

102)在窗体上添加一个命令按钮，名为Command1,事件过程如下： Private Sub Command1_Click() a=InputBox(\请输入a的值\ a=Val(a)

b=InputBox(\请输入b的值\ b=Val(b) a=a+b Print a End Sub

程序运行后，单击命令按钮，依次在输入对话框中输入1,1后，输出的结果是______。 答案：2

103)表达式：\的值是_______。 答案：TRUE

到 103 (总共 103 个记录) 第一页 前一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 96

96)对于Commandbutton控件，Picture属性用于给按钮加一个图形，只有当_______属性的属性值设置为1时，该属性才有效。 答案：STYLE

97)若要求从文本框中输入密码时在文本框中只显示#号，则应当在此文本框的属性窗口中设置_______属性。

答案：PASSWORDCHAR

98)若要使标签控件显示时，不覆盖其背景内容，应设置标签的______属性。 答案：BACKSTYLE

99)下列程序段的执行结果是_____。 K=0

For j=1 to 2 For I=1 to 3 k=I+1 Next I For I=1 To 7 k=k+1

Next I Next j Print k 答案：11

100)程序运行时，单击水平滚动条右边的箭头，滚动条的Value属性值增加一个_______量。 答案：SMALLCHANGE

到 100 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 6

6)表达式3/6*5的值是_______。 答案：2.5

7)下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。 If a

If a

If_____Then d=b:b=c:c=d EndIf Print a,b,c 答案：b

8)在Select case 结构中应至少包含一个______子句。 答案：CASE

9)窗体的属性可在属性窗口中设置，也可在程序中用______语句动态设置。 答案：赋值

10)有如下Sub过程: Sub ind(a As Integer) Static x As Integer x = x+a Print x; End Sub

以下是调用它的事件过程，程序运行后，单击命令按钮Command1，输出结果为______。 Private Sub Command1_Click() Ind(2) End Sub 答案：2

到 10 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 91

91)编写如下代码：

Private Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single, Y AsSingle)

If Button=1 And Shift=2 Then Print \ End If End Sub

程序运行后，要在窗体上输出“Multiple Choice”，则应在按下____的同时单击鼠标左键。 答案：CTRL

92)启动VB6.0时，VB6.0默认的工程类型是_______工程。 答案：标准EXE 93)逻辑运算时，参与运算的两个量都是False，结果才会是False的逻辑运算是_____运算（提示：该题答案不能出现汉字）。 答案：OR

94)有如下程序段，该程序段的执行结果是____。 For I=1 To 3 For j=1 To 3 n=n+1 Next j m=m+n Next I Print m 答案：18

95)设有以下的循环： x=1 Do

x=x+2 : Print x Loop Until____。

程序运行后，要求执行3次循环体，请补全以上程序。 答案：x>=6

到 95 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 86

86)以下语句的执行结果是____。 I = Format(5459.4, \ Print I 答案：5,459.40

87)______属性为列表框中的每个列表项设置一个对应的数值，它是一个整数数组，数组大小与列表项的个数一致。 答案：LIST

88)在窗体上画一个命令按钮(其Name属性为CommAnd1)，然后编写如下代码： Private Sub CommAnd1_Click() Dim M(10) As Integer For k=1 To 10 M(k)=12-k

Next k x=6

Print M(2+M(x)) End Sub

程序运行后，单击命令按钮，输出结果是______。 答案：4

89)当程序开始运行，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的属性窗口中，把此文本框的____属性设置为空。 答案：TEXT

90)将数据从内存写入随机文件，写入语句的格式是______[#]文件号，[记录号]，自定义变量名。

答案：PUT

到 90 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 81

81)x,y中至少有一个变量小于变量z的VB表达式为x

82)以下程序段的输出结果是____。 Num=0

While num<=2 num=num+1 Wend Print num 答案：3

83)如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为______。 答案：-

84)在Visual Basic中按文件的访问方式不同, 可以将文件分为顺序文件、随机文件和______。 答案：二进制文件

85)如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中______个选项按钮（提示：该题答案不能出现汉字）。 答案：2

到 85 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 76

76)______是构成文件的最基本的单位。 答案：字符

77)顺序文件与随机文件相比较，占用内存资源较小的文件是______文件。 答案：随机

78)随机文件是以_______为单位读写，二进制文件以_______为单位读写。 答案：纪录#字节

79)随机函数Rnd(X)，当X=_____时返回最近一次调用Rnd函数生成的随机数。 答案：0

80)语句x=inputbox(\请输入数据\输入12345,则x的值为______类型的数据（提示：例如整型，Int；字符型，String）。 答案：STRING

到 80 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 71

71)下面程序段执行后的结果是_____。 X=10

For I=6.3 to 4.9 Step -0.3 x=x-1 Next Print x 答案：5

72)表达式：5\\2*3的值是______。 答案：0

73)表达式：Mid(\的值是______。 答案：HAI

74)表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是_____。 答案：0

75)VB程序设计中三种基本结构分是：_______结构、选择结构和_______结构。 答案：顺序#循环

到 75 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 66

66)表达式15+3*3/9*5\\5 mod 10 的值是______。 答案：16

67)有如下程序，该程序的运行后输出的结果是______。 Private sub Command1_Click() I=\ Mid(I,4,3)=\ Print I End Sub 答案：AAABBB

68)有一数组定义语句：dim M(-2 to 1) as string，该语句定义的数组M中包含____个元素。 答案：4

69)设有数组声明语句：Option base 1 dim A(3,-2 to 1)，则数组A中有_____个元素。 答案：12

70)有数组定义语句：dim I(99,99) as Integer，则数组I中共包含有______个元素。 答案：10000

到 70 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 56

56)表达式Fix(-32.68)+Int(-23.02)的值为______。 答案：-56

57)在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click()

a=InputBox(\请输入一个整数\ b=InputBox(\请输入一个整数\ Print a+b End Sub

程序运行后，单击命令按钮，在输入对话框中分别输入321和456，输出结果为____。 答案：321456

58)执行下面的程序段后，b的值为_____。 A=300:b=20

a=a+b:b=a-b:a=a-b 答案：300

59)Visual Basic 的对象是________和_______的总称。 答案：窗体#控件

60)图片框的默认属性为_______（提示：该题只填写英文，如Name事件，只写Name即可）。 答案：PICTURE

到 60 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 61

61)滚动条响应的重要事件有_______和_______（提示：该题只填写英文，如Click事件，只写Click即可）。

答案：CHANGE#SCROLL

62)下列程序段执行后x的值是______。 X=100 : y=50

if x>y then x=x-y else x=x+y 答案：50

63)表达式32/2^3-3*2^2+4^2的值是_______。 答案：8

64)下列程序用来将变量X，Y的值互换，请补充完程序（提示：该题答案中不要出现空格）。 T=Y:______:X=T 答案：Y=X

65)有如下程序，该程序的运行结果是______。 A=20 : b=10 print a>b 答案：TRUE

到 65 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 51

51)下列程序段的运行后t的值为______。 Dim t,k as single k=5 : t=1

do While k>=-1 t=t*k : K=K-1 loop 答案：0

52)执行语句“a=6=5”后，变量a的值为______。 答案：FALSE

53)下面程序段的输出结果是_____。 P=0:s=0 Do

p = p+2 s = s+p

Loop While p<11 Print \ 答案：s=42

54)下面程序段的输出结果是______。 For X=1.5 To 5 Step 5 Print X; Next X 答案：1.5

55)执行下面的程序段后，s的值为______。 S=5

For I=2.6 To 4.9 Step 0.6 s=s+1 Next I 答案：9

到 55 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 41

41)下列程序段的执行后输出的结果为_______。 K = 1

For I = 1 To 3 A = I ^ I ^ K Next I Print A 答案：27

42)下列程序是用来计算1＋2＋3??＋10的程序段，请补充完该程序。 Dim I, s, k As Integer s = 0: k = 0 For____To -1 k = k+1:s = s+k Next I

Print s 答案：J=-10

43)执行inputbox函数后，会产生一个对话框，对话框上通常有两个按纽，它们是_____按纽和取消按钮。 答案：确定

44)下列程序的执行结果是_____。 M1 = 1:m2 = 1 Do While m2<>6

m1 = m1*m2 : m2 = m2+1 Loop Print m1 答案：120

45)下列程序的执行结果是_____。 Private Function P(N As Integer) For I = I To N

SUM = SUM + 1 Next I P = SUM End Function

Private Sub Command1_Click() S = P(1) + P(2) + P(3) + P(4) Print S; End Sub 答案：14

到 45 (总共 103 个记录) 第一页 前一页 下一页 最后一页 无标题文档Visual Basic 期末复习题库 填空题判断题选择题编程题

记录 1

1)假定当前日期为2002年7月12日，星期六，则执行语句Print day(now)后，输出结果是______。

答案：12

2)语句a%=3.14156:Print a%的输出结果是______。 答案：3

3)以下循环的执行次数是_____。 K=0

Do While k<=10 k=k+1 Loop 答案：11

4)双精度数用字母_____将尾数与指数分开。 答案：D

5)下列程序段的执行后输出的结果为_____。 I=4:A=5 Do

I=I+1:A=A+2

Loop Until I>=7 Print \ 答案：A=11

到 5 (总共 103 个记录) 下一页 最后一页