发布时间 : 星期四 文章vb复习题（题目+答案）更新完毕开始阅读98ae72e41eb91a37f0115c71
属性均可自行设计。 答案：对 4) 双精度数用字母_____将尾数与指数分开。 答66) 滚动条所处的位置可由Value属性标识。 答案：D 案：对 5) 下列程序段的执行后输出的结果为_____。 67) 可以用剪切+复制的方法将已有控件放入框架中。 I=4:A=5 答案：对 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事件中。 答案：对 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 Do I=I+1:A=A+2 Loop Until I>=7 Print \答案：A=11 6) 表达式3/6*5的值是_______。 答案：2.5 7) 下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。 If a
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(\
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) 表达式：\的值是_______。 答案：FALSE 36) ______属性用来设置窗体的标题。它确定和改变显示在窗体的标题栏中的文本。 答案：CAPTION
37) 假定有一个文本框，其名称为Textl，为了使该文本框具有焦点，应执行的语句是______。 答案：TEXT1.SETFOCUS
38) 执行下面的程序段后，s的值为____。 S=5
For I=2.6 To 4.9 Step 2
s=s+1 Dim s As Long Next I 答案：7 Dim x As Integer 39) 表达式“12345”<>“12345”&“ABC”的值是_____。 s = 0 答案：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() 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=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 56) 表达式Fix(-32.68)+Int(-23.02)的值为______。 答案：-56
57) 在窗体上画一个命令按钮，然后编写如下事件过程： 73) 表达式：Mid(\的值是______。 Private Sub Command1_Click() 答案：HAI a=InputBox(\请输入一个整数\74) 表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是_____。 b=InputBox(\请输入一个整数\答案：0 Print a+b 75) VB程序设计中三种基本结构分是：_______结构、选End Sub 择结构和_______结构。 答案：顺序#循环 程序运行后，单击命令按钮，在输入对话框中分别输入76) ______是构成文件的最基本的单位。 答案：字321和456，输出结果为____。 答案：321456 符 58) 执行下面的程序段后，b的值为_____。 77) 顺序文件与随机文件相比较，占用内存资源较小的文 A=300:b=20 件是______文件。 答案：随机 a=a+b:b=a-b:a=a-b 答案：300 78) 随机文件是以_______为单位读写，二进制文件以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=\ 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 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 79) 随机函数Rnd(X)，当X=_____时返回最近一次调用Rnd函数生成的随机数。 答案：0 80) 语句x=inputbox(\请输入数据\输入12345,则x的值为______类型的数据（提示：例如整型，Int；字符型，String）。 答案：STRING 81) x,y中至少有一个变量小于变量z的VB表达式为x 案：4 89) 当程序开始运行，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的属性窗口中，把此文本框的____属性设置为空。 答案：TEXT 90) 将数据从内存写入随机文件，写入语句的格式是______[#]文件号，[记录号]，自定义变量名。 答案：PUT