超星VB程序设计[321002214]_1期末答案(学习通2023课后作业答案)
88 min read超星VB程序设计[321002214]_1期末答案(学习通2023课后作业答案)
第1章单元测验
1、超星程序Visual Basic是设计一种___________的可视化程序设计语言。
A、期末面向机器
B、答案面向问题
C、学习面向过程
D、通课面向对象
2、后作VB6.0集成开发环境有三种工作状态，业答不属于三种工作状态之一的超星程序是_______
A、设计状态
B、设计编写代码状态
C、期末运行状态
D、答案中断状态
3、学习以下是通课工程文件扩展名的是_______。
A、后作.bas
B、.cls
C、.frm
D、.vbp
4、与传统的程序设计语言相比，VB最为突出的特点是_______。
A、事件驱动编程机制
B、结构化程序设计
C、程序开发环境简单
D、程序调试方便
5、在VB的集成环境中，双击窗体、控件可以打开_______。
A、属性窗口
B、代码窗口
C、工程资源管理器窗口
D、工具箱窗口
6、当要编写一个新的VB程序时，所做的第一件事是_______。
A、新建一个工程
B、编写代码
C、设置属性
D、添加Active X控件
7、在VB的集成环境中，可以列出工程中所有模块名称的窗口是_______。
A、代码窗口
B、属性窗口
C、工程资源管理器窗口
D、工具箱窗口
8、同一行上书写多条语句，语句间用_________分隔。
A、冒号 ":"
B、分号 ";"
C、下划线 "_"
D、斜线 "/"
9、在Visual Basic 6.0集成开发环境中，通过___________窗口进行应用程序界面的设计。
A、窗体设计
B、属性
C、代码
D、工程资源管理器
10、结构化程序设计的基本结构中不包括下列哪一项：
A、顺序结构
B、分支结构
C、循环结构
D、集成结构
11、计算思维的本质是抽象和：
A、自动化
B、推理
C、分析
D、归纳
12、以下关于算法的叙述中，不正确的是：
A、求解某一类问题的算法是唯一的
B、算法一定在有限的步骤内结束
C、算法的每一步操作必须是明确的，不能有歧义
D、算法执行后，一定产生确定的结果
13、VB代码不区分字母的大小写。
14、注释一般用撇号“ ' ”引导注释内容，用撇号引导的注释在程序执行过程中也是运行的。
15、VB程序代码是块结构，构成程序的主体是事件过程或自定义过程，块书写的先后次序与程序执行的先后次序无关。
第三讲 面向对象的可视化编程基础(二)
第2章单元测验
1、VB中的所有控件，都具有的属性是________。
A、Text
B、Name
C、ForeColor
D、Caption
2、为了使标签控件中的文本“居中”显示，需要设置的属性是________
A、BackStyle
B、BorderStyle
C、Alignment
D、Caption
3、在文本框控件中输入字符时，若只显示某个字符，如星号(*)，应设置属性________。
A、Text
B、Caption
C、PassWordChar
D、SelText
E、PassWord
4、关于对象的事件，叙述正确的是________。
A、在VB中，每个对象的事件，需要用户自定义
B、在VB中，每个对象的事件过程，系统已定义好
C、同一事件，作用于不同的对象，会引发不同的反应，产生不同的结果
D、同一事件，作用于不同的对象，一定引发相同的反应，产生相同的结果
5、能够获得一个文本框中被选中文本的内容的属性是________。
A、Text
B、SelStart
C、SelLength
D、SelText
6、能够使文本框控件可获得焦点的方法是________。
A、SetFocus
B、LostFocus
C、GotFocus
D、KeyPress
7、命令按钮Command1的标题上显示 “确定”，可用________语句。
A、Command1.Name="确定"
B、Command1.Caption="确定"
C、Command1.Name=确定
D、Command1.Caption=确定
8、用于给图片框加载图形或删除图片框中的图片的函数是________。
A、Line( )
B、Savepicture( )
C、LoadPicture( )
D、Scalemode( )
9、为了使标签控件具有“透明”的显示效果，需要设置的属性是________。
A、BackStyle
B、BorderStyle
C、Alignment
D、Caption
10、以下关于对象属性的叙述中正确的是________。
A、Visible属性值设为True的对象肯定是活动对象
B、不同对象不可能有相同的属性
C、Enabled属性值设为False的对象肯定不可见
D、对象的某些属性只能在程序代码中设置或改变
11、有程序代码 “Text1.Text = "Visual Basic"”，其中的Text1、Text和"Visual Basic" 分别代表________。
A、对象、属性、值
B、对象、方法、属性
C、对象、值、属性
D、属性、对象、值
12、应用程序窗体的名称属性为Frmmain,窗体上有一个文本框，其名称属性为Txtin,窗体和文本框的Click事件过程名分别是________。
A、Form_Click() 、Txtin_Click()
B、Form_Click() 、Text1_Click()
C、Frmmain_Click() 、Text11_Click()
D、Form1_Click() 、Txtin_Click()
13、以下关于控件的叙述中，正确的是________。
A、标签控件能够获得焦点
B、文本框控件能够获得焦点
C、命令按钮的外观不能设置为图形
D、文本框通过Caption属性设置内容
14、若要使图像控件Image中的图像随着控件的大小自动放大或缩小，可对_______属性进行设置。
A、Height
B、Width
C、AutoSize
D、Stretch
15、下列控件中既可以用于输入，又可以用于编辑、修改和输出的控件是_______。
A、标签(Label)
B、命令按钮(Command)
C、图片框(Picture)
D、文本框(Text)
16、对象的________是用来描述和反映对象特征的参数。
A、属性
B、事件
C、方法
D、过程
17、要判断文本框中是否按下了回车键，可以在文本框的KeyPress事件过程中判断参数________的值。
A、Mouse
B、KeyAscii
C、KeyCode
D、Ascii
18、假定在图片框Picture1中装入了一个图形，为了清除该图形（不删除图片框），应采用的正确方法是________。
A、执行语句Picture1.Picture =""
B、执行语句Picture1.Picture = LoadPicture ("")
C、选择图片框，然后按Del键
D、选择图片框，在属性窗口中选择Picture属性条，然后按回车键
19、若要使命令按钮不可用，可对按钮的_______属性进行设置。
A、Caption
B、Title
C、Enabled
D、Style
20、关于文本框的焦点叙述中，错误的是_______。
A、文本框当其Enabled属性为False时，不能获得焦点
B、利用TabIndex属性改变Tab顺序
C、文本框得到焦点时，会引发自己的GotFocus事件
D、文本框失去焦点时，不会引发自己的LostFocus事件
21、方法是VB预先定义的、用户可直接使用的过程。
22、对象的属性是存放对象的数据，用来决定对象的外观和特征。
23、如果没有触发任何事件，程序是不会自动开始执行的。
24、窗体初始化程序应写在Unload事件中。
25、Image控件与Picture控件都可以装入图片，所以两个控件的功能完全相同。
26、命令按钮的Enabled属性设置为False时，可以响应其单击事件。
27、文本框不能输入多行文字，可能是因为文本框的MultiLine属性值为False。
28、所有控件都具有一个共同的属性，这个属性是Name属性。
29、在设计阶段双击一个控件打开的窗口为属性窗口。
30、控件在窗体上的位置是由控件的Top和Left属性决定的，Top属性值的含义是：控件离窗体上边框的距离。
第四讲 VB程序设计基础
第3章单元测验
1、以下不是VB合法变量的是:
A、XYZ
B、a12_3
C、a123
D、False
2、以下哪个是单精度数：
A、123%
B、123！
C、123@
D、123&
3、以下变量命名正确的是：
A、12xy
B、x-y
C、dim
D、a_2
4、找出正确的表示条件：年龄小于等于35岁且职称为教授或副教授：
A、年龄<=35 AND (职称="教授" AND 职称="副教授")
B、年龄<=35 AND (职称="教授" OR 职称="副教授")
C、年龄<=35 OR 职称="教授" AND 职称="副教授"
D、年龄<=35 OR 职称="教授" OR 职称="副教授"
5、下列语句执行后，s的值是： t="学生数据库管理系统" s=Left(t,2) & Mid(t,6,2) & Right(t,2)
A、数据库管理系统
B、学生数据库
C、学生管理系统
D、学生数据库管理系统
6、变量未赋值时，数值型变量的值为：
A、0
B、空串
C、NULL
D、没有任何值
7、下面结果是False的是：
A、"CDE">"ABR"
B、"CDB">"CDA"
C、"35"< "4"
D、"35"> "4"
8、Print Len("VB程序设计")的执行结果是：
A、6
B、VB程序设计
C、10
D、“VB程序设计”
9、以下运算结果不是“20131010”的表达式是：
A、"2013" & "1010"
B、2013 & 1010
C、"2013" + "1010"
D、"2013" + 1010
10、表示x是4或7的倍数的正确表达式是：
A、x mod 4 or 7=0
B、x mod 4=0 and x mod 7=0
C、x mod 4=0 or x mod 7=0
D、x mod 4 and 7=0
11、可以产生20~50(含20和50)之间的随机整数的表达式是：
A、Int(Rnd*30+20)
B、Int(Rnd*31+20)
C、Int(Rnd*20+30)
D、Int(Rnd*50-Rnd*20)
12、以下运算符中，优先级别最高的是：
A、算术运算符
B、字符运算符
C、关系运算符
D、逻辑运算符
13、数学关系3≤x<10表示成正确的VB表达式：
A、3<=x<10
B、3<=x and x<10
C、x>3 or x<10
D、3<=x and <10
14、表达式False+10+"4"的结果是：
A、True
B、False
C、14
D、13
15、若要强制变量必须先定义才能使用，应该用的说明语句是：
A、Public Const
B、Option Explicit
C、Type 数据类型名
D、DefDbl
16、下列语句执行后，x的值是 ： y=65: x = Asc(Lcase(Chr(y))) + 4
A、101
B、e
C、69
D、E
17、骰子是一个六面体，用1~6分别表示这六个面，掷一次骰子出现的数可表示为：
A、Int(Rnd(6)+1)
B、Int(Rnd*6)
C、Int(Rnd*7)
D、Int(Rnd*6+1)
18、表达式5>4>3的计算结果是True。
19、语句Const A=100是将A声明为一个常量。
20、不能使用Visual Basic的关键字作为变量名。
21、表达式Mid("Nothing",3,2)的计算结果是"th"。
22、VB中的变量名，如用的是英文字母，其大小写是不区分的。
23、表达式Len(x)和len("x")返回值必然相等。
24、表达式"123"+"1"的计算结果是"1231"。
25、3abc为合法变量。
26、"x是小于100的非负数"，用VB表达式表示正确的是0<=x Or x<100。
27、若有整型变量A和B，A的值为1，B的值为256，那么B比A占用更多内存
第九讲 基本控制结构--循环结构（三）
第4章单元测验
1、设x是整型变量，与函数IIf(x>0,-x,x)有相同结果的代数式是：
A、|x|
B、-|x|
C、x
D、-x
2、下列程序运行时，输出的结果是: Private Sub Form_Click() k = 2 If k >= 1 Then a = 3 If k >= 2 Then a = 2 If k >= 3 Then a = 1 Print a End Sub
A、3
B、1
C、0
D、2
3、下面不能在信息框中输出“VB”的是:
A、MsgBox "VB"
B、x=MsgBox（"VB"）
C、MsgBox（"VB"）
D、Call MsgBox "VB"
4、要从For…Next循环中退出循环，应使用以下选项中哪条语句：
A、Exit
B、Exit For
C、Continue
D、Stop Loop
5、以下正确的叙述是:
A、Select Case语句中的测试表达式可以是任何形式的表达式
B、Select Case语句中的测试表达式只能是数值表达式或者字符串表达式
C、执行Select Case语句时，所有的Case子句均按出现的次序被顺序执行
D、如下Select Case语句中的Case表达式是错误的： Select Case x Case 1 to 10 可行 …… End Select
6、执行下列程序段后，输出的结果为： x=3 If Abs(x)>2 Then x=x-1 Else x=x+8 Select Case x Case Is<5 x=x+1 Case 5 to 10 x=x+2 Case Else x=x+3 End Select Print x
A、3
B、6
C、8
D、2
7、以下关于复选框的说法正确的是：
A、复选框的Enabled属性用于决定该复选框是否被选中
B、复选框的Value属性用于决定该复选框是否被选中
C、复选框的Checked属性用于决定该复选框是否被选中
D、复选框的Visible属性用于决定该复选框是否被选中
8、有如下程序段，运行程序，则窗体上显示的是： Private Sub Form_Click() Dim i As Integer, x As String, y As String x = "ABCDEFG" For i = 4 To 1 Step -1 y = y + Mid(x, i, 1) Next i Print y End Sub
A、ABCD
B、DCBA
C、DEFG
D、GFED
9、下列程序段执行后，K的值是: S=0 For K=1 to 9 S=S+K Next K Print K
A、9
B、10
C、45
D、50
10、下列程序代码的执行结果为: x=5 y=-20 If Not x>0 then x=y-3 else y=x+3 Print x-y
A、-3
B、5
C、28
D、25
11、For语句的格式如下，下列说法错误的是： For <循环变量>=<初值> to <终值> [step <步长>] [<循环体>] [exit for] Next [<循环变量>]
A、步长只能为正数，不能为负数
B、步长为1时，可略去不写
C、初值、终值和步长都是数值表达式
D、next后的循环变量与for语句中的循环变量必须相同
12、以下程序段执行后，变量V3的值是： Dim V1,V2,V3 V1=”Hello” : V2=”World” : V3= V1 & “ “ & V2
A、”Hello World”
B、” World”
C、”Hello ”
D、”HelloWorld”
13、运行下列程序，执行语句Print i * j的次数为： Privat Sub Form_Click() For i =1 to 3 For j =5 to 1 step –2 Print i * j Next j Next i End Sub
A、7
B、9
C、12
D、15
14、在窗体上创建名为Text1的文本框和名为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim I As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next i Text1.Text=n End Sub 程序运行后，单击命令按钮，在文本框中显示的值是：
A、2
B、3
C、4
D、5
15、以下程序运行后，单击窗体，输出结果是： Private Sub Form_Click() Dim m%, n%, t% m = 68: n = 51 Do While m <> n Do While m > n m = m - n Loop Do While n > m n = n - m Loop Loop Print m, End Sub
A、17
B、0
C、1
D、68
16、下面是一个体操评分程序,20位评委,除去一个最高分和一个最低分,计算平均分,补充程序 Private Sub command1_click() Max = 0: Min = 10 For i = 1 To 20 n = Val(InputBox(" 请输入分数")) If n>max then Max = n If n < Min Then Min = n s = s + n Next i s = : p = s / 18 Print " 最高分:"; Max, "最低分:"; Min, "最后得分:"; p End Sub 横线出应该填写的语句是：
A、s-max-min
B、s+max+min
C、s+max-min
D、x-max+min
17、复选框的Value属性为0表示：
A、复选框未被选中
B、复选框被选中
C、复选框内有灰色的钩
D、操作出错
18、下列哪条语句使得复选框Check1无效：
A、Check1.value=1
B、Check1.value=2
C、Check1.Style=1
D、Check1.Style=0
19、拖动滚动条的滑块将触发滚动条的哪个事件：
A、Slide
B、Scroll
C、DragOver
D、DragDrop
20、执行下列语句后，x的值是： n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i<n
A、10
B、15
C、24
D、120
21、如果x小于y的平方，则在窗体上输出“OK”，则下列哪条语句可以完成这个要求：
A、If x<y^2 Then "OK"
B、If x<y^2 Then Print "OK"
C、If x<y^2 Then Show "OK"
D、If x<y^2 Then Put "OK"
22、以下程序输出后的结果是： s=1 For i=1 to 3 For j=0 to i-1 s=s+s*j Next j Print s; Next i
A、1 2
B、2 1
C、2 2 12
D、1 2 12
23、执行以下程序段后，窗体上的输出结果是： For n=1 to 20 If n MOD 3 <>0 Then m=m+n\3 Next n Print n
A、15
B、18
C、21
D、24
24、以下关于InputBox的叙述中，不正确的是：
A、在默认情况下，InputBox的返回值是一个字符串
B、InputBox函数可以写成InputBo$的形式
C、执行一次InputBo函数时，不能一次输入多个数值
D、执行一次InputBo函数时，可以一次输入多个数值
25、下列程序段的输出结果是： s=0 For i=1 to 10 Step 2 s=s+i Next i Print s
A、55
B、45
C、25
D、30
26、下列程序段的输出结果是： s=0 For i=2 to 10 Step 2 s=s+i Next i Print s
A、55
B、45
C、30
D、25
27、设有以下循环体： Do 循环体 Loop While <条件> 则下列说法中错误的是：
A、若<条件>是一个为0的常数，则一次也不执行循环体
B、<条件>可以是关系表达式、逻辑表达式或常数
C、循环体中可以使用Exit Do语句
D、如果<条件>总是为True，则会不停的执行循环体
28、以下程序段的输出结果是： a=8:s=1 Do s=s+a a=a-1 Loop While a<=0 Print s: a
A、7 9
B、34 0
C、9 7
D、死循环
29、执行If逻辑表达式值为True，则关键字Then后的若干语句都要执行。
30、在行If语句中，关键字End If是必不可少的。
31、Print语句可以省略输出项，省略输出项，表示输出一空行。
32、Do/Loop Until结构的循环，是“先判断、后执行（循环体）”的循环结构。
33、Print语句的每个输出项之间可以用逗号或分号分隔，不管用逗号还是分号，其输出效果是一样的。
34、在For……Next循环中，其中step步长可以是正数、负数或者零。
35、在Select Case语句中，各个分支（即每个Case语句）的先后顺序与程序结果无关。
36、定时器控件只能响应Timer事件 。
第十二讲 数组（三）
第5章单元测验
1、下面正确使用动态数组的是：
A、Dim arr() As Integer … ReDim arr(60)As String
B、Dim arr() As Integer …… ReDim arr(3,9)
C、Dim arr() … ReDim arr(50) As Integer
D、Dim arr(60) As Integer … ReDim arr(20)
2、下列哪一项不属于List控件的方法：
A、Clear
B、DeleteItem
C、AddItem
D、RemoveItem
3、以下关于数组的说法，错误的是:
A、静态数组在声明时大小必须固定
B、动态数组在声明时大小可以不确定
C、默认情况下数组的下界为0
D、运行时可改变动态数组或静态数组的大小
4、假设建立了一个数组arr(8),则UBound(arr)的值是：
A、0
B、7
C、8
D、9
5、设有数组声明语句，定义的数组a为_______维数组，数组元素个数为_______。 Option base 1 Dim a(3,-2 to 1)
A、1 9
B、1 12
C、2 12
D、2 16
6、执行以下Command1的Click事件过程在窗体上显示： Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2, 3, 4, 5, 6, 7) Print a(1);a(3);a(5) End Sub
A、1 3 5
B、2 4 6
C、1 2 3
D、2 3 4
7、下列程序运行时，单击命令按钮在窗体上输出的结果是： Option Base 0 Private Sub Command1_Click() Dim x Dim i As Integer x = Array(1, 3, 5, 7, 9, 11, 13, 15) For i = 1 To 3 Print x(5 - i); Next i End Sub
A、5 3 1
B、7 5 3
C、9 7 5
D、11 9 7
8、设窗口上有一个列表框控件List1，含有若干个列表项，以下能表示当前被选中的列表项内容的是：
A、List1.List
B、List1.Text
C、ListIndex
D、List1.ListIndex
9、为了在组合框或列表框中插入一行文本应使用的方法是：
A、RemoveItem
B、Additem
C、Input
D、List
10、List1.Text与哪个表达式等价:
A、List1.List
B、List1.List(List1.ListIndex)
C、ListIndex
D、List1.ListIndex
11、现有如下程序： Private Sub Command1_Click() Dim b(10), x% For i = 0 To 10 b(i) = Int(Rnd * 90 + 10) x = x + b(i) Mod 2 Next i Print x End Sub 运行程序，则窗体上显示的是
A、11个数中偶数的累加和
B、11个数中偶数的个数
C、11个数中奇数的累加和
D、11个数中奇数的个数
12、下列程序，运行后的输出结果是： Private Sub Command1_Click() Dim a(10), i% For i = 1 To 10 a(i) = i ^ 2 Next i Print a(i - 1) End Sub
A、81
B、100
C、121
D、99
13、程序运行后，单击窗体，输出结果是： Option Base 1 Private Sub Form_Click() Dim a ， i As Integer a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) For i = 0 To 3 Print a(7 - i); Next i End Sub
A、7 6 5 4
B、8 7 6 5
C、6 5 4 3
D、9 8 7 6
14、以下程序运行后屏幕上输出的是： Private Sub Form_Click() Cls Dim a(3,1 to 4) As Integer For i = 0 To 3 For j = 1 To 4 a(i,j)=i + j Print a(i,j); Next j Print Next i End Sub
A、1 2 3 4 2 3 4 5 3 4 5 6 4 5 6 7
B、0 1 2 3 1 2 3 4 2 3 4 5 3 4 5 6
C、0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
D、1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
15、下列程序段的执行结果是： Dim M(10) as Integer For k=1 to 10 M(k)=11-k Next k X=6 Print M(2+M(X))
A、10
B、9
C、7
D、8
16、已知数组声明Dim a(-1 to 2,3) As Integer，下列说法不正确的是：
A、此数组的数组名为a
B、此数组的维数为2维
C、此数组的元素个数为12个
D、此数组的数据类型为整型
17、以下程序运行后，Text1的输出结果是： Private Sub Form_Click() Dim a%(1 to 5), i% For i = 1 To 5 a(i) = 2 * i Text1.Text = a(i) Next i End Sub
A、2
B、10
C、2 4 6 8 10
D、8
18、以下程序段用来求出数组a中的最大值的位置（假设数组a中的个元素均已正确赋值），并将结果保存在变量max中，则横线处应该填写的语句是： max = 1 For i = 1 To 10 If Then max = i Next i
A、a(i)>a(max)
B、a(i)<max
C、a(i)>max
D、a(i)<a(max)
19、列表框和文本框一样都具有Text属性。
20、定义数组时，若要使得数组的下界默认值为2，则可以用语句Option Base 2。
21、当列表框中表项太多、超出了设计时的长度时，Visual Basic会自动给列表框加上垂直滚动条。
22、列表框的listindex返回当前选项的索引号，索引号从0开始，如果没有选项被选中，该属性为1。
23、列表框的List属性可以得到列表中任何选项的值，它以数组的方式存在。
24、单击组合框中的任一表项，该表项的文本就会自动替换该组合框的Text属性。
25、在默认情况下，执行语句Dim S(50) as Integer，则声明了S数组有50个元素
26、声明语句 Dim a(2,3) as integer ,声明了一个二维数组，总共含有6个元素
第十三讲 过程
第6章单元测验
1、下面是求最大公约数的函数的首部 Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer 若要输出4、12、24这3个数的最大公约数，下面正确的语句是
A、Print gcd(4,12)，gcd(12,24)，gcd(12,8)
B、Print gcd(4,12,24)
C、Print gcd(4)，gcd(12)，gcd(24)
D、Print gcd(4,gcd(2,24))
2、在通用过程中，要定义某一形式参数和其对应的实际参数是按地址传递，在形式参数前面要加的关键字是:
A、ByVal
B、ByRef
C、Optional
D、ParamArray
3、在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用以下哪个关键字在过程中定义局部变量：
A、Dim
B、Private
C、Public
D、Static
4、下列关于过程叙述不正确的是:
A、过程的传值调用是将实参的值传递给形参
B、过程的传址调用是将实参在内存的地址传递给形参
C、过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的
D、无论是地址传递还是值传递，参数之间的数据传递都是双向的
5、下述程序的运行结果是： Private Sub Command1_Click() a=2 b=-1 Call fun(a,b) Print a,b End Sub Private Sub fun(x, y) x=x * y y=y + x End Sub
A、-2 1
B、-2 -3
C、-2 -1
D、2 -1
6、下列程序的运行结果是： sub p(a As Integer) Dim x as Integer Dim y as Integer x=x+1 y=y+2 a=a+x+y End Sub Private Sub Command1_Click() Dim a As Integer a=1 call p(a) print a; End Sub
A、-1
B、2
C、3
D、4
7、下列程序的运行结果： Private Sub Command1_Click() Dim x%, y% x = 12: y = 4 Call f1(x, y) Print x, y End Sub Private Sub f1(n%, ByVal m%) n = n Mod 10 m = m \ 10 End Sub
A、2 4
B、2 0
C、12 4
D、12 0
8、在过程定义中，参数的传递方式有传值和传地址两种方式，下列说法中不正确的是：
A、采用传值方式，在调用一个过程时，系统将实参的值赋值给形参，之后，形参和实参断开了联系
B、采用传值方式，形参的变化不会影响实参的变化
C、采用传地址方式，在调用一个过程时，系统将实参的地址传递给形参
D、采用传地址方式，形参的变化不会影响实参的变化
9、以下关于函数过程和子过程的叙述中，正确的是：
A、函数过程名和子过程名均有数据类型和值
B、函数过程名和子过程名均需至少被赋值一次
C、函数过程改为子过程时，仅需将函数过程的返回结果作为子过程的形参即可
D、函数过程和子过程可直接相互改写
10、假设有以下程序： Private Sub Command3_Click() s1 = UCase(Text1.Text) s2 = " " For i = Len(s1) To 1 Step -1 s2 = s2 + Mid(s1, i,1) Next i Text2.Text = s2 End Sub 程序运行时，Text1中输入“abc”,则Text2中显示：
A、ABC
B、CBA
C、abc
D、cba
11、Function pc(x As Integer, ByVal y As Integer) As Integer x = x + y If x < 0 Then pc= x Else pc= y End If End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a = -10: b = 5 Text1.Text =pc(a, b) Text2.Text = b End Sub 程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是:
A、-5 5
B、-10 5
C、-5 -5
D、5 -5
12、下列程序的运行结果是： Private sub command1_click() Dim x%,y%,z% x=4 ：y=5 ：z=6 Call swap(x,y,z) Print x;y;z End sub Public sub swap(byval a%,b%,c%) a=a+1 b=b+1 c=c+1 End sub
A、4 6 7
B、4 5 6
C、5 6 7
D、5 5 6
13、以下程序的运行结果是： Private sub command1_click() Dim x%,y%,z% x=3 y=2 z=1 Call swap(x,y,z) Print x;y;z End sub Public sub swap(a%,b%,c%) Dim t% t=a : a=c: c=b: b=t End sub
A、1 3 2
B、1 2 3
C、3 2 1
D、2 1 3
14、调用一个过程时，实际参数和形式参数的类型必须一致。
15、函数过程只能由系统调用，在程序中其他过程中不能直接调用。
16、函数过程必须用关键字Private声明
17、过程中的静态变量是局部变量，当过程再次被执行时，它的值是上一次过程调用后的值。
18、数组作为过程的参数，则实参和形参是按照地址传递的，定义过程时，参数前面不能加ByVal。
19、Sub子过程必须用关键字Private声明。
第十四讲 用户界面设计
第7章单元测验
1、在窗体上建立通用对话框需要添加的控件是_______。
A、Data控件
B、DataGrid控件
C、CommonDialog控件
D、VBComboBox控件
2、用通用对话框控件建立“打开”或“保存”文件对话框时，如果要指定文件列表框中显示All Files和Text Files，则以下命令中正确的是_______。
A、CommonDailog1.Filter="*.*|All Files|*.txt|Text Files"
B、CommonDailog1.Filter=" All Files| *.*| Text Files |*.txt "
C、CommonDailog1.Filter="*.*\All Files\*.txt\Text Files"
D、CommonDailog1.Filter=" All Files\ *.*\ Text Files \*.txt "
3、打开弹出式菜单所使用的方法是_______。
A、CommonDialog
B、PushMenu
C、OpenMenu
D、PopupMenu
4、在菜单编辑器中创建菜单时，为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键，可以将菜单的标题设置为_______。
A、退出(X&)
B、退出(&X)
C、退出($X)
D、退出(#X)
5、在VB中，要使一个窗体不可见，但不从内存中卸载，其实现的方法是_______。
A、Show
B、Hide
C、Load
D、Unload
6、某人创建了1个工程，其中的窗体名称为Form1；之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是_______。
A、在Form1的Load事件过程中加入语句Load Form2
B、在Form2的Load事件过程中加入语句Form2.Show
C、在“工程属性”对话框中把“启动对象”设置为Form2
D、把Form2的TabIndex属性设置为1，把Form1的TabIndex属性设置为2
7、关于Visual Basic工具栏的说法不正确的是________。
A、工具栏的位置可以任意改变
B、工具栏一定在菜单下方
C、工具栏可以显示或隐藏
D、设计工具栏的控件是ImageList和ToolBar
8、在菜单编辑器中设计菜单时，必须输入的项是________。
A、快捷键
B、标题
C、名称
D、热键
9、在窗体Form1的Click事件中要将Form1隐藏，同时将Form2显示，正确的事件代码为________。
A、Form1.Hide : Form2.Show
B、Form1.Show : Form2.Hide
C、Form1.Close: Form2.Show
D、Form1.Show : Form2. Close
10、若要将窗体Form2显示，正确的语句是_________。
A、Form2.Load
B、Form2.Show
C、Form2.Open
D、Form2.Create
11、Visual Basic中，菜单有两种类型，分别为下拉式菜单和弹出式菜单。
12、在设计菜单时，若菜单项是分隔符，在标题中输入”-”(减号)。
13、要打开“另存为对话框”，其语句形式为：CommonDialog1.Action=1。
14、首次用Load语句将窗体调入内存时依次发生Initialize和Load事件。
15、菜单编辑器中的快捷键是指无须打开菜单就可以直接由键盘输入选择菜单项的键。
16、在设计工具栏时，ToolBar中的按钮可以通过索引(Index)和关键字(Key)与ImageList中的图像关联。
第十五讲 文件
第8章单元测验
1、按照访问模式，下列哪项不属于文件正确分类___________。
A、通用文件
B、随机文件
C、二进制文件
D、顺序文件
2、用Write和Print语句向文件中写入多个数据的差别在于_____________。
A、Write语句写入字符串会自动给字符串加上双引号，各数据项之间有“，”
B、Print语句不会自动在数据项之间插入逗号“，”
C、Print语句自动在数据项之间插入逗号“，”
D、Print语句写入字符串会自动给字符串加上双引号，各数据项之间有“，”
3、打开磁盘上的文件"C:\T1.txt"，清除原内容，写入新内容，应使用语句________。
A、Open "C:\T1.txt" For Output As #1
B、Open "C:\T1.txt" For Input As #1
C、Open "C:\T1.txt" For Append As #1
D、Open "C:\T1.txt" For Output As 1
4、打开文件读数据时，判断文件指针是否到文件末尾的函数是_______。
A、EOF()
B、BOF()
C、LOF
D、FileLen
5、使用Open语句打开文件时，若使用Output模式，则是__________。
A、对文件进行写操作，若文件已经存在，则文件中所有内容将被清除。
B、对文件进行读操作，若文件已经存在，则文件中所有内容将被清除。
C、对文件进行追加操作，若文件已经存在，则保留文件中原有内容。
D、对文件进行写操作，若文件已经存在，则保留文件中原有内容。
6、打开磁盘上已有的文件"C:\Seqold.txt"，从该文件读出数据，指定文件号为2,应使用语句________。
A、Open "C:\Seqold.txt" For Input As #2
B、Open "C:\Seqold.txt" For Output As #2
C、Open "C:\Seqold.txt" For Append As #2
D、Open "C:\Seqold.txt" For Output As 2
7、在顺序文件的读写中，若要将某些内容写入文件可以用Input语句。
8、通过Open语句打开一个文件，操作完成后，必须用Close语句将其关闭。
9、按文件的内容，文件可分为程序文件和数据文件，程序文件存储的是程序，数据文件存储的是程序运行所需要的的各种数据。
《VB程序设计》课程2020-2021年度期末考试题
期末试卷
1、控件名为Text2的文本框，其Text的属性值为Text2，若要改变Text的属性值为”VB程序设计”，下列那条语句正确_______。
A、Text2.Caption = "VB程序设计"
B、Text2.PassWordChar = "VB程序设计"
C、Text2 = "VB程序设计"
D、Text2.Name = "VB程序设计"
2、为了使标签控件显示“边框”样式，需要设置的属性是_______。
A、BackStyle
B、BorderStyle
C、Alignment
D、Caption
3、在文本框控件中输入字符时，若只显示某个字符，如感叹号(！)，应设置属性_______。
A、Text
B、Caption
C、PassWordChar
D、SelText
4、关于对象的事件，叙述不正确的是_______。
A、在VB中，每个对象的事件过程，需要用户自定义
B、在VB中，每个对象的事件过程，系统已定义好
C、在VB中，每个对象的事件，系统已定义好
D、同一事件，作用于不同的对象，会引发不同的反应，产生不同的结果
5、若只清除图片框上的文字而不能清除图片框上的图形，应使用语句_______。
A、Picture1.Cls
B、Picture1.Picture=LoadPicture("")
C、Picture1.Print ""
D、Picture1.Picture ""
6、下面________控件不具有Caption属性。
A、标签
B、复选框
C、命令按钮
D、文本框
7、文本框Text1获得焦点时，将触发________事件。
A、SetFocus
B、LostFocus
C、GotFocus
D、MouseDown
8、要设置标签Label1的字号为20磅，正确的语句是________。
A、Label1.Caption=20
B、Label1.FontName=20
C、Label1.FontSize=20
D、Label1.FontUnderline=20
9、能够获得一个文本框中被选中文本的内容的属性是________。
A、SelStart
B、SelText
C、SelLength
D、Text
10、有程序代码 “Text1.Text = "Visual Basic"”，其中的Text1、Text和"Visual Basic" 分别代表________。
A、对象、方法、属性
B、对象、属性、值
C、对象、值、属性
D、属性、对象、值
11、在VB的集成环境中，要修改编写的程序代码，应打开________。
A、窗体窗口
B、代码窗口
C、属性窗口
D、工程资源管理器窗口
12、Visual Basic是一种________的可视化程序设计语言。
A、面向机器
B、面向问题
C、面向对象
D、面向过程
13、以下是窗体文件扩展名的是_______。
A、.vbp
B、.frm
C、.bas
D、.form
14、以下不是VB合法变量的是:
A、M.abc
B、Abc
C、abc
D、a_bc
15、以下哪个是整数：
A、123%
B、123！
C、123$
D、123@
16、当要编写一个新的VB程序时，所做的第一件事是_______。
A、编写代码
B、新建一个工程
C、添加Active X控件
D、设置对象的属性
17、能够正确表示条件“年龄小于30岁且学历是硕士或者博士”的表达式是：
A、年龄<30 and （学历="硕士" and 学历="博士"）
B、年龄<30 and （学历="硕士" or 学历="博士"）
C、年龄<30 or （学历="硕士" and 学历="博士"）
D、年龄<30 or （学历="硕士" or 学历="博士"）
18、为了清除窗体上的一个控件，下列正确的操作是_______。
A、按回车键
B、按Esc键
C、选择(单击)要清除的控件，然后按Del键
D、选择(单击)要清除的控件，然后按回车键
19、下列语句执行后，s的值是： t="学生信息管理系统" s=Left(t,2) & Mid(t,5,2) & Right(t,2)
A、学生管理系统
B、学生信息系统
C、学生信息管理
D、信息管理系统
20、变量未赋值时，数值型变量的值为：
A、0
B、-1
C、NULL
D、空串
21、Print Len("我喜欢VB程序设计")的执行结果是
A、9
B、我喜欢VB程序设计
C、16
D、11
22、以下叙述错误的是_______。
A、Visual Basic是事件驱动型可视化编程工具
B、Visual Basic应用程序不具有明显的开始和结束语句
C、Visual Basic中所有控件具有Caption属性
D、Visual Basic中控件的某些属性只能在运行时设置
23、表示x是3或5的倍数的正确表达式是：
A、x Mod 3=0 or x Mod 5=0
B、x Mod 3=0 and x Mod 5=0
C、x Mod 4 or 5=0
D、x Mod 3 and 5=0
24、可以产生"a"~"z" (含"a"和"z")之间的随机小写字母的表达式是：
A、Chr(Int(Rnd*26+97))
B、Chr(Int(Rnd*25+97))
C、Chr(Int(Rnd*26+65))
D、Chr(Int(Rnd*25+65))
25、数学关系8≤x<15表示成正确的VB表达式：
A、8<=x and x<15
B、8<=x or x<15
C、8<=x<15
D、8<=x and <15
26、在使用通用对话框时，要打开“颜色对话框”，其语句形式为_______。
A、CommonDialog1.Action=1
B、CommonDialog1.Action=2
C、CommonDialog1.Action=3
D、CommonDialog1.Action=4
27、若要将窗体Form2隐藏，正确的语句是_________。
A、Form2.Unload
B、Form2.Hide
C、Form2.Delete
D、Form2.Load
28、在菜单编辑器中创建菜单时，为了把组合键“Alt+F”设置为“文件(F)”菜单项的访问键，可以将菜单的标题设置为_______。
A、文件(F&)
B、文件($F)
C、文件(&F)
D、文件(#F)
29、在菜单编辑器中设计菜单时，必须输入的项是________。
A、热键
B、快捷键
C、标题
D、名称
30、表达式True+10+"4"的结果是：
A、13
B、14
C、语法错误
D、True
31、若要强制变量必须先定义才能使用，应该用的说明语句是：
A、Option Explicit
B、Public Cons
C、Type 数据类型名
D、DefDbl
32、关于Visual Basic工具栏的说法不正确的是________。
A、工具栏的位置可以改变
B、工具栏可以显示或隐藏
C、设计工具栏的控件是ImageList和ToolBar
D、设计工具栏的控件是CommonDialog
33、下列程序运行时，输出的结果是: Private Sub Form_Click() k = 2 If k >= 1 Then a = 0 If k >= 2 Then a = 1 If k >= 3 Then a = 2 Print a End Sub
A、0
B、1
C、2
D、3
34、在窗体上建立通用对话框需要添加的控件是_______。
A、Data控件
B、DataGrid控件
C、CommonDialog控件
D、ImageList控件
35、下面不能在信息框中输出“祖国，我爱你”的是:
A、Call MsgBox "祖国，我爱你"
B、MsgBox "祖国，我爱你"
C、x=MsgBox("祖国，我爱你")
D、MsgBox("祖国，我爱你")
36、按照访问模式，下列哪项不属于文件正确分类___________。
A、随机文件
B、通用文件
C、二进制文件
D、顺序文件
37、要从Do…Loop循环中退出循环，应使用以下哪个选项中的语句：
A、Exit Do
B、Exit
C、Continue
D、Stop Loop
38、执行下列程序段后，输出的结果为： x=3 Select Case x Case Is<5 x=x+1 Case 5 to 10 x=x+2 Case Else x=x+3 End Select Print x
A、3
B、4
C、5
D、6
39、打开文件读数据时，判断文件指针是否到文件末尾的函数是_______。
A、BOF()
B、LOF()
C、EOF()
D、FreeFile()
40、以下关于复选框的说法正确的是：
A、复选框的Value属性用于决定该复选框是否被选中
B、复选框的Enabled属性用于决定该复选框是否被选中
C、复选框的Checked属性用于决定该复选框是否被选中
D、复选框的Visible属性用于决定该复选框是否被选中
41、下列程序段执行后，K的值是: S=0 For K=1 to 9 S=S+K Next K Print K
A、10
B、9
C、45
D、50
42、下列程序代码的执行结果为: x=5 y=-20 If Not x>0 then x=y-3 else y=x+3 Print x,y
A、5 8
B、5 -20
C、-23 -20
D、5 -23
43、使用Open语句打开文件时，若使用Output模式，则是__________。
A、对文件进行写操作，若文件已经存在，则文件中所有内容将被清除
B、对文件进行读操作，若文件已经存在，则文件中所有内容将被清除
C、对文件进行追加操作，若文件已经存在，则保留文件中原有内容
D、对文件进行写操作，若文件已经存在，则保留文件中原有内容
44、For语句的格式如下，下列说法错误的是： For <循环变量>=<初值> to <终值> [step <步长>] [<循环体>] [exit for] Next [<循环变量>]
A、步长只能为正数，不能为负数
B、步长为1时，可略去不写
C、初值、终值和步长都是数值表达式
D、next后的循环变量与for语句中的循环变量必须相同
45、运行下列程序，执行语句Print i * j的次数为： Privat Sub Form_Click() For i =1 to 2 For j =5 to 1 step –2 Print i * j Next j Next i End Sub
A、6
B、10
C、8
D、9
46、下列哪条语句使得复选框Check1无效：
A、Check1.value=2
B、Check1.value=1
C、Check1.Style=1
D、Check1.Style=0
47、打开磁盘上的文件"D:\T1.txt"，读出其内容，指定文件号为1，应使用语句________。
A、Open "D:\T1.txt" For Input As #1
B、Open "D:\T1.txt" For Output As #1
C、Open "D:\T1.txt" For Append As #1
D、Open "D:\T1.txt" For Input 1
48、执行下列语句后，x的值是： n=6:x=1:i=1 Do x=x*i i=i+1 Loop While i<n
A、24
B、15
C、120
D、720
49、如果x大于y的平方，则在窗体上输出“OK”，则下列哪条语句可以完成这个要求：
A、If x<y^2 Then Print "OK"
B、If x>y^2 Then Print "OK"
C、If x<y^2 Then Show "OK"
D、If x>y^2 Then Put "OK"
50、以下关于InputBox的叙述中，不正确的是：
A、执行一次InputBo函数时，可以一次输入多个数值
B、在默认情况下，InputBox的返回值是一个字符串
C、InputBox函数可以写成InputBo$的形式
D、执行一次InputBo函数时，不能一次输入多个数值
51、Line Input语句可以从文件中读出_______，并将读出的数据赋给指定的字符串变量。
A、换行符
B、回车符
C、单个字符
D、一行数据
52、下列程序段的输出结果是： s=0 For i=2 to 10 Step 2 s=s+i Next i Print s
A、25
B、30
C、55
D、45
53、以下程序段的输出结果是： a=8:s=1 Do s=s+a a=a-1 Loop While a<=0 Print s: a
A、9 7
B、7 9
C、34 0
D、死循环
54、下面正确使用动态数组的是：
A、Dim arr() As Integer …… ReDim arr(3,9)
B、Dim arr() As Integer … ReDim arr(60)As String
C、Dim arr() … ReDim arr(50) As Integer
D、Dim arr(60) As Integer … ReDim arr(20)
55、下列哪一项不属于Combo控件的方法：
A、DeleteItem
B、Clear
C、AddItem
D、RemoveItem
56、在默认状态下，假设建立了一个数组arr(8),则LBound(arr)的值是：
A、0
B、8
C、9
D、1
57、设有数组声明语句，定义的数组a为_______维数组，数组元素个数为_______。 Option base 1 Dim a(4,-1 to 2)
A、2 16
B、2 20
C、2 15
D、1 20
58、执行以下Command1的Click事件过程在窗体上显示： Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2, 3, 4, 5, 6, 7) Print a(2);a(4);a(6) End Sub
A、2 4 6
B、1 3 5
C、1 2 3
D、2 3 4
59、下列程序运行时，单击命令按钮在窗体上输出的结果是： Option Base 0 Private Sub Command1_Click() Dim x,i% x = Array(1, 3, 5, 7, 9, 11, 13, 15) For i = 1 To 3 Print x(6 - i); Next i End Sub
A、11 9 7
B、9 7 5
C、7 5 3
D、5 3 1
60、设窗口上有一个组合框控件Combo1，含有若干个列表项，以下能表示当前被选中的列表项内容的是：
A、Combo1.List
B、Combo1.Text
C、Combo1.ListIndex
D、ListIndext
61、为了在组合框或列表框中插入一行文本应使用的方法是：
A、Additem
B、RemoveItem
C、Input
D、List
62、现有如下程序： Private Sub Command1_Click() Dim b(10), x% For i = 0 To 10 b(i) = Int(Rnd * 90 + 10) x = x + b(i) Mod 2 Next i Print 11-x End Sub
A、11个数中奇数的个数
B、11个数中奇数的和
C、11个数中偶数的个数
D、11个数中偶数的和
63、下面是求最大公约数的函数的首部 Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer 若要输出16、20、32这3个数的最大公约数，下面正确的语句是_______。
A、Print gcd(16,20)，gcd(20,32)，gcd(16,32)
B、Print gcd(16,20,32)
C、Print gcd(16)，gcd(20)，gcd(32)
D、Print gcd(16,gcd(20,32))
64、下列程序，运行后的输出结果是： Private Sub Command1_Click() Dim a(10), i% For i = 1 To 10 a(i) = i ^ 2 Next i Print a(i - 2) End Sub
A、100
B、81
C、64
D、121
65、程序运行后，单击窗体，输出结果是： Option Base 1 Private Sub Form_Click() Dim a ， i As Integer a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) For i = 0 To 3 Print a(5 - i); Next i End Sub
A、5 4 3 2
B、4 3 2 1
C、6 5 4 3
D、3 2 1 0
66、已知数组声明Dim a(-1 to 2,2) As Integer，下列说法不正确的是：
A、此数组的元素个数为12个
B、此数组的数组名为a
C、此数组的维数为2维
D、此数组的数据类型为单精度型
67、在通用过程中，要定义某一形式参数和其对应的实际参数是按值传递，在形式参数前面要加的关键字是_______。
A、ByVal
B、ByRef
C、Public
D、Private
68、在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用以下哪个关键字在过程中定义局部变量_______。
A、Dim
B、Const
C、Static
D、Private
69、以下程序段用来求出数组a中的最小值的位置（假设数组a中的个元素均已正确赋值），并将结果保存在变量min中，则横线处应该填写的语句是： min = 1 For i = 1 To 10 If Then min = i Next i
A、a(i)>a(max)
B、a(i)>a(min)
C、a(i)<a(min)
D、a(i)<a(max)
70、下述程序的运行结果是： Private Sub Command1_Click() a=3 b=-2 Call fun(a,b) Print a,b End Sub Private Sub fun(x, y) x=x * y y=y + x End Sub
A、3 -2
B、-2 3
C、-6 -8
D、-8 -6
71、以下程序的运行结果是： Private sub command1_click() Dim x%,y%,z% x=1 y=2 z=3 Call swap(x,y,z) Print x;y;z End sub Public sub swap(a%,b%,c%) Dim t% t=a : a=c: c=b: b=t End sub
A、1 2 3
B、2 3 1
C、3 1 2
D、3 2 1
72、下列程序的运行结果是： sub p(a As Integer) Dim x as Integer Dim y as Integer x=x+1 y=y+2 a=a+x+y End Sub Private Sub Command1_Click() Dim a As Integer a=2 call p(a) print a; End Sub
A、2
B、3
C、4
D、5
73、在过程定义中，参数的传递方式有传值和传地址两种方式，下列说法中正确的是_______。
A、采用传值方式，在调用一个过程时，系统将实参的值赋值给形参，之后，形参和实参断开了联系
B、采用传值方式，形参的变化直接影响实参的变化
C、采用传地址方式，在调用一个过程时，系统将实参的值传递给形参
D、参数的传递方式有传值和传地址两种方式，这两种方式都是双向的
74、下列程序的运行结果是： Private sub command1_click() Dim x%,y%,z% x=3 ：y=5 ：z=7 Call swap(x,y,z) Print x;y;z End sub Public sub swap(byval a%,b%,c%) a=a+1 b=b+1 c=c+1 End sub
A、3 5 7
B、3 6 8
C、4 6 8
D、4 6 7
75、VB6.0集成开发环境有三种工作状态，这三种工作状态分别是：
A、编写代码状态
B、设计状态
C、运行状态
D、中断状态
76、当打开VB6.0，并新建一个工程后，所显示出的界面上包含以下哪些窗口：
A、工程资源管理器窗口
B、中断窗口
C、属性窗口
D、工具箱窗口
77、结构化程序设计的基本结构包括：
A、集成结构
B、顺序结构
C、分支结构
D、循环结构
78、以下关于算法的叙述中，正确的包括：
A、求解某一类问题的算法是唯一的
B、算法一定在有限的步骤内结束
C、算法的每一步操作必须是明确的，不能有歧义
D、算法执行后，一定产生确定的结果
79、关于对象的事件，叙述不正确的是：
A、同一事件，作用于不同的对象，会引发不同的反应，产生不同的结果
B、在VB中，每个对象的事件，需要用户自定义
C、在VB中，每个对象的事件过程，系统已定义好
D、同一事件，作用于不同的对象，一定引发相同的反应，产生相同的结果
80、在VB中，对象的三要素包括：
A、属性
B、事件
C、方法
D、位置
81、以下关于控件的叙述中，正确的包括：
A、文本框控件能够获得焦点
B、标签控件能够获得焦点
C、命令按钮的外观可以设置为图形
D、文本框通过Caption属性设置内容
82、以下运算结果是“20131010”的表达式有：
A、"2013" + 1010
B、"2013" & "1010"
C、2013 & 1010
D、"2013" + "1010"
83、在VB中，运算符包括：
A、算术运算符
B、关系运算符
C、逻辑运算符
D、字符串运算符
84、以下表达式中，结果为 True 的有：
A、8>3
B、"8">"13"
C、"a">"b"
D、"8"<"13"
85、在VB中，用来注释的符号是单引号。
86、计算思维的本质是计算。
87、衡量一个算法的优劣可以通过时间复杂度和空间复杂度这两个方面来进行。
88、方法是VB预先定义的，用户可直接使用的过程。
89、当运行程序时，程序界面出现后，已经执行的事件过程是：Form_Click
90、Image控件与Picture控件都可以装入图片。
91、更改命令按钮的背景色是更改其BackColor属性值。
92、文本框不能输入多行文字，可能是因为文本框的MultiLine属性值为False。
93、所有控件都具有一个共同的属性，这个属性是Name属性。
94、在设计阶段双击一个控件打开的窗口为属性窗口。
95、执行If逻辑表达式值为False，则关键字Then后的若干语句都要执行。
96、在If语句中，关键字End If是必不可少的。
97、表达式5>4>3的计算结果是False。
98、Write #语句的作用是将数据从文件中读出并显示在窗体上。
99、通过Open语句打开一个文件，操作完成后，必须用Close语句将其关闭。
100、列表框和标签一样都具有Text属性。
101、调用一个过程时，实际参数和形式参数的类型可以不一致。
102、可以使用Visual Basic的关键字作为变量名。
103、Print语句不可以省略输出项，若省略则出现语法错误。
104、定义数组时，若要使得数组的下界默认值为1，则可以用语句Option Base 1。
105、表达式Left("Nothing",2)的计算结果是"No"。
106、在默认情况下，执行语句Dim S(50) as Integer，则声明了S数组有51个元素.
107、表达式Len(x)和len("x")含义是不相同的。
108、修改控件的Top和Left属性,可改变控件在窗体中的位置。
109、Do Until/Loop 结构的循环，是“先判断、后执行（循环体）”的循环结构。
110、Print语句的每个输出项之间可以用逗号或分号分隔，不管用逗号还是分号，其输出效果是一样的。
111、表达式"123"+1的计算结果是"1231"。
112、许多属性可以直接在属性表上设置、修改，并立即在屏幕上看到效果。
113、想要在文本框中显示某内容，则需更改文本框的Caption属性。
114、组合框可以说是列表框与文本框的组合。
115、在For……Next循环中，其中step步长可以是正数、负数或者零。
116、"x是小于200的非负数"，用VB表达式表示正确的是0<=x Or x<200。
117、Boolean类型的数据可以用来保存逻辑值True和False。
118、在Select Case语句中，各个分支（即每个Case语句）的先后顺序与程序结果是相关的。
119、在通用对话框的“打开文件对话框”中选择一个文件后，能直接打开该文件。
120、定时器控件不仅可以响应Timer事件，还可以响应Click事件。
121、决定对象是否可见的属性是 Visible 属性。
122、声明语句 Dim a(2,3) as integer ,声明了一个二维数组，总共含有12个元素
123、可以通过组合框的List属性访问到组合框中的每一个表项。
124、函数过程定义时必须有关键字Private。
125、数组作为参数传递时，必须使用传地址的方式。
126、Visual Basic中，菜单有两种类型，分别为下拉式菜单和弹出式菜单。
127、按文件的内容，文件可分为程序文件和数据文件，程序文件存储的是程序，数据文件存储的是程序运行所需要的的各种数据。
128、一个好的算法所具有的的特点有：有穷性、确定性、有0个或多个输入，有1个或多个输出，可行性。
学习通VB程序设计[321002214]_1
前言
VB（Visual Basic）是一门基于对象的程序设计语言，它是微软公司推出的一款可视化编程工具，具有可视化开发、易学易用、代码简洁等优点，广泛应用于Windows平台上的各种应用程序开发。
课程概述
本课程《学习通VB程序设计[321002214]_1》是由北京邮电大学开设的一门课程，旨在教授VB程序设计的基本知识和技能。课程内容主要包括VB程序设计的基础、程序语法、控件使用、事件处理、文件操作、数据库编程等方面的内容。
课程目标
通过本课程的学习，学生将掌握VB程序设计的基本理论知识和实践技能，能够独立完成简单的VB程序设计和开发，并为进一步学习VB程序设计奠定基础。
课程大纲
本课程共分为10个章节，具体内容如下：
- VB程序设计概述
- 程序语法与控件
- 变量与数据类型
- 运算符与表达式
- 条件语句与循环结构
- 函数与过程
- 数组与集合
- 文件操作
- 数据库编程
- 综合应用实例
教学方法
本课程采用面授和实验相结合的教学方法，课堂上讲授VB程序设计的基础知识，实验中通过编写小程序来巩固所学的内容，并通过作业来检查学生的掌握程度。
考核方式
本课程采用闭卷笔试和实验报告相结合的考核方式，闭卷笔试主要考查学生对VB程序设计基础知识的理解和应用能力，实验报告主要考查学生对VB程序设计实践能力的掌握。
结语
本课程《学习通VB程序设计[321002214]_1》是一门非常实用的课程，能够帮助学生掌握VB程序设计的基础知识和技能，为学生今后从事软件开发工作打下坚实的基础。
