1、二级 VISUAL+BASIC-19-1 及答案解析(总分：84.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：61.00)1.某人编写了下面的程序：Private Sub Command1_Click()Dim a As Integer,b As Integera=InputBox(“请输入整数“)b=InputBox(“请输入整数“)pro apro bCall pro(a+b)End SubPrivate Sub pro(n As Integer)While(n0)Print n Mod 10：n=n/10WendPrintEnd Sub此程序功能是：输入 2 个正整
2、数，反序输出这 2 个数的每一位数字，再反序输出这 2 个数之和的每一位数字。例如，若输入 123 和 234，则应该输出：3 2 14 3 27 5 3但调试时发现只输出了前 2 行(即 2 个数的反序)，而未输出第 3 行(即 2 个数之和的反序)，程序需要修改。下面的修改方案中正确的是_。 A. 把过程 pro 的形式参数“n As Integer“改为“ByVal n As Integer“ B. 把“Call pro(a+b)“改为“pro a+b“ C. 把“n=n/10“改为“n=n/10“ D. 在 pro b 语句之后增加语句 c%=a+b，再把“Call pro(a+b)“
3、改为“pro c“（分数：2.00）A.B.C.D.2.VB 中有 3 个键盘事件：KeyPress、KeyDown、KeyUp，若光标在 Text1 文本框中，则每输入一个字母U/U A.这 3 个事件都会触发 B.只触发 KeyPress 事件 C.只触发 KeyDown、KeyUp 事件 D.不触发其中任何一个事件（分数：2.00）A.B.C.D.3.为了使文本框同时具有垂直和水平滚动条，应先把 MultiLine 属性设置为 True，然后把 ScrollBars 属性设置为_。 A. 0 B. 1 C. 2 D. 3（分数：2.00）A.B.C.D.4.如果要在任何新建的模块中自动插
4、入 option Explicit 语句，则应采用下列_ 操作步骤。 A. 在“工具”莱单中选取“选项”命令，打开“选项”对话框，单击“编辑器”选项卡，选中“要求变量声明”选项 B. 在“编辑”菜单中执行“插入文件”命令。 C. 在“工程”菜单中执行“添加文件”命令。 D. 以上操作均不对（分数：2.00）A.B.C.D.5.以下叙述错误的是_。 A. 在 KeyPress 事件过程中不能识别键盘的按下与释放 B. 在 KeyPress 事件过程中不能识别回车键 C. 在 KeyDown 和 KeyUp 事件过程中，将键盘输入的“A”和“a”视作相同的字母 D. 在 KeyDown 和 Key
5、Up 事件过程中，从大键盘下输入的“1”和从右侧小键盘上输入的“1”被视作不同的字符（分数：2.00）A.B.C.D.6.Visual Basic 窗体设计器的主要功能是 _。 A. 建立用户界面 B. 编写源程序代码 C. 画图 D. 显示文字（分数：1.00）A.B.C.D.7.设窗体上有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表项内容的是_。 A.List1.List B.List1.ListIndex C.List1.Text D.List1.Index（分数：1.00）A.B.C.D.8.在窗体上先后画 2 个图片框，名称分别为 Picture1 和 ba
6、nana，banana 中添加了香蕉图片(见图 1)，且将 banana.DragMode 属性设置为 1。要求程序运行时，可以用鼠标把 banana 拖动到 Picture1 中(见图 2)。能实现此功能的事件过程是_。（分数：2.00）A.B.C.D.9.在窗体上有一个文本框控件，名称为 TextTime；一个计时器控件，名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：Private Sub Timer1_TxtTime.text=TimeEnd Sub在下画线上应填入的内容是 A. Enabled B. Visible C. Interval D. Time（分数：
7、2.00）A.B.C.D.10.算法的时间复杂度是指 A.算法的执行时间 B.算法所处理的数据量 C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的基本运算次数（分数：2.00）A.B.C.D.11.通用对话框中打开“颜色对话框”的方法是U /U。 A.ShowOpen B.ShowColor C.ShowSave D.ShowPrinter（分数：2.00）A.B.C.D.12.以下关于窗体的描述正确的是 A.只有用于启动的窗体可以有菜单 B.窗体事件和其中所有控件事件的代码都放在窗体文件中 C.窗体的名字和存盘的窗体文件名必须相同 D.开始运行时窗体的位置只能是设计阶段时显示的位
8、置（分数：1.00）A.B.C.D.13.在数据流图中，(椭圆)代表_。 A. 源点 B. 终点 C. 加工 D. 模块（分数：2.00）A.B.C.D.14.以下叙述中错误的是_。 A.在通用过程中，多个形式参数之间可以用逗号作为分隔符 B.在 Ptint 方法中，多个输出项之间可以用逗号作为分隔符 C.在 Dim 语句中，所定义的多个变量可以用逗号作为分隔符 D.当一行中有多个语句时，可以用逗号作为分隔符（分数：1.00）A.B.C.D.15.Visual Basic 根据计算机访问文件的方式将文件分成 3 类，其中不包括U /U。 A. 顺序文件 B. Unix 文件 C. 二进制文件
9、D. 随机文件（分数：2.00）A.B.C.D.16.非空的循环单链表 head 的尾结点(由 p 所指向)，满足 A. p - next=NULL B. p=NULL C. p - next=head D. p=head （分数：1.00）A.B.C.D.17.下列哪个是面向对象程序设计不同于其他语言的主要特点? A. 继承性 B. 消息传递 C. 多态性 D. 静态联编（分数：2.00）A.B.C.D.18.假设线性表的长度为 n，则在最坏情况下，冒泡排序需要的比较次数为 A. log2n B. n2 C. On1.5 D. n(n-1)/2（分数：1.00）A.B.C.D.19.下面程序
10、的输出是_。（分数：2.00）A.B.C.D.20.下面列出的条目中，哪些是数据库技术的主要特点数据的结构化 数据的冗余度小较高的数据独立性 程序的标准化 A. 、和 B. 和 C. 、和 D.都是（分数：1.00）A.B.C.D.21.如果一个正整数从高位到低位上的数字依次递减，则称其为降序数(如 9632 是降序数，而 8516 则不是降序数)。现编写如下程序，判断输入的正整数是否为降序数。Private Sub Command1_Click()Dim n As LongDim flag As Booleann=InputBox(“输入一个正整数“)s=Trim(Str(n)For i=2
11、 To Len(s)If Mid(s,i -1,1)Mid(s,i,1)Then Exit ForNext iIF i=Len(s)Then flag=True Else flag= FalseIf flag ThenPrint n;“是降序数“ElsePrint n;“不是降序数“End IfEnd Sub运行以上程序，发现有错误，需要对给 flag 变量赋值的 If 语句进行修改。以下正确的修改是_。 A.Ifi=Len(s)+1 Then flag=False Else flag=True B.If i=Len(s)+1 Then flag=True Else flag=False C.
12、If i=Len(s)-1 Then flag=False Else flag=True D.If i=Len(s)-1 Then flag=True Else flag=False（分数：2.00）A.B.C.D.22.要使目录列表框(名称为 Dir1)中的目录随着驱动器列表框(名称为 Drive1)中所选择的当前驱动器的不同而同时发生变化，则应： A. 在 Dir1 中的 Change 事件中，书写语句 Dir1.DriveDrive1.Drive B. 在 Dir1 中的 Change 事件中，书写语句 Dir1.PathDrive1.Drive C. 在 Drive1 中的 Chang
13、e 事件中，书写语句 Dir1.PathDrive1.Drive D. 在 Drive1 中的 Change 事件中，书写语句 Dir1.Drive=Drive1.Drive（分数：1.00）A.B.C.D.23.下面不属于软件设计原则的是_。 A. 抽象 B. 模块化 C. 自底向上 D. 信息隐蔽（分数：2.00）A.B.C.D.24.下列语句中正确的是U /U。 A.txt1Text+txt2Text=txtSText B.Commandl.Name=cmdOK C.12LabelCaption=1234 D.A=InputBox(Hello)（分数：2.00）A.B.C.D.25.假定
14、一个 Visual Basic 应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是U /U。 A.只保存窗体模块文件 B.分别保存窗体模块、标准模块和工程文件 C.只保存窗体模块和标准模块文件 D.只保存工程文件（分数：2.00）A.B.C.D.26.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command 1_ Click()Static y As IntegerCIsFor i=0 To 2x=x +yy=y +3NextPrint x, yEnd Sub程序运行后，连续二次单击 Command1 按钮后，
15、窗体上显示的是_。 A. 9 9 B. 36 18 C. 30 12 D. 63 27（分数：2.00）A.B.C.D.27.以下关于过程及过程参数的描述中，错误的是_。 A. 调用过程时可以用控件名称作为实际参数 B. 用数组作为过程的参数时，使用的是“传地址”方式 C. 只有函数过程能够将过程中处理的信息传回到调用的程序中 D. 窗体(Form)可以作为过程的参数（分数：2.00）A.B.C.D.28.在窗体上画一个命令按钮(其名称为 Command1)，然后编写如下事件过程：Private Sub Command1_Click()Dim a(5,5)As IntegerDim i As
16、Integer,j As IntegerFor i=1 To 3For i=1 To 3a(i,j)=(i-1)*3+jPrint a(i,j)Next jPrintNext iEnd Sub程序运行后，单击命令按钮，在窗体上的输出结果是_。 A. 1 4 7 2 5 8 3 6 9 B. 1 2 3 4 5 6 7 8 9 C. 1 2 3 4 5 6 7 8 9 D. 没有输出（分数：2.00）A.B.C.D.29.下列选项中，不属于数据模型所描述的内容的是U /U。 A. 数据类型 B. 数据操作 C. 数据结构 D. 数据约束（分数：2.00）A.B.C.D.30.对建立良好的程序设计
17、风格，下面描述正确的是U /U。 A. 程序应简单、清晰、可读性好 B. 符号名的命名只要符合语法 C. 充分考虑程序的执行效率 D. 程序的注释可有可无（分数：2.00）A.B.C.D.31.一个可执行的应用程序至少要包括一个_。 A. 标准模块 B. 窗体模块 C. 类模块 D. 资源文件模块（分数：2.00）A.B.C.D.32.为了使列表框中的项目分为多列显示，需要设置的属性为U /U。 A.Columns B.Style C.List D.Multi,Select（分数：2.00）A.B.C.D.33.某人编写了下面的程序，希望能把 Text1 文本框中的内容写到 Temp.txt
18、文件中Private Sub Command1_Click()Open “Temp.txt“ For Output As#2Print“Text1“Close #2End Sub调试时发现没有达到目的，为实现上述目的，应做的修改是U /U。 A. 把所有#2 改为#1 B. 把 Print“Text1“改为 Print #2,Text1 C. 把 Print“Text1“改为 Write“Text1“ D. 把 Print“Text1“改为 Print Text1（分数：2.00）A.B.C.D.34.在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为 Textl、Labell 和 C
19、ommandl，然后编写如下两个事件过程：Prirate SUb Command1 Click()strText = InputBox(“请输入”)Textl.Text = strTextEnd SubPrivate Sub Text1 Change()Labell.Caption = Right(Trim(Text1.Text)， 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入 abcdef，则在标签中显示的内容是 A. 空 B. abcdef C. abc D. def（分数：2.00）A.B.C.D.35.如果将文本框的 Locked 属性设置为 True，则以下说法
20、正确的是 A. 此时在属性窗口不可以修改文本框的 Text 属性值 B. 运行时用户不可以在界面修改文本框中的内容 C. 在程序代码中不可以修改文本框的内容，如不可以使用语句 Text1.Text=“aaa“ D. 以上均不正确（分数：1.00）A.B.C.D.二、B填空题/B(总题数：15，分数：23.00)36.以下程序段的功能是_。 x=8.6 y=Int(x+0.5) Print y（分数：2.00）填空项 1:_37.当运行下列程序，单击窗体后，分别输入 72 和 24，信息框上显示的结果是U U /U /U。Private Sub Form_Click() Dim x As Int
21、eger，y As Integer x=Val(InputBox(“输入整数 72“) y=Val(InputBox(“输入整数 24“) z=fun1(x，y) MsgBox Str(Z) End Sub Private Function funl(ByVal a As Integer， ByVal b As Integer)As Integer Do r=a Mod b a = b b = r Loop Until r=0 funl=a End Function（分数：1.00）填空项 1:_38.数据库三级模式体系结构的划分，有利于保持数据库的U U /U /U。（分数：1.00）填空项
22、 1:_39.执行下面的程序段后；变量 S 的值为U U /U /U。 S5 For i=2.6 To 4.9 Step 0.6 SS+1 Next i（分数：1.00）填空项 1:_40.软件测试方法中，黑盒测试法和白盒测试法是常用的方法，其中黑盒测试法主要是用于测试U U/U /U。（分数：2.00）填空项 1:_41.把窗体的 KeyPreView 属性设置为 True，并编写如下两个事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) Print KeyCode End Sub Private Sub F
23、orm_KeyPress(KeyAscii As Integer) Print KeyAscii End Sub 程序运行后，如果按下 B 键，则在窗体上输出的数值是 【12】 和 【13】 。（分数：1.00）填空项 1:_42.表达式 14/5*2 的值是 1。（分数：2.00）填空项 1:_43.设有如下程序： Private Sub Form_Click() Dim a As Integer，s As Integer n=8:s=0 DO s=s+n:n=n-1 Loop While n0 Print s End Sub 以上程序的功能是计算 18 的和。程序运行后，单击窗体，输出结果
24、为_。（分数：2.00）填空项 1:_44.假定在工程文件中有一个标准模块，其中定义了如下记录类型：Type Books Name As String*10 TelNuin As String*20 End Type 要求在执行事件过程 Command1_Click 时，在顺序文件 Person.txt 中写入一条记录。将以下程序补充完整。 Private Sub Command1_Clickk() DimB As Books open“c:/person.txt“For output As #1 B.Name=InputBox(“请输入姓名“) B.TelNum=InputBox(“请输入电
25、话号码“) write #1，_ close #1 End Sub（分数：2.00）填空项 1:_45.在窗体上画一个标签(名称为 Label1)和一个计时器(名称为 Timer1)，然后编写如下几个事件过程： Private SubForm Load() Timer1.Enabled=False Timer1.Interval=U U /U /U End Sub PrivateSubForm Click() Timer1.Enabled=U U /U /U End Sub Private Sub Timerl Timer() Label1.Caption=U U /U /U End Sub
26、程序运行后，单击窗体，将在标签中显示当前时间，每隔 1s 变换一次(见图 10-11)。请填空。 （分数：1.00）填空项 1:_46.下列程序的功能是求 336的个位和十位数的值，填空补充程序。Private Sub Command1 Click()n=1For i=1 To 6n=n*33n=n Mod 100Next im=U U /U /Un=U U /U /UPrint“十位数是”；n；”个位数是”；mEnd Sub（分数：1.00）填空项 1:_47.下列事件过程的功能是：建立一个名为 Datal 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。
27、请在空白处填入适当的内容，将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_Click() Dim Y As Single Open _ Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i * Y) Ksc.Cosx=Cos(i * Y) Put #2，i，KSC Next i Close #2 End Sub（分数：2.00）填空项 1:_48.面向对象的模型中，最基本的概念
28、是对象和 1。（分数：2.00）填空项 1:_49.面向对象的模型中，最基本的概念是对象和U U /U/U。（分数：1.00）填空项 1:_50.下面一段程序的功能是，单击命令按钮后将 D 盘 temp 目录下的 staff.txt 文件内容读出，并在文本框 Text1 中显示出来。请填空。 Private Sub Command1_ Click() Dim Line As String, FileNo As Integer Dim People As String FileNo = FreeFile Open “D:/temp/staff.txt“ For Input As _ DO Whi
29、le Not _ Line Input #FileNo, Line People = People + Line + Chr(13) + Chr(10) Loop Text1.Text = People End Sub（分数：2.00）填空项 1:_二级 VISUAL+BASIC-19-1 答案解析(总分：84.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：61.00)1.某人编写了下面的程序：Private Sub Command1_Click()Dim a As Integer,b As Integera=InputBox(“请输入整数“)b=InputBox(“请输入
30、整数“)pro apro bCall pro(a+b)End SubPrivate Sub pro(n As Integer)While(n0)Print n Mod 10：n=n/10WendPrintEnd Sub此程序功能是：输入 2 个正整数，反序输出这 2 个数的每一位数字，再反序输出这 2 个数之和的每一位数字。例如，若输入 123 和 234，则应该输出：3 2 14 3 27 5 3但调试时发现只输出了前 2 行(即 2 个数的反序)，而未输出第 3 行(即 2 个数之和的反序)，程序需要修改。下面的修改方案中正确的是_。 A. 把过程 pro 的形式参数“n As Integ
31、er“改为“ByVal n As Integer“ B. 把“Call pro(a+b)“改为“pro a+b“ C. 把“n=n/10“改为“n=n/10“ D. 在 pro b 语句之后增加语句 c%=a+b，再把“Call pro(a+b)“改为“pro c“（分数：2.00）A. B.C.D.解析：解析 本题中过程 pro 的形式参数 n 的传值方式为地址传递，若不把它改成值传递则前两次的调用已经将 a，b 的值均变为了 0，第三次调用就只能得到 0 值了，所以选项 A) 是正确的。2.VB 中有 3 个键盘事件：KeyPress、KeyDown、KeyUp，若光标在 Text1 文本
32、框中，则每输入一个字母U/U A.这 3 个事件都会触发 B.只触发 KeyPress 事件 C.只触发 KeyDown、KeyUp 事件 D.不触发其中任何一个事件（分数：2.00）A. B.C.D.解析：解析 每输入一个字符，经历了键盘上的字符被按下，又弹起，或再次被按下，又被弹起的过程，所以此过程涉及了 KeyPress、KeyDown 和 KeyUp 这三个过程。3.为了使文本框同时具有垂直和水平滚动条，应先把 MultiLine 属性设置为 True，然后把 ScrollBars 属性设置为_。 A. 0 B. 1 C. 2 D. 3（分数：2.00）A.B.C.D. 解析：解析 M
33、ultiLine 属性：设置是否允许存放多行文本。若该属性设置为 True，则文本框具有自动换行功能，可输入或显示多行文本。否则，文本框只能输入或显示单行正文，不能自动换行。系统默认值为 False，只允许存放一行文本。 ScrollBars 属性：设置文本框内是否有滚动条。其中： 0无滚动条(默认值)； 1只有水平滚动条： 2只有垂直滚动条： 3有水平和垂直滚动条。4.如果要在任何新建的模块中自动插入 option Explicit 语句，则应采用下列_ 操作步骤。 A. 在“工具”莱单中选取“选项”命令，打开“选项”对话框，单击“编辑器”选项卡，选中“要求变量声明”选项 B. 在“编辑”菜
34、单中执行“插入文件”命令。 C. 在“工程”菜单中执行“添加文件”命令。 D. 以上操作均不对（分数：2.00）A. B.C.D.解析：5.以下叙述错误的是_。 A. 在 KeyPress 事件过程中不能识别键盘的按下与释放 B. 在 KeyPress 事件过程中不能识别回车键 C. 在 KeyDown 和 KeyUp 事件过程中，将键盘输入的“A”和“a”视作相同的字母 D. 在 KeyDown 和 KeyUp 事件过程中，从大键盘下输入的“1”和从右侧小键盘上输入的“1”被视作不同的字符（分数：2.00）A.B. C.D.解析：解析 KeyPress 事件用来识别按键的 ASCII 码。在
35、 KeyPress 事件中的参数 KeyAscii 是一个预定义的变量，执行 KeyPTess 事件过程时，KeyAscii 是所按键的 ASCII 码。例如，按下“A”键，KeyrAscii的值为 65；如果按下“a”键，则 KeyPress 的值为 97；如果按下回车键，则 KeyPress 的值为 13，等等。6.Visual Basic 窗体设计器的主要功能是 _。 A. 建立用户界面 B. 编写源程序代码 C. 画图 D. 显示文字（分数：1.00）A. B.C.D.解析：解析 窗体设计器窗口简称窗体(Form)，是应用程序最终面向用户的窗口，它对应于应用程序的运行结果。7.设窗体上
36、有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表项内容的是_。 A.List1.List B.List1.ListIndex C.List1.Text D.List1.Index（分数：1.00）A.B.C. D.解析：解析 List1 的 List 属性是设置或返回列表框中的列表项内容；ListIndex 属性设置或返回当前选中的列表项的索引值；Index 属性是用来区分列表框控件数组中各 List 控件；Text 属性设置或返回当前所选中列表项的文本内容。故选 C。8.在窗体上先后画 2 个图片框，名称分别为 Picture1 和 banana，banana 中添加
37、了香蕉图片(见图 1)，且将 banana.DragMode 属性设置为 1。要求程序运行时，可以用鼠标把 banana 拖动到 Picture1 中(见图 2)。能实现此功能的事件过程是_。（分数：2.00）A.B.C. D.解析：解析 首先拖动的是 banana，所以程序代码中的源控件是 banana，又因为是将 banana 拖动到Picture1 中，所以应在 Prcture1 的 DragDrop 过程中编写代码。9.在窗体上有一个文本框控件，名称为 TextTime；一个计时器控件，名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：Private Sub Tim
38、er1_TxtTime.text=TimeEnd Sub在下画线上应填入的内容是 A. Enabled B. Visible C. Interval D. Time（分数：2.00）A.B.C.D. 解析：解析 Timer 事件在一个 Timer 控件预定的时间间隔过去之后发生。该间隔的频率储存于该控件的 Interval 属性中，它以 1/1000 秒为单位指定时间的长度。10.算法的时间复杂度是指 A.算法的执行时间 B.算法所处理的数据量 C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的基本运算次数（分数：2.00）A.B.C.D. 解析：解析 算法的时间复杂度是指算法需要消
39、耗的时间资源，是独立于机器的，选项 D)正确；相同的算法在不同的机器上运行时间可能不同，选项 A)错误；算法所处理的数据量与算法无关，选项 B)错误；程序的长短与程序执行时需要消耗的时间资源没有必然的关系，比如一个条件语句可以很长，但只需判断一次，而一个循环语句可能只有几行，但可以执行很多次，故选项 c)错误。11.通用对话框中打开“颜色对话框”的方法是U /U。 A.ShowOpen B.ShowColor C.ShowSave D.ShowPrinter（分数：2.00）A.B. C.D.解析：解析 在通用对话框中打开“颜色对话框”的方法是：使用 ShowColor 方法，或者将通用对话框
40、的 Action 属性设置为 3。12.以下关于窗体的描述正确的是 A.只有用于启动的窗体可以有菜单 B.窗体事件和其中所有控件事件的代码都放在窗体文件中 C.窗体的名字和存盘的窗体文件名必须相同 D.开始运行时窗体的位置只能是设计阶段时显示的位置（分数：1.00）A.B. C.D.解析：解析 每个窗体都可以通过菜单编辑器来设计自己的菜单，A 是错误的。窗体的名字(Name)与存盘的窗体文件名可以完全不同，这是两个概念，在工程资源管理器中分别显示了存盘的窗体文件名与窗体的名字。窗体可以通过设计窗体属性或使用程序代码来确定自己在运行时的位置。13.在数据流图中，(椭圆)代表_。 A. 源点 B.
41、 终点 C. 加工 D. 模块（分数：2.00）A.B.C. D.解析：14.以下叙述中错误的是_。 A.在通用过程中，多个形式参数之间可以用逗号作为分隔符 B.在 Ptint 方法中，多个输出项之间可以用逗号作为分隔符 C.在 Dim 语句中，所定义的多个变量可以用逗号作为分隔符 D.当一行中有多个语句时，可以用逗号作为分隔符（分数：1.00）A.B.C.D. 解析：解析 一般情况下，输入程序时要求一行只写一条语句。但语句行较短时也可以将多个语句书写在同一行中，这时，语句之间使用冒号分隔。故 D 选项错误。15.Visual Basic 根据计算机访问文件的方式将文件分成 3 类，其中不包括
42、U /U。 A. 顺序文件 B. Unix 文件 C. 二进制文件 D. 随机文件（分数：2.00）A.B. C.D.解析：解析 访问文件时应根据文件包括的数据类型，来使用合适的文件访问类型。文件访问类型有 3种：顺序型，适用于读写在连续块中的文本文件：随机型，适用于读写有固定长度记录结构的文本文件或者二进制文件；二进制型，适用于读写任意有结构的文件。16.非空的循环单链表 head 的尾结点(由 p 所指向)，满足 A. p - next=NULL B. p=NULL C. p - next=head D. p=head （分数：1.00）A.B.C. D.解析：解析：循环链表就是将链表的最
43、后一个结点指向链表头结点(或第一个结点)，目 pp-next=head。17.下列哪个是面向对象程序设计不同于其他语言的主要特点? A. 继承性 B. 消息传递 C. 多态性 D. 静态联编（分数：2.00）A. B.C.D.解析：解析 继承是一个子类直接使用父类的所有属性和方法。它可以减少相似的类的重复说明，从而体现出一般性与特殊性的原则，这使得面向对象程序设计语言有了良好的重用性，也是其不同于其他语言的主要特点。故答案为 A。18.假设线性表的长度为 n，则在最坏情况下，冒泡排序需要的比较次数为 A. log2n B. n2 C. On1.5 D. n(n-1)/2（分数：1.00）A.B
44、.C.D. 解析：解析 假设线性表的长度为 n，则在最坏情况下，冒泡排序要经过 n/2 遍的从前往后的扫描和 n/2 遍的从后往前的扫描，需要的比较次数为 n(n- 1)/2。19.下面程序的输出是_。（分数：2.00）A. B.C.D.解析：解析 Space(1)是输出个空格。20.下面列出的条目中，哪些是数据库技术的主要特点数据的结构化 数据的冗余度小较高的数据独立性 程序的标准化 A. 、和 B. 和 C. 、和 D.都是（分数：1.00）A. B.C.D.解析：解析 数据库技术的主要特点有：数据的集成性；数据的高共享性与低冗余性：数据的独立性。其中数据的结构化是数据的集成性表现之一，因
45、此选项 A 是正确答案。程序的标准化不是数据库技术的主要特点。21.如果一个正整数从高位到低位上的数字依次递减，则称其为降序数(如 9632 是降序数，而 8516 则不是降序数)。现编写如下程序，判断输入的正整数是否为降序数。Private Sub Command1_Click()Dim n As LongDim flag As Booleann=InputBox(“输入一个正整数“)s=Trim(Str(n)For i=2 To Len(s)If Mid(s,i -1,1)Mid(s,i,1)Then Exit ForNext iIF i=Len(s)Then flag=True Else flag= FalseIf flag ThenPrint n;“是降序数“ElsePrint n;“不是降序数“End IfEnd Sub运行以上程序，发现有错误，需要对给 flag 变量赋值的 If 语句进行修改。以下正确的修改是_。 A.Ifi=Len(s)+1 Then flag=False Else flag=True B.If i=Len(s)+1 Then flag=True Else flag=False C.If i=Len(s
