VB编程_计算机考试题.doc

计算机VB期末考试 判断题
1) 在Visual Basic程序设计中,TextBox对象没有Caption属性。
对
2) 保存新建工程时，默认的路径是c:\Windows。
错
3) 当按钮的Enable属性设置为False时，该按钮为不可见。
错
4) 在Select case结构中应至少包含一个1子句。
对
5) 启动VB6.0时，VB6.0默认的工程类型是标准EXE程序。
对
6) 当对窗体中的对象进行单击操作时，Visual Basic就会显示该对象的代码窗口。
错
7) Visual Basic的对象是窗体和控件的总称。
对
8) 用窗体的Caption属性可以设置窗体的标题。
对
9) 建立控件时系统自动给控件一个名称，第一个建立的命令按钮名称是Command。
错
10) 标签框有Text属性。
错
11) 文本框没有Caption属性。
对
12) Visual Basic 提供了列表框控件，当列表框中的项目较多、超过了列表框的长度时，系统会自动在列表框边上加一个滚动条。
对
13) 用面向对象的编程思想观点来看，一只黑色的台球被打进袋内，则台球是对象、黑色是方法。
错
14) 单击滚动条的滚动箭头时，产生的事件是Change。
对
15) 图片框的默认属性为Caption。
错
16) 在Visual Basic设计界面中,工程窗口 是不能隐藏的窗口。
对
17) 对象名.函数名 可以构成语句。
错
18) 事件驱动不是Visual Basic的特点。
错
19) 事件是Visual Basic预先定义的对象能识别的动作。
对
20) 属性是指对象的名字、大小、位置和颜色等特性。
对
21) 在Visual Basic中通过FontColor 属性来设置字体颜色。
错
22) 窗体的Name与其Caption属性相同。
错
23) 方法是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。
对
24) 对象可以识别和响应的某些行为称为事件
对
25) Double类型的数据由 4 个字节组成。
错
26) 整型数的取值范围为–32768～+32768 。
错
27) 3abc为合法变量。
错
28) 局部变量是指那些在过程中用Dim语句或Static语句声明的变量。
对
29) 局部变量的作用域仅限于声明它的过程。
对
30) 静态局部变量是在过程中用Static语句声明的。
对
31) 局部变量在声明它的过程执行完毕后就被释放了。
错
32) 逻辑表达式Not"a">"b" And 93的值为true 。
对
33) 为使文本框显示滚动条，必须首先设置ScrollBars属性。
错
34) Index 属性决定了按Tab键时焦点在各个控件之间移动的顺序。
错
35) 改变控件在窗体中的上下位置应修改控件的Width 属性。
错
36) 将命令按钮Command1设置为不可见，应修改该命令按钮的Enabled 属性。
错
37) 要改变Label控件中文字的颜色，可以设置Label控件的ForeColor属性。
对
38) 复选框对象是否被选中，是由其Value属性决定的。
对
39) 将定时器的时间间隔设置为1秒，那么定时器的Interval属性值应设为1。
错
40) 计时器对象不能响应Click事件。
对
41) 框架由于是一种辅助性的控件，功能较单一，属性较少所以有name属性,没有caption属性。
错
42) 选择框架中的多个控件，按下Shift键点击各控件或按下Ctrl键的同时用鼠标拖拉框架内的控件。
对
43) 复选框的功能是独立的，如果一个窗体上有多个复选框，用户可根据需要选择一个或几个。
对
44) 复选框的value有2个值，即0或1。
错
45) 列表框 (ListBox)用于返回列表框中所有选项的个数,其属性listcount只能在程序代码中调用和设置。
对
46) 列表框的listindex返回当前选项的索引号，索引号从0开始。如果没有选项被选中，该属性为1。
错
47) 列表框List属性可以得到列表中任何选项的值，它以数组的方式存在。
对
48) 列表框Columns属性可以用来设置列表框多列显示。
对
49) 组合框的属性style=0表示下拉式组合框。
对
50) 简单组合框，它由一个文本框和一个标准列表框组成，列表框是下拉式的。
错
51) 图片框和图像框的主要区别是：image除了可以显示图形之外，还可以作为其它控件的容器。
错
52) LoadPicture（）函数用于在程序的代码中对窗体、图片框或图像框的Picture属性赋值，以便在程序的运行阶段加载图形文件。
对
53) 图像框的功能较单一，可以用于显示动态图像。
错
54) 计时器（Timer）的Interval属性的默认单位为毫秒。
对
55) 计时器（Timer）的Interval属性的取值范围0-65535。
对
56) 计时器（Timer）的Interval属性的取值为0时表示计时器触发次数最多。
错
57) 计时器不只有Timer事件，interval也是计时器的事件。
错
58) 滚动条通常用于浏览显示内容、确定位置，也可以作为数据输入的工具。通过编程控制，可以为不具备滚动能力的控件提供滚动功能。
对
59) 滚动条在常用工具栏是一个控件。
错
60) 当滚动条位于最右端或顶端时，表示其值最大，反之为最小。
错
61) 滚动条上，当单击滚动箭头、单击滚动条区域或拖动滑动块结束时将触发Change事件。
对
62) 当在滚动条内拖动滑动块时只触发Scroll事件。
错
63) 控件中不能改变大小的只有timer。
错
64) 若要使标签透明，则可使用属性BackColor。
错
65) 滚动条的最小值、最大值、最小变动值、最大变动值属性均可自行设计。
对
66) 滚动条所处的位置可由Value属性标识。
对
67) 可以用剪切+复制的方法将已有控件放入框架中。
对
68) 框架内所有的控件会随框架一起移动、显示、消失和屏蔽。
对
69) 在一个语句行内写多条语句时，语句之间应该用逗号分隔。
错
70) 在语句Label1.caption="欢迎"被执行之前，标签控件Label1的Caption属性为默认值，则该语句被执行后，标签控件Label1的Name属性和Caption属性的值分别为：“label”、 “欢迎”。
错
71) 在visual basic中，要将一个窗体从内存中释放，应使用load语句。
错
72) 在Visual Basic中按文件的访问方式不同，可以将文件分为数据文件和可执行文件。
错
73) 在Visual Basic 中，要使一个窗体不可见，但不从内存不释放，应使用UnLoad语句。
错
74) 要想改变一个窗体的标题内容，则应该设置Name属性的值。
错
75) 要使窗体Form1的标题栏中显示“正在复制文件…”，应在代码中输入：Form1.Text="正在复制文件…”。
错
76) 要使文本框在程序运行时不能由用户直接输入数据，应设置文本框的Visible属性设置为False。
错
77) 要禁用计时器控件、需要将Visible属性设置为false。
错
78) 要获得文件列表框中当前被选中的文件的文件名，则应使用Filename。
对
79) 要获得当前驱动器应使用驱动器列表框的Dir属性。
错
80) 使用a=b:b=a 语句可以将变量A和B的值互换。
错
81) 将当前窗体中显示的文字及绘制的图形全部清除，可以用方法me.cls。
对
82) 控件的事件过程内容决定事件发生时的执行代码。
对
83) 通常，文本框的Setfocus方法不能使用在Form_load事件中。
对

