V B必做测验及答案
目录
实验4选择结构程序设计...................................... 错误!未定义书签。实验6循环结构程序设计...................................... 错误!未定义书签。实验7数组.................................................. 错误!未定义书签。实验9常用控件.............................................. 错误!未定义书签。
实验4选择结构程序设计
1.若整型变量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
2.下列程序的执行结果为_____。
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
3.以下程序输出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
4.下列程序段的执行结果为。
x=Int(Rnd+4)
Select Case x
Case 3
Print "优秀"
Case 4
Print "良好"
Case 5
Print "合格"
Case Else
Print "不合格"
End Select
A）优秀
B）良好
C）合格
D）不合格
答案：B
5.以下程序段的执行结果是_____。
X=2:y=1
If x*y<1 Then
y=y-1
Else
y=-1
Print y-x>0
End If
a) Ture
b) False
c) -1
d) 1 答案：B
6.设计两个CheckBox，一个显示粗体，一个显示斜体，通过对CheckBox的选择，在一个文本框中显示相应效果的文本，完成下列程序。
Private Sub Form_Load()
="显示粗体"
="显示斜体"
="Visual Basic "
End Sub
Private Sub Check1_Click()
If =1 Then
=True
Else
=False
End If
End Sub
Private Sub Check2_Click()
If =1 Then
Text1. FontItalic =True
Else
Text1. FontItalic =False
End If
End Sub
7.下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。 If a
d=a:a=b:b=d
EndIf
If a d=a:a=c:c=d EndIf If_____Then d=b:b=c:c=d EndIf Print a,b,c 答案：b 8.在下列关于 Select Case 的叙述中，错误的是（） 选择一个答案 a. Case 10 To 100 表示判断Is 是否介于10 与100之间 b. Case 〝abc〞,〝ABC〞表示判断Is 是否和〝abc〞、〝ABC〞两个字符 c. Case -7,0,100 表示判断Is 是否等于字符串〝-7，0，100〞 d. Case 〝X〞表示判断Is 是否为大写字母X 9.下列程序的执行结果是（） X=5 Y=-20 If Not X>0 Then X=Y-3 Else Y=X+3 Print X-Y;Y-X 选择一个答案 a. 3 -3 b. -3 3 c. 5 -8 d. 25 -25 10.下列说法正确与否： If语句中的条件表达式中只能使用关系或逻辑表达式 选择一个答案 a. 正确 b. 错误 11.以下说法正确与否： 在情况语句中，各分支（即Case表达式）的先后顺序无关。选择一个答案 a. 错误 b. 正确 12.以下说法正确与否： 有If 则必有与之对应的Endif。 选择一个答案 a. 错误 b. 正确 实验6循环结构程序设计 1. 下列程序的执行结果为_____。 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 2. 以下程序计算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 3.下列程序段的执行时，共循环____次。 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 4. 下列程序的执行结果是____。 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 5. 下列程序运行后，输出的结果为______。 B=1 Do while (b<40) b=b*(b+1) Loop Print b a) 42 b) 39 c) 6 d) 1 答案：A 6. 下列程序执行后，变量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 7. 当变量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 8. 执行下面的程序，在窗体上显示的输出结果的第一行是（15），第二行是（16）。 Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer c = -2 For a=6 To 1 Step c a = a +1 c = c-a b = b+1 Next a Print b Print c End Sub 答案：6 -29 9.要实现同样的循环控制，在Do While … Loop和Do … Loop While循环结构中给定的循环条件一样的。该结论是否正确： 选择一个答案 a. 正确 b. 错误 … Loop While语句实现循环时，不管条件真假，首先无条件地执行一次循环。 该结论是否正确： a. 错误 b. 正确 … Loop Until语句实现循环时，只要条件是假，循环将一直进行下去。该结论是否正确： 选择一个答案 a. 错误 b. 正确 循环语句正常结束（即不是通过Exit For语句退出循环或强制中断）其循环控制变量的值一定大于“终值”，并等于“终值”+“步长”。 该结论是否正确： 选择一个答案 a. 正确 b. 错误 13.如果有多重Do循环嵌套，位于最里层循环体语句中的Exit Do语句可以退出所有的循环。 该结论是否正确： a. 正确 b. 错误 1. 在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：Private Sub Command1_Click() Dim a(5) For i=0 To 4 A(i)=i+1 t=i+1 If t=3 Then Print a(i) A(t-1)=a(i-2) Else A(t)=a(i) End if If i=3 Then a(i+1)=a(t-4) A(4)=1 Print a(i) Next i End Sub 程序运行后，单击命令按钮，输出结果是 1 2 3 1 4 1 。 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. 如果有数组声明 Dim a(10) As Integer，则该数组共有______个元素。 a) 10 b) 11 c) 9 d) 不确定答案：B 4. 数组的下标可取的变量类型是_____。 a) 日期型 b) 字符型 c) 数值型 d) 可变型答案：C 5. 用以下语句 Dim b(-2 to 4)as string 所定义的数组的元素个数是_______个。 a) 2 b) 4 c) 6 d) 7 答案：D 6. 下列程序是将数组a的元素倒序交换，即第1个变为最后一个，第2个变为倒数第2个，设数组中有10个元素完成下列程序。 Private Sub Backward(a()) Dim i As Integer, Tmp As Integer For i=1 To 5 Tmp=a(i) Next i End Sub 7. 如下数组声明语句，正确的是______。 a) dim a[3,4] as intiger b) dim a(3,4) as string c) dim a(n,n) as single d) dim a(3 4) as integer 答案：B 8.下列关于数组的说法正确的是（） 选择一个答案 a. 在VB中，数组只能在模块中定义，不能在过程中定义 b. 在VB中，一个数组中所包含的元素只能是相同类型的数据 c. 在定义数组时，数组的每一维元素的个数必须是常数，不能是变量或表 d. 同普通变量一样，数组也可以不定义，先使用 9.使用 Dim 定义数组时，其数组的上界或下界，可使用已赋值的变量。该结论是否正确： 选择一个答案 a. 正确 b. 错误 10.数组的下界一定是大于 0 的整数。该结论是否正确： 选择一个答案 a. 错误 b. 正确 11.可以在程序中多次使用 ReDim 语句来改变动态数组的大小、维数和类型。该结论是否正确： 选择一个答案 a. 错误 b. 正确 12.可以使用 Option Base 2 语句把数组下标下界的默认值设置为 2 。该结论是否正确： 选择一个答案 a. 正确 b. 错误 1. 所有控件都有的属性是_______，在程序中作为对象的标识引用。 a) Caption b) Value c) Text d) name 答案：D 2. 下列_______属性用于设置或返回文本框中的文本。 a) Caption b) Text c) Name d) DragIcon 答案：B 3. 可以用作其它控件容器的控件有（） a) 窗体控件，列表控件，图像控件 b) 窗体控件，文本框控件，框架控件 c) 窗体控件，框架控件，图片框控件 d) 窗体控件，标签控件，图片控件答案：C 4. 以下不属控件的一项是_____。 a) 文本框 b) 标签框 c) 列表框 d) 消息框答案：D 5. 改变控件在窗体中的上下位置应修改控件的_____属性。 a) Top b) Left c) Width d) Height 答案：A 6. 复选框控件其Value属性的可取值是_______。 a) Trut和False b) 0和1 c) 1、2、3 d) 0、1、2 答案：D 7. 如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中______个选项按钮（提示：该题答案不能出现汉字）。答案：2 8. 我们在一个窗体上建立两个文本框，名称分别为Text1和Text2，事件过程如下， Private Sub Text1_change( ) =ucase End Sub 则在Text1文本框输入“visual basic”，Text2将显示______。 a) Text2中无内容显示。 b) Text2显示"VISUAL BASIC"。 c) Text2显示"visual basic" d) Text1显示"visual basic" 答案：B 9.选中复选框控件时，Value属性的值为（） 选择一个答案 a. 1 b. True c. 0 d. False 10.让复选框控件的事件过程不响应事件，可修改控件的（）属性。 选择一个答案 a. Enable b. Caption c. TebStop d. Appearance 11.若要在同一窗体中安排两组单选框（OptionButton）可用（）控件予以分隔。 选择一个答案 a. 列表框 b. 图片框 c. 框架 d. 组合框 12.设置列表框各表项中的文本，用（）属性。 选择一个答案 a. Selected b. Caption c. List d. Text 中的clear是（）选择一个答案 a. 属性 b. 对象 c. 事件 d. 方法 《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 2011-2012学年第一学期算法与程序设计期末考试题 班级：姓名：分数： 一、单项选择题（每题4分） 1.算法是解决问题的( ) A.程序代码 B.方法与步骤 C.计算公式 D.最终结果 2.以下不能作为vb常量的的是( ) A.“Good Luck” B. PI C. 1.5E-3 D. 16.34 3.以下各表达式中, 计算结果为0的是( ) A. INT(12.4)+INT(-12.6) B. CINT(12.4)+CINT(-12.6) C. FIX(13.6)+FIX(-12.6) D. FIX(12.4)+FIX(-12.6) 4.设a=″Visual Basic″，下面使b=″Basic″的语句是( ) A.b=Left(a，8，12) B.b=Mid(a，8，5) C.b=Right(a，5，5) D.b=Left(a，8,5) 5.inputbox() 函数返回值类型为( ) A.数值 B.字符串 C.数值和字符串 D.变体 6.下列关于For…Next语句的说法正确的是( ) A. 循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只能为正数 C. 初值必须小于终值 D.初值必须大于终值 7.下列符号中，只有( )是合法的VB变量名。 A．xy23 B．23xy C．Sub D．xy8[1] 8.数学表达式Sin30°写成VB表达式是( ) A．Sin30 B．Sin(30) C．Sin(30°) D．Sin(30*3.14/180) 9.在VB的运算中，级别最高的是( ) A．= B．And C．Or D．Not 10.判断任意3条线段a、b、c能否构成三角形的表达式为( ) A．a+b>=c Or a+c>=b Or b+c>=a B．Not(a+b 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。 《VB程序设计》期末模拟试卷 一、单项选择 （b ）1．被对象所识别的动作与对象可执行的动作分别称为对象的___________。 A．方法、事件 B．事件、方法 C．事件、属性 D．过程、属性 （ c）2．下列________是Single型变量。 A．Time% B．Name$ C．Sheight! D．CXYZ& （a ）3．以下四个VB的变量名中，合法的是____________。 A．X23 B．$Re C． Len D．3xy （ d）4．在程序中使用 Dim str1,str2 As Long 语句对变量str1、str2进行声明后，下面正确的说法是________。 A. str1是整型，str2是长整型 B. str1是长整型，str2变体型 C. str1、str2都是长整型 D. str1是变体型，str2是长整型 （b ）5．表达式(&O36>31) and (“A”>”B”) 的结果是 ____________。 A．True B．False C．”&O3631AB” D．&O3631 （c ）6．表达式“100” + 100 和表达式“100” & 100的值分别是 ____________。 A．200、200 B．“100100”、“100100” C．200、“100100” D．“100100”、200 （b ）7．以下语句执行时，从键盘上输入Zhao，并按回车键。执行结果是________。 Dim a As String A=InputBox("Input", "", "Name") Print a A．Input B．Zhao C．Name D．空字符串 （b）8．语句Print 4 + 5 \ 6 * 7 / 8 Mod 9的运行结果是________。 A．4 B．5 C．6 D．7 （ d）9．在窗体的通用段声明变量时，不能使用__________ 关键字。 A．Dim 第一部分：客观题 1、 单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（ ） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ ） A、工程资源管理器窗口 B、工具箱窗口 C、 属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（ ）方法来实现。 Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（ ） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是 （ ） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（ ） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（ ）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（ ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（ ） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是 （ ） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 大一VB期末考试试卷及答案 1．在代码中引用一个控件时，应使用控件的（ b ）属性。 A．Caption B．Name C．Text D．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。 A．x+a <= b-y B． x > 0 AND y < 0 C．a = b OR x>y D． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ c ）。 A．（10，80） B．（10，81） C．[10，80] D．[10，81] 4．函数Sgn(3.1416)的返回值是（ c ）。 A．-1 B．0 C．1 D．以上都不对 5．67890属于（ d ）类型数据。 A．整型 B．单精度浮点数 C．货币型 D．长整型 6．下列变量名中正确的是（ d ）。 A．3S B．Print C．Select My Name D．Select_1 7．下列赋值语句（ a ）是有效的。 A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ b ）。 A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。 A．Name B．ListIndex C．ListCount D．Text 10．下列代码的运行结果为（ b ）。 Private Sub command1_click() Dim m(10) 第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C ) VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5） 2847VisualBasic程序设计-0006 试卷总分：100 答题时间：60分钟 客观题 单项选择题（共16题，共48分） 1. 在正确安装Visual Basic6.0后，可以通过多种方法启动Visual Basic ,以下方式中不能启动Visual Basic的是（）。 D 进入DOS方式，执行vb6.exe 2. 在VB6.0集成开发环境中有三种工作模式，下列不属于三种工作模式之一的是（）。 D 编写代码模式 3. 下列不正确的赋值语句是（）。 B x + y = 15 4. MsgBox函数的返回值的类型是（）。 A 整型 5. 下列关于属性设置的叙述错误的是（）。 A 控件具有什么属性是VB预先设计好的，用户不能改变 6. 在Visual Basic中，如果一个变量未作类型声明而直接使用，则该变量的数据类型是（）。 C 变体类型 7. 对于窗体级变量，下列说法中错误的是（）。 C 所在窗体的子程序不能访问用Private定义的窗体级变量 8. 在Visual Basic中，下列优先级最高的是（）。 A * 9. 在VB工程中，可以作为启动对象的是（）。 D Sub Main过程或任何窗体 10. 在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（）。 B 减号（-） 11. Dim A(1 To 6, 6) As String定义的数组包含的元素个数是（）。 C 42 12. 以下关于过程和过程参数的描述中，错误的是（）。 C 只有函数过程能够将过程中处理的信息传回到调用的程序中 13. 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与其同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是( )。 B Drive1 Change 14. 重新定义图片框控件的坐标系统，可采用该图片框的方法是（）。 A Scale 15. 如果希望返回远程机器的IP地址，可以使用Winsock控件的（）属性。 C RemoteHostIP 16. Access数据库文件的扩展名是（）。 D mdb 判断题（共14题，共28分） 1. 新建工程时系统会自动将窗体标题设置为Form1。 T √ 2. 每个对象都有一系列预先定义好的对象事件，但要使对象能响应具体的事件，需要编写该对象相应的事件过程。 T √ 3. 在程序中Name 属性作为对象的标识被引用，不会显示在窗体上，而控件上显示的内容由Caption属性决定。 T √ 4. Timer控件在程序运行时是可见的。 F × 5. 任何一种循环都必须有起始语句和终端语句。 T √ 6. If x >y Then Max=x Else Max=y 程序段是求两个数中的最大数。 T √ 7. 移动框架时框架内的控件也跟随移动，所以框架内各控件的Left与Top属性值也随之改变。 F × 8. 列表框控件中最后一项的序号等于ListCount属性减1。 T √ 9. 用Private、Static定义过程只能被定义它的窗体模块及标准模块中的语句、过程调用。 T √ VB程序设计编程考试题及答案 1.输入3个数，输出最大的数 Private Sub command1_click() Dim max For i = 1 To 3 n = Val(InputBox("输入第" & i & "个数")) If n > max Then max = n End If Next Print "三个数中最大的数是" ; max End Sub 2.有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根 Private Sub Command1_Click() Dim a, b, c, n a = Text1 b = Text2 c = Text3 n = b * b - 4 * a * c If n >= 0 Then Label4 = "方程有根" Else Label4 = "方程无根" End If End Sub 3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示“恭喜！成绩通过！”， 若小于60，则弹出消息框，显示“抱歉！成绩没有通过！ Private Sub Form_Load() Text1 = "" End Sub Private Sub Command1_Click() Dim n n = Text1 If n > =60 Then Val (MsgBox("恭喜！成绩通过！")) Else Val (MsgBox("抱歉！成绩没有通过！")) End If End Sub 4.输入一年份，判断它是否为闰年，并显示有关信息。（判断闰年的条件是：年份能被4整 除但不能被100整除，或者能被400整除） Private Sub Command1_Click() Dim y% 【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学 考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程 C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 B 过程代码都放在窗体文件中 C 名必须相同 D 是设计阶段时显示的位置 高级语言程序设计（VB）试卷（A卷） 注意事项：1、本试卷共页，满分为100 分，考试时间为110 分钟。 2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔， 不得使用红颜色墨水笔。 一、单项选择题（每空1分，共30分） （请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分） 1．在VB 6.0中，扩展名为.vbp的文件称为【1】。 A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件 2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是【2】。 A) 代码窗口B) 窗体设计窗口 C) 属性窗口D) 工程资源管理器窗口 3．设有变量定义语句Dim a%，则变量a的数据类型是【3】。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4．下列表达式中，值为False的是【4】。 A) "AB"<"abc"B) "ABC" = UCase("abc") C) "ABCD"<"abc"D) Mid("ABCD",3,1)=Left("ABCD",3) 5．函数InStr("ABCDEF", "CD")的值是【5】。 A) 2B) 3C) True D) CDEF 6．下列程序运行后，单击窗体，输出结果是【6】。 Private Sub Form_Click() Dim a As Integer, b As Integer a = 3 b = 5 Print a + b; a & b End Sub A) 8 8 B) 35 35 C) 8 35 D) 35 8 7．下列程序运行后，单击窗体，输出结果是 【7】 。 Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a – b : a = a - b Print a; b End Sub A) 4 3 B) 7 3 C) 3 7 D) 10 7 8．下面程序段所表示的数学关系式是 【8】 。 If (a < b) Then If d = c Then x = 1 Else x = 2 End If A) ? ??≠≥=<=)(2) c (1 d c b a d b a x 且且 B) ? ??≠<=<=)(2) c (1 d c b a d b a x 且且 C) ?? ?≥=<=)(2) c (1b a d b a x 且 D) ?? ?≠=<=) (2) c (1 d c d b a x 且 9．下列程序运行后，单击窗体，输出结果是 【9】 。 Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A) 15 B) 10 C) 1 D) 0 10．下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k 中南大学现代远程教育课程（专科）考试复习题及答案 《VB程序设计与应用》 一、选择题：在每小题给出的四个选项中，只有一项是符合题目要求的，请把所选项前的字母填在 题后的括号内。 1. Visual Basic程序中分隔一行中各语句的字符是（）。[ ] A)‘ B): C)\ D)_ 2. 下列可作为Visual Basic的变量名的是（）。[ ] A: Filename B: A（A＋B）C: A%D D : Print 3. 要让菜单项无效，应将（）属性值设置为False。 [ ] A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub [ ] A: 命令按钮的单击B: 命令按钮的装载 C; 窗体的装载D: 窗体的单击 5. Vb中描述文件扩展名的是（）属性。[ ] A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中，不正确的为（）。[ ] A)事件是由Visual Basic预先定义好的，能够被对象识别的动作 B)DblClick（双击）是Visual Basic中的一种事件 C)一个对象可以识别一个或多个事件 D)对于一个系统提供的对象可以识别哪些事件，需要程序员自己定义 7. 下列控件中可设置滚动条是（）。 [ ] A. 检查框（复选框） B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体，( )不会是其默认名。 [ ] A. Form1 B. Form2 C. Formx D. Form10 9. Const One&=1，则One为（）类型的常数。[ ] A)整型 B)字节型 V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… 如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 能够获得一个文本框中被选取文本的内容的属性是。 以下属于Visual Basic合法的数组元素是。 设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。 VB有三种工作模式，它们分别是___________模式。 下列函数中，________函数返回的值是数值型的。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 以下控件中没有Print方法是( ) 以下叙述中错误的是 ( ) A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）保存Visual Basic程序时，应分别保存窗体文件及工程文件 C）Visual Basic应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发 下列数组声明语句中的数组a包含了_________个数组元素。( ) Dim a(4,-1 to 1,0 to 3) 复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( ) 主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义 以下不属于Visual Basic系统的文件类型是。 A）.frm B）.bat C）.vbg D）.vbp 按变量名的定义规则，是合法定义的变量名。 结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______ 执行以下程序段后，变量c$的值为________。 a$="Visual Basic Programming" 第一套试题 一、选择题(每题2分，共30分） 1.在ＶB环境中,工程文件的扩展名是( C ) (A）.frm (B)．baｓ（Ｃ）.vbp （D).ｆrx 2．下面4项中不属于面向对象系统三要素的是( A ) (A)变量（B)事件（C)属性（D）方法 3. \、/、Ｍod、*这4个算述运算符中，优先级别最低的是( Ｃ ) （A)＼ (Ｂ）/ （C）Mod (D）* 4.要使Pｒinｔ方法在Ｆoｒm_Load事件中起作用,要对窗体的( C )属性进行设置 （A）ＢackＣoｌor （B）ForeCoｌor （Ｃ）AｕtｏRｅdraｗ（D）Cａptｉon 5．不论何控件,共同具有的属性是（ B ) （A)Text (B)Naｍe （C）FoｒeColoｒ（Ｄ）Ｃaｐtｉoｎ 6.要使Ｆoｒm1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A)Foｒm1.Capｔｉon=“欢迎使用ＶＢ”（B）Form1.Cａption＝ˊ欢迎使用VBˊ (C）Forｍ１．Caption=欢迎使用VB （D)Forｍ1．Caｐｔioｎ=〞欢迎使用ＶB〞 7.VＢ提供了结构化程序设计的３种基本结构，这3种基本结构是( D ) （Ａ)递归结构,选择结构,循环结构 (B)选择结构，过程结构，顺序结构 （C)过程结构,输入、输出结构，转向结构(Ｄ)选择结构,循环结构，顺序结构 8.给变量赋值a=1２3＋MＩD(“１23456”,３,２),a变量中的值是( D ) (A)“1２334”(B)1２3 (C）12334 （Ｄ）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是( Ｄ ) (A）Ｉf sex=“男”And agｅ＜40 And IｎStｒ(duty,“教授”)＞0 Thｅn n=n+１ （B)If sｅx=“男”And age＜40 And (duty=“教授”Or dutｙ=“副教授”) Theｎｎ=n+1 VB期末考试试题及答案 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 实验三 第1题四则运算题 设计如下窗体,为五个命令按钮编写5段代码完成四则运算及退出程序,其中在计算除法时,如果第二个数就是零,在消息框中显示信息“除数为零”。 Public Class Form1 Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a + b End Sub Private Sub Button2_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button2、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a - b End Sub Private Sub Button3_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button3、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text TextBox3、Text = a * b End Sub Private Sub Button4_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button4、Click Dim a, b As Single a = TextBox1、Text b = TextBox2、Text VB期末考试试题（A卷） 一、选择题 1.要改变控件的宽度，应修改该控件的（ B ）属性。 A、TOP B、width C、Left D、Height 2.将命令按钮Command1设置为不可见，应修改该命令按钮的（A）属性。 A、Visible B、Value C、Caption D、Enabled 3.单机滚动条两端的任何一个滚动箭头，将触发该滚动条的（ C ）事件。 A、Scroll B 、KeyDown C、change D、Dragver 4.（ D ）对象具有clear方法。 A、图片框 B、窗体 C、复选框 D、列表框 5.中心定义图片框控件的坐标系统，可采用该图片框的（ A ） A、scale B、Scale X C、scale Y D、setFocus 6.将通过对话框CommdDialog1的类型设置成另存为对话框，可调用该控件的（ B）方法。 A、Showopen B、Showsave C、ShowColor D、ShowFont 7.形状控件所显示的图形不可能是（ D ） A、圆 B、椭圆 C、圆角正方形 D、等边三角形 8.由Fro K=10 TO oslept 3：next K循环语句控件的循环次数是（ B ） A、12 B、0 C、-11 D、-10 9.下列数据类型中，占用内存最大值是（ D ） A、Boolwan B、Byte C、Lnteger D、Single 10.如果在图片框上使用绘图方法绘制一个实心圆，则图片框的（ C ）属性决定了该图片的颜色。 A、BackColro B、Forelklor C、Fillcolor D、Dlawstyle 一、选择题 1.要在垂直位置上移动控件，应利用控件的（C） VB 期末考试试卷及答案 一·选择题 1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（ B ） A 属性、控件和方法 B 属性、事件和方法 C 窗体、控件和过程 D 控件、过程和模块 2.所有控件都有一个共同的属性，这个属性是（ C ） A text B font C name D caption 3.下列叙述中错误的是（ A ） A工程文件扩展名是 .vbgB 标准模块文件的扩展名是 .basC窗体模块的扩展 名是 .frmD 类模块的扩展名是 .cls 4.当要编写一个新的 Visual Basic程序时，所做的第一件事是（ A ）A xx 一个工程 B 编写代码 C 设置属性 D 添加 Active X控件 5.下面控件中，没有caption 属性的是（ B ） A框架B组合框 C 命令按钮 D 复选按钮 6.在文件框中输入字符时，若只显示某个字符，如（* ），应设置属性是（B）A MultiLine B PasswordChar C Text D selText 7.若要将窗体从内存中卸载出去，其实现的方法是（ D ） A Show B Hide C Load D UnLoad 8.下列关于过程叙述不正确的是（ D ） A过程的传值调用是将实参的具体值传值传递给形参 B过程的传址调用是将实参在内存的地址传递给形参 C过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的 D无论过程传值调用还是传地址调用，参数传递都是双向的 9.某人创建 1 个工程，其中的窗体名为Form1，之后又添加了 1 个名为Form2 的窗体，并希望程序执行时先显示Form2 窗体，那么，他需要做的工作 是（ C ）A 在 Form1 的 Load 事件过程中加入语句Load Form2 B 在 Form2 的 Load 事件过程中加入语句Form2.Show C在“过程属性”对话框中把“启动对象”设置为 Form2 D在 Form2 的 TabIndex 属性设置为 1，把 Form1 的 TabIndex属性设置为 2 10.以下关于文件的叙述中，正确的是（ B ） A 以 Output 方式打开一个不存在的文件时，系统将显示出错信息 B 以Append 方式打开的文件，既可以进行读操作，也可以进行写操作 C 在随机文件在，每个记录的长度是固定的 D无论是顺序文件还是随机文件，其打开的语句和打开的方式都是完全相 同的 11.设 a=6，b=8，c=10则函数 IIf(aVB程序设计试题与答案-1资料
vb期末考试试题
VB期末考试试题及答案
VB程序设计期末模拟试卷
VB期末考试试题
大一VB期末考试试卷及答案
vb程序设计试题(含答案)
大学-VB期末考试试题
电大VB期末考试
VB程序设计编程考试~题及答案~
VB期末考试模拟题1讲解
VB期末试卷(A卷带答案)
[整理]VB程序设计复习题及答案.
VB程序设计试题及答案一
VB期末考试复习题目
vb程序设计试题(含标准答案)
VB期末考试试题及答案
大学计算机VB程序设计考试题目
VB期末考试试题(A、B卷)[1]
VB期末考试试卷及答案.doc
相关主题
文本预览