1、二级 VISUAL+BASIC 笔试-374 及答案解析(总分：93.00，做题时间：90 分钟)一、选择题(总题数：35，分数：62.00)1.VisualBasic 布尔运算符 Xor，Or，Eqv，And 中，级别最高的运算符是( )。AXor BOr CEqv DAnd（分数：2.00）A.B.C.D.2.有如下程序：Private Sub Commandl_Click()Dim a As SingleDim b As Singlea=2：b=4Call CS(a，b)End SubSub CS(x As Single，y As Single)t=Xx=t/yy=t Mod yEnd
2、Sub程序运行后，单击命令按钮，a 和 b 的值分别为A)0 0 B)1 1 C)0 2D)1 2（分数：1.00）A.B.C.D.3.要使文本框获得输入焦点，则应采用文本框控件的( )方法。AGotFocus BLostFocusCKeyPress DSetFocus（分数：2.00）A.B.C.D.4.有如下函数过程：Function fun1(By Val x As Integer,By Val y As Integer)As IntegerDo While y0reminder=x Mod yx=yy=reminderLoopfun1=xEnd Function在下列按钮单击事件中调用
3、该函数，则该程序的运行结果是( )。Private Sub Command1_CliCk()Dim a As IntegerDim b As Integera=100b=25x=fun1(a，b)Print xEnd SubA) 0 B) 25 C) 50 D) 100（分数：2.00）A.B.C.D.5.结构化程序设计的 3 种结构是A) 顺序结构、选择结构、转移结构B) 分支结构、等价结构、循环结构C) 多分支结构、赋值结构、等价结构D) 顺序结构、选择结构、循环结构（分数：2.00）A.B.C.D.6.以下语句中哪句可以选择指定的表项或取消已选择的表项A) 列表框.Selected(索引
4、值)B) 列表框.Selected(索引值)=True|FalseC) 列表框.SelectedD) 列表框.Selected=True|False（分数：2.00）A.B.C.D.7.假设线性表的长度为 n，则在最坏的情况下，冒泡排序法的时间复杂度是A) log2n B) nlog2n C) n(n-1) D) n(n-1)/2（分数：1.00）A.B.C.D.8.下列各种形式的循环中，输出“*”的个数最少的循环是( )。Aa=5:b=8DoPrint“*“a=a+1Loop While abBa=5:b=8DoPrint“*“a=a+1Loop Until abCa=5:b=8Do Unt
5、il a-bprint“*“b=b+1LoopDa=5:b=8DoUntil abPrint“*“a=a+1Loop（分数：2.00）A.B.C.D.9.软件工程中，软件配置由配置项来表示，以下选项中，_不属于软件配置项的内容。A) 需求说明书 B) 测试报告 C) 可行性研究报告 D) 软件变更通知（分数：1.00）A.B.C.D.10.关系模型允许定义 3 类数据约束，下列不属于数据约束的是( )。A) 实体完整性约束 B) 参照完整性约束C) 属性完整性约束 D) 用户自定义的完整性约束（分数：2.00）A.B.C.D.11.单击命令按钮时，下列程序的执行结果为Private Sub C
6、ommand1_Click( )Dim x As Integer，y As Integerx=12：y=32Call Proc(x，y)Print x；yEnd SubPublic Sub Proc(n As Integer，ByVal m As Integer)n=n Mod 10m=m Mod 10End SubA12 32 B2 32 C2 3 D12 3（分数：1.00）A.B.C.D.12.如果 x 是一个正的实数，将千分位四舍五入，保留两位小数的表达式是( )。A0.01*Int(X+0.05) B0.01*Int(X+0.005)*100)C0.01*Int(100*(X+0.0
7、5) D0.01*Int(X+0.005)（分数：2.00）A.B.C.D.13.窗体上有一个名称为 Option1 的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub option1_Click(Index As Integer)End Sub下面关于此过程的参数 Index 的叙述中正确的是A)Index 为 1 表示单选按钮被选中，为 0 表示未选中B)Index 的值可正可负C)Index 的值用来区分哪个单选按钮被选中D)Index 表示数组中单选按钮的数量（分数：2.00）A.B.C.D.14.以下叙述中错误的是( )。A一个工程中只能有一
8、个 Sub Main 过程B窗体的 Show 方法的作用是将指定的窗体装入内存并显示该窗体C窗体的 Hide 方法和 Unload 方法的作用完全相同D若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体（分数：2.00）A.B.C.D.15.下列程序段的执行结果为a=6For k=1 To 0a=a+kNextPrint k；aA) -1 6 B) -1 16 C) 1 6 D) 11 21（分数：2.00）A.B.C.D.16.下列事件过程的功能是：建立一个名为 Datal 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。请在空白处填入适当的内容，
9、将程序补充完整( )。Private Type AngK As IntegerSinx As SingleCosx As SingleEnd TypeDim Ksc As AngPrivate Sub Form_Click()Dim Y As SingleDim i As IntegerDim Ksc As AngOpen _Y = 3.14159 / 180For i = 1 To 90Ksc. K = iKsc. Sinx = Sin(i * Y)Ksc. Cosx = Cos(i * Y)_Next iClose #2End SubA) “/Data1.txt“ For Random A
10、s #1 Len = 10 Put #1, i, KscB) “/Data1.txt“ For Random As #1 Len = 10 Put #1, Y, KseC) “/Data1.txt“ For Random As #1 Put #1, i, KscD) “/Data1.txt“ For Random As #1 Put #1, Y, Ksc（分数：2.00）A.B.C.D.17.下面四个选项，不是窗体属性的是( )。AMinButton BMaxButton CCaption DLoad（分数：2.00）A.B.C.D.18.如果一个变量未经定义就直接使用，则该变量的类型为A)
11、Integer B) Byte C) Boolean D) Variant（分数：2.00）A.B.C.D.19.模块独立性是软件模块化所提出的要求，衡量模块独立性的度量标准是模块的( )A) 抽象和信息隐蔽 B) 局部化和封装化C) 内聚性和耦合性 D) 激活机制和控制方法（分数：2.00）A.B.C.D.20.数据库系统在其内部具有 3 级模式，用来描述数据库中全体数据的全局逻辑结构和特性的是( )。A) 外模式 B) 概念模式 C) 内模式 D) 存储模式（分数：2.00）A.B.C.D.21.下列数据结构中，能够按照“先进后出”原则存取数据的是A) 循环队列 B) 栈 C) 队列 D)
12、 二叉树（分数：2.00）A.B.C.D.22.在修改列表框内容时，AddItem 方法的作用是A) 在列表框内插入一行文本 B) 在列表框中插入多行文本C) 删除列表框中指定的项目 D) 清除列表框内的全部内容（分数：2.00）A.B.C.D.23.下面程序运行后，输出的结果是( )。Dim arr(3,3)For i=1 To 3For k=1 To 3Arr(j,k)=(j-1)*3+kNext kNext jFor i=2 To 3For k=2 To 3Print arr(k,j);Next kPrintNext jA) 25 B) 58 C) 47 D) 59（分数：2.00）A.
13、B.C.D.24.下列程序段的执行结果为 _。I=0For G=10 To 19 Step 3I=I+1Next GPrint IA) 4 B) 5 C) 3 D) 6（分数：1.00）A.B.C.D.25.运行下列程序段后，显示的结果为( )。J1=23J2=32If J1J2 Then Print J2 Else Print J1A) 23 B) 32 C) 55 D) 2332（分数：2.00）A.B.C.D.26.要建立一个随机文件记录学生的信息，如下定义了学生的记录类型，由学号、姓名、5 门课程成绩(百分制)组成，下列的定义正确的是( )。A) Type stuno As Integ
14、ername As Stringscore(1 To 5)AS SingleEnd TypeB) Type stuno As Integername As String*10score()As SingleEnd TypeC) Type stuno As Integername As String*10score(1 To 5)As singleEnd TypeD) Type stuno As Integername As Stringscore()As SingleEnd Type（分数：2.00）A.B.C.D.27.结构化程序设计的核心和基础是( )。A)结构化分析方法 B)结构化设计方
15、法 C)结构化设计理论 D)结构化编程方法（分数：2.00）A.B.C.D.28.用 Write 和 Print 语句向文件中写入多个数据的差别在于 _。AWrite 语句不会自动在数据项之间插入逗号BPrint 语句自动在数据项之间插入逗号Cwrite 语句写入字符串会自动给字符串加上双引号，写入的正数前面没有空格DPrint 语句写入字符串会自动给字符串加上双引号，写入的正数前面没有空格（分数：3.00）A.B.C.D.29.索引属于 _。A) 模式 B) 内模式 C) 外模式 D) 概念模式（分数：1.00）A.B.C.D.30.在数据库的三级模式结构中，外模式有_。A) 1 个 B)
16、2 个 C) 3 个 D) 任意多个（分数：2.00）A.B.C.D.31.设置复选框或单选按钮的标题对齐方式的属性是( )。A) Aligh B) StyleC) Alignment D) Sorted（分数：2.00）A.B.C.D.32.设在窗体上有一个名称为 Command1 的命令按钮，并有以下事件过程：Private Sub Commandl Click()StatiC b As Variantb=Array(1，3，5，7，9).End Sub此过程的功能是把数组 b 中的 5 个数逆序存放(即排列为 9，7，5，3，1)。为实现此功能，省略号处的程序段应该是A) For i=0
17、 To 5-1/2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNextB) For i=0 To 5tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNextC) For i-0 To 5/2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNextD) For i=1 To 5/2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNext（分数：2.00）A.B.C.D.33.图像框有个属性，可以自动调整图像框的大小，以适应图像的尺寸，这个属性是 _ 。A) AutoSize B) Stretch C) AutoRedra
18、w D) Appearance（分数：1.00）A.B.C.D.34.软件开发的结构化生命周期方法将软件生命周期划分成 _。A) 定义、开发、运行维护B) 设计阶段、编程阶段、测试阶段C) 总体设计、详细设计、编程调试D) 需求分析、功能定义、系统设计（分数：1.00）A.B.C.D.35.用链表表示线性表的优点是 _。A) 便于插入和删除操作 B) 数据元素的物理顺序与逻辑顺序相同C) 花费的存储空间较顺序存储少 D) 便于随机存取（分数：1.00）A.B.C.D.二、填空题(总题数：14，分数：31.00)36.假定有一个菜单项，名为 Menultem，为了在运行时使该菜单项失效(变灰)，
19、应使用的语句为 1。（分数：2.00）填空项 1:_37.为了使标签能自动调整大小以显示全部文本内容，应把标签的 1 属性设置为 True。（分数：2.00）填空项 1:_38.在窗体上画一个名称为 Text1 的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为 Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。（分数：2.00）填空项 1:_39.下面的程序执行时，可以从键盘输入一正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出 5867；输入 1000，则输出 0 0 0 1。请填空。Pr
20、ivate Sub Command1_Click()Dim x As Integerx=InputBox(“请输入一个正整数“)While x_Print x Mod 10;x=x/10WendPrint _End Sub（分数：4.00）填空项 1:_40.在链表的运算过程中，能够使空表与非空表的运算统一的结构是 1。（分数：2.00）填空项 1:_随机文件以 1 为单位读写，二进制文件以 2 为单位读写。（分数：4.00）填空项 1:_填空项 1:_42.以下是一个比赛评分程序。在窗体上建立一个名为 Text1 的文本框数组，然后画一个名为 Text2 的文本框和名为 Command1 的
21、命令按钮。运行时在文本框数组中输入 7 个分数，单击“计算得分”命令按钮，则最后得分显示在 Text2 文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分)，如图所示。请填空。（分数：2.00）填空项 1:_43.下列程序段的执行结果为_。Dim A (10,10)For i = 2 To 4For j =4 To 5A(i,j) =i*jNextNextPrint A (2,5) +A(3,4) +A(4,5)（分数：1.00）填空项 1:_44.有如下函数过程：Function gys(By Val x As Integer，ByVal y As Integer)As Intege
22、rDo While Y#0preminder=x/yx=Yy=preminderLoopgys=xEnd Function以下是调用该函数的事件过程，该程序的运行结果是_。Private Sub Command1_Click()Dim a As Integer，b As Integera=10：b=2x=gys(a,b) Print xEnd Sub（分数：2.00）填空项 1:_45.在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程：Private Sub Command1_Click()Text1.Text=“VB Programming“Text2.Text=Text
23、1.TextText1.Text=“ABCD“End Sub程序运行后，单击命令按钮，Text1 文本框中显示的内容为_。（分数：1.00）填空项 1:_46.下面运行程序后，单击命令按钮，输出的结果是_。Private Sub Commandl_clck()Dim a%(1 To 4)，b%(3 To 6)，i%，s1#，s2#Fori=1 To 4a(i)=iNextiFor i=3 To 6b(i)=iNextis1=YAS(a)S2=YAS(b)Printt“s1=“；S1“S2=“；s2End SubFunctionYAS(a()AsInteger)Dimt#，i%t=1For i=
24、LBound(a)ToUBound(a)t=t*a(i)NextiYAS=tEnd Funtoon（分数：2.00）填空项 1:_47.在窗体上面画一个命令按钮，然后编写如下程序：Function M(x As Integer，y As Integer)As IntegerM=IIf(xy，x，y)End FunctionPrivate Sub Command1_Click()Dim a As Integer，b As Integera=1b=2Print M(a，B) End Sub程序运行后，单击命令按钮，输出结果为_。（分数：1.00）填空项 1:_48.当用户按下键盘上的某个键时，将会
25、触发拥有输入焦点的控件的 1 事件。（分数：2.00）填空项 1:_在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程：Private Sub Coraraand1_Click( )Text1.Text=“计算机“Text2.Text=Text1.TextText1.Text=“等级考试“End Sub程序运行后，单击命令按钮，两个文本框(Text1 和 Text2)内容分别为_和_。（分数：4.00）填空项 1:_填空项 1:_二级 VISUAL+BASIC 笔试-374 答案解析(总分：93.00，做题时间：90 分钟)一、选择题(总题数：35，分数：62.00)1.Vi
26、sualBasic 布尔运算符 Xor，Or，Eqv，And 中，级别最高的运算符是( )。AXor BOr CEqv DAnd（分数：2.00）A.B.C.D. 解析：2.有如下程序：Private Sub Commandl_Click()Dim a As SingleDim b As Singlea=2：b=4Call CS(a，b)End SubSub CS(x As Single，y As Single)t=Xx=t/yy=t Mod yEnd Sub程序运行后，单击命令按钮，a 和 b 的值分别为A)0 0 B)1 1 C)0 2D)1 2（分数：1.00）A.B.C. D.解析：解
27、析 考查考生对过程的定义和调用及参数传递方式的理解。解题要点 调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程；因为在默认的情况下，变量都是通过“引用”传送给 Sub 过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值；过程 Sub 的形参获得 a，b 的地址，此时 x=2，y=4，在过程 Sub 中，将 x，即 2 的值赋给 t，而将 t y 的值赋给 x，将 t 除以 y 的余数赋给 y，此时 x，y 的值为0，2。3.要使文本框获得输入焦点，则应采用文本框控件的( )方法。AGotFocus BLostFocusCKeyPr
28、ess DSetFocus（分数：2.00）A.B.C.D. 解析：解析 GotFocus 是当对象获得焦点时触发的事件；LostFocus 事件是在对象失去焦点时触发的事件；SetFocus 方法用于将焦点移至指定的控件或窗体；KeyPress 事件是当用户按下或松开一个按键时触发的事件。4.有如下函数过程：Function fun1(By Val x As Integer,By Val y As Integer)As IntegerDo While y0reminder=x Mod yx=yy=reminderLoopfun1=xEnd Function在下列按钮单击事件中调用该函数，则该
29、程序的运行结果是( )。Private Sub Command1_CliCk()Dim a As IntegerDim b As Integera=100b=25x=fun1(a，b)Print xEnd SubA) 0 B) 25 C) 50 D) 100（分数：2.00）A.B. C.D.解析：解析 可以通过两种方式来传递参数，即按值传递参数和按地址传递参数。按值传递参数时，传递的只是变量的副本。如果过程改变了这个值，则所作变动只影响副本而不会影响变量本身。用 ByVal 关键字指出参数是按值来传递的。按地址传递参数使过程用变量的内存地址去访问实际变量的内容，在将变量传递给过程时，通过过程
30、可永远改变变量值。默认时是按地址传递参数。题中 fun1 函数的参数都是按值传送的，函数使用“过程名二表达式”的形式获得函数的返回值，如题中“fun1=x”语句。调用函数“x=fun1(a，b)”后，x=25。5.结构化程序设计的 3 种结构是A) 顺序结构、选择结构、转移结构B) 分支结构、等价结构、循环结构C) 多分支结构、赋值结构、等价结构D) 顺序结构、选择结构、循环结构（分数：2.00）A.B.C.D. 解析：解析 顺序结构、选择结构和循环结构(或重复结构)是结构化程序设计的 3 种基本结构。6.以下语句中哪句可以选择指定的表项或取消已选择的表项A) 列表框.Selected(索引值
31、)B) 列表框.Selected(索引值)=True|FalseC) 列表框.SelectedD) 列表框.Selected=True|False（分数：2.00）A.B. C.D.解析：解析 Selected 属性实际上是一个数组，每个元素的值为 True 或 False，每个元素与列表框中的一项相对应。当元素的值为 True 时，表示选择了该项；当元素的值为 False 时，表示未选择该项。列表框名.Selected(索引值)=True|False 语句可以选择指定的表项或取消已选择的表项。由于 Selected 是个数组，所以如果语句中缺少了索引值就不正确了。7.假设线性表的长度为 n，
32、则在最坏的情况下，冒泡排序法的时间复杂度是A) log2n B) nlog2n C) n(n-1) D) n(n-1)/2（分数：1.00）A.B.C.D. 解析：解析 假设线性表的长度为 n，则在最坏的情况下，冒泡排序需要经过 n/2 遍从前往后的扫描和n/2 遍从后往前的扫描，需要的比较次数为 n(n-1)/2。8.下列各种形式的循环中，输出“*”的个数最少的循环是( )。Aa=5:b=8DoPrint“*“a=a+1Loop While abBa=5:b=8DoPrint“*“a=a+1Loop Until abCa=5:b=8Do Until a-bprint“*“b=b+1LoopD
33、a=5:b=8DoUntil abPrint“*“a=a+1Loop（分数：2.00）A.B.C. D.解析：9.软件工程中，软件配置由配置项来表示，以下选项中，_不属于软件配置项的内容。A) 需求说明书 B) 测试报告 C) 可行性研究报告 D) 软件变更通知（分数：1.00）A.B.C. D.解析：解析 本题的考查点是软件配置的配置项。软件配置由配置项组成，按照当前软件工程常用的方法，软件配置项一般包括需求说明书、测试报告、软件变更通知等，但可行性研究报告不属于软件配置项。10.关系模型允许定义 3 类数据约束，下列不属于数据约束的是( )。A) 实体完整性约束 B) 参照完整性约束C)
34、属性完整性约束 D) 用户自定义的完整性约束（分数：2.00）A.B.C. D.解析：解析 关系模型允计 3 类数据约束，它们是：实体完整性约束：该约束要求关系的主键中属性值不能为空值，这是数据库完整性的最基本要求；参照完整性约束：该约束是关系之间相关联的基本约束，它不允许关系引用不存在的元组：即在关系中的外键要么是所关联关系中实际存在的元组，要么就为空值；用户定义的完整性约束：用户定义的完整性就是针对某一具体关系数据库的约束条件，它反映某一具体应用所涉及的数据必须满足的语义要求。11.单击命令按钮时，下列程序的执行结果为Private Sub Command1_Click( )Dim x A
35、s Integer，y As Integerx=12：y=32Call Proc(x，y)Print x；yEnd SubPublic Sub Proc(n As Integer，ByVal m As Integer)n=n Mod 10m=m Mod 10End SubA12 32 B2 32 C2 3 D12 3（分数：1.00）A.B. C.D.解析：解析 函数过程在调用过程时，一般主调与被调过程之间有数据传递，即将主调过程的实参传递给被调用的过程，完成实参与形参的结合，然后执行被调过程，在 Visual Basic 中，实参与形参的结合有两种方式：即传址与传值。这两种方法的特点如下：1
36、) 传址的结合过程时：当调用一个过程时，它将实参的地址传给形参，因此在被调用的过程中，对形参的任何操作都变成了对相应实参的操作，因此实参的值会随形参的改变而改变。2) 传值的结合过程时：当调用一个过程时，系统将实参的值赋值给形参并断开了联系，被调用过程中的操作时在形参自己的存储单元中进行的，当过程调用结束时，这些形参所占用的存储单元也同时被释放，因此在过程中对形参的任何操作不会影响实参。而题中被调过程 Proc 中有两个形参，其中第一个形参 n为传址方式，第二个形参 m 为传值方式。主调过程分别把实参 x、y 传递给 Proc，所以当过程调用结束后，实参 x 的值应随着被调过程变化而变化，而实
37、参 y 值在主调函数中始终不变，所以输出 y 的值仍为 32；在被调过程中“n=n Mod l0“被调用时，相当于“x=x Mod 10”，所以 x 的值最终为 32，最后输出结果如选项 B 所示。12.如果 x 是一个正的实数，将千分位四舍五入，保留两位小数的表达式是( )。A0.01*Int(X+0.05) B0.01*Int(X+0.005)*100)C0.01*Int(100*(X+0.05) D0.01*Int(X+0.005)（分数：2.00）A.B. C.D.解析：13.窗体上有一个名称为 Option1 的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Pr
38、ivate Sub option1_Click(Index As Integer)End Sub下面关于此过程的参数 Index 的叙述中正确的是A)Index 为 1 表示单选按钮被选中，为 0 表示未选中B)Index 的值可正可负C)Index 的值用来区分哪个单选按钮被选中D)Index 表示数组中单选按钮的数量（分数：2.00）A.B.C. D.解析：解析 控件数组是一组具有相同名称和相同属性的控件，为了区分用户使用了哪一个命令按钮，VB 系统自动对控件数组的事件过程增加了 Index 参数项，该参数值代表被单击控件数组元素的下标值(即Index 属性值)，所以正确的答案为 C)。1
39、4.以下叙述中错误的是( )。A一个工程中只能有一个 Sub Main 过程B窗体的 Show 方法的作用是将指定的窗体装入内存并显示该窗体C窗体的 Hide 方法和 Unload 方法的作用完全相同D若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体（分数：2.00）A.B.C. D.解析：解析 窗体的 Hide 方法只是将窗体隐藏，并不从内存中释放，而 Unload 则是将窗体从内存中释放，也就是销毁窗体。因此选项 C 错误。15.下列程序段的执行结果为a=6For k=1 To 0a=a+kNextPrint k；aA) -1 6 B) -1 16 C) 1 6 D) 11 21
40、（分数：2.00）A.B.C. D.解析：解析 For 循环的一般格式是：For 循环变量=初值 To 终值 Step步长语句Exit For语句Next循环变量该循环语句的执行过程为：“循环变量”首先取得“初值”，检查是否超过“终值”，如果超过，就不循环并跳出循环，属于“先检查后执行”的类型。现在来看程序段，For k=1 To 0 中，初值为 1，终值为0，显然当“循环变量”首先取得“初值”1，检查后超过“终值”0，所以一次也不执行，即最后执行Print 时，k=1，a=6。16.下列事件过程的功能是：建立一个名为 Datal 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度
41、为 1，2，3，90。请在空白处填入适当的内容，将程序补充完整( )。Private Type AngK As IntegerSinx As SingleCosx As SingleEnd TypeDim Ksc As AngPrivate Sub Form_Click()Dim Y As SingleDim i As IntegerDim Ksc As AngOpen _Y = 3.14159 / 180For i = 1 To 90Ksc. K = iKsc. Sinx = Sin(i * Y)Ksc. Cosx = Cos(i * Y)_Next iClose #2End SubA) “
42、/Data1.txt“ For Random As #1 Len = 10 Put #1, i, KscB) “/Data1.txt“ For Random As #1 Len = 10 Put #1, Y, KseC) “/Data1.txt“ For Random As #1 Put #1, i, KscD) “/Data1.txt“ For Random As #1 Put #1, Y, Ksc（分数：2.00）A. B.C.D.解析：解析 分析程序，程序要将角度值及这些角度的正弦函数值和余弦函数值存入 Datal 文件中。因此，应先打开 Datal 文件。因为 Datal 文件是随机文
43、件，要新建并写入信息，所以应使用 Random 方式打开文件。这里我们给随机文件指定长度为 10，故第 1 个空白处应填： “/Data1.txt“ For Random As #1 Len=10。要向随机文件中写入信息，应用 Put 语句，故第 2 空应填：Put #1,i,Ksc。17.下面四个选项，不是窗体属性的是( )。AMinButton BMaxButton CCaption DLoad（分数：2.00）A.B.C.D. 解析：18.如果一个变量未经定义就直接使用，则该变量的类型为A) Integer B) Byte C) Boolean D) Variant（分数：2.00）A.
44、B.C.D. 解析：解析 在 Visual Basic 中，系统提供了多种数据类型，有字符串类型、数值型、货币型、布尔型和日期型等。此外还有一种变体类型 Variant，它是一种特殊的数据类型，Variant 变量中可以存放任何类型的数据，如数值、文本字符串、日期和时间等，向 Variant 变量赋值时不必进行任何转换，系统将自动进行必要的转换。如果变量未经定义就直接使用，则该变量为 Variant 类型。19.模块独立性是软件模块化所提出的要求，衡量模块独立性的度量标准是模块的( )A) 抽象和信息隐蔽 B) 局部化和封装化C) 内聚性和耦合性 D) 激活机制和控制方法（分数：2.00）A.
45、B.C. D.解析：解析 模块的独立程度是评价软件设计好坏的重要度量标准。衡量软件的模块独立性经常使用耦合性和内聚性两个定性的度量标准。故选项 C 正确。20.数据库系统在其内部具有 3 级模式，用来描述数据库中全体数据的全局逻辑结构和特性的是( )。A) 外模式 B) 概念模式 C) 内模式 D) 存储模式（分数：2.00）A.B. C.D.解析：解析 概念模式，也称逻辑模式，是对数据库系统中全局数据逻辑结构的描述，是全体用户应用公共数据视图。它不涉及具体的硬件环境与平台，与具体的软件环境也无关。21.下列数据结构中，能够按照“先进后出”原则存取数据的是A) 循环队列 B) 栈 C) 队列
46、D) 二叉树（分数：2.00）A.B. C.D.解析：解析 栈是限定只在一端进行插入与删除的线性表，通常称插入、删除的这一端为栈顶，另一端为栈底。栈顶元素总是后被插入的元素，也是最先被删除的元素；栈底元素总是最先被插入的元素，也是最后才能被删除的元素。栈是按照“先进后出”或“后进先出”的原则组织数据的。22.在修改列表框内容时，AddItem 方法的作用是A) 在列表框内插入一行文本 B) 在列表框中插入多行文本C) 删除列表框中指定的项目 D) 清除列表框内的全部内容（分数：2.00）A. B.C.D.解析：解析 考查列表框的使用方法。解题要点 列表框可以使用 AddItem、C1ear 和
47、 RemoveItem 等方法，用来在运行期间改变列表框的内容。AddItem 方法用来在列表框中插入一行文本，格式为“列表框 AddItem 项目字符串,索引值”。Clear 方法用来清除列表框中的全部内容，格式为“列表框Clear”。RemoveItem 方法用来删除列表中指定的项目，格式为“列表框RemoveItem 索引值”。考点链接 内部控件的属性和使用方法。23.下面程序运行后，输出的结果是( )。Dim arr(3,3)For i=1 To 3For k=1 To 3Arr(j,k)=(j-1)*3+kNext kNext jFor i=2 To 3For k=2 To 3Pri
48、nt arr(k,j);Next kPrintNext jA) 25 B) 58 C) 47 D) 59（分数：2.00）A.B. C.D.解析：解析 依题意，声明一个三行三列的数组，并用嵌套 for 循环赋值如下：arr(1,1)=1 arr(2,1)=4 arr(3,1)=7arr(1,2)=2 arr(2,2)=5 arr(3,2)=8arr(1,3)=3 arr(2,3)=6 arr(3,3)=9最后用 Print 函数输出 arr(2，2)，arr(3，2)，空行，arr(2，3)，arr(3，3)。24.下列程序段的执行结果为 _。I=0For G=10 To 19 Step 3I=I+1Next GPrint IA) 4 B) 5 C) 3 D) 6（分数：1.00）A.