廊坊师范学院计算机VB期末考试 判断题
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=";A
答案：A=11
6) 表达式3/6*5的值是_______。
答案：2.5
7) 下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。 If a<b Then d=a:a=b:b=d EndIf If a<c Then d=a:a=c:c=d EndIf If_____Then d=b:b=c:c=d EndIf Print a,b,c
答案：b<c
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
11) 逻辑常量值为TRUE或_______。
答案：FALSE
12) 货币类型的数据小数点的位置是固定的，精确到小数点后_____位。
答案：4
13) 表达式（2+8*3）/2的值是______。
答案：13
14) 以下程序用来判断一个整数X是否为偶数，并将其中的偶数在窗体上显示，请补充完该程序。 If X___2=____ Then Print X
答案：MOD#0
15) 当对窗体中的对象进行_____操作时，Visual Basic 就会显示该对象的代码窗口。
答案：双击
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("C:\PIC2.GIF")
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
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中的常量分为两种，一种是文字常量，一种是____常量。
答案：符号
31) Visual Basie 提供了列表框控件， 当列表框中的项目较多、超过了列表框的长度时， 系统会自动在列表框边上加一个______。
答案：滚动条
32) 一个程序最多可以有________窗体。
答案：255
33) 将一般窗体转换为MDI窗体的子窗体时要把MDIChild属性的值设置为_______。
答案：TRUE
34) 要选择多个不相邻的控件，按住_______或SHIFT键不放，再单击要选择的控件。
答案：CTRL
35) 表达式："1"+"2"="3"的值是_______。
答案：FALSE
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
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
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
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="&s56) 表达式Fix(-32.68)+Int(-23.02)的值为______。
答案：-56
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
56）
答案：s=42
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
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
66) 表达式15+3*3/9*5\5 mod 10 的值是______。
答案：16
67) 有如下程序，该程序的运行后输出的结果是______。 Private sub Command1_Click() I="AAAAAA" Mid(I,4,3)="BBB" 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
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("SHANGHAI",6,3)的值是______。
答案：HAI
74) 表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是_____。
答案：0
75) VB程序设计中三种基本结构分是：_______结构、选择结构和_______结构。
答案：顺序#循环
76) ______是构成文件的最基本的单位。
答案：字符
77) 顺序文件与随机文件相比较，占用内存资源较小的文件是______文件。
答案：随机
78) 随机文件是以_______为单位读写，二进制文件以_______为单位读写。
答案：纪录#字节
79) 随机函数Rnd(X)，当X=_____时返回最近一次调用Rnd函数生成的随机数。
答案：0
80) 语句x=inputbox("请输入数据"),输入12345,则x的值为______类型的数据（提示：例如整型，Int；字符型，String）。
答案：STRING
81) x,y中至少有一个变量小于变量z的VB表达式为x<z ____ y<z。
答案：OR
82) 以下程序段的输出结果是____。 Num=0 While num<=2 num=num+1 Wend Print num
答案：3
83) 如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为______。
答案：-
84) 在Visual Basic中按文件的访问方式不同, 可以将文件分为顺序文件、随机文件和______。
答案：二进制文件
85) 如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中______个选项按钮（提示：该题答案不能出现汉字）。
答案：2
86) 以下语句的执行结果是____。 I = Format(5459.4, "##,##0.00") 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
91) 编写如下代码：Private Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single, Y AsSingle) If Button=1 And Shift=2 Then Print "Multiple Choice" 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
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
101) 有如下程序段，该程序段执行完毕后，共循环了_____次。 For I =1 to 2 For J =1 to I For k =1 to J Print"a" 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) 表达式："1" & "2" = "12"的值是_______。
答案：TRUE

6