1、二级 VISUAL+BASIC-72 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.数据的存储结构是指_。（分数：2.50）A.存储在外存中的数据B.数据所占的存储空间量C.数据在计算机中的顺序存储方式D.数据的逻辑结构在计算机中的表示2.下列关于栈的描述中错误的是_。（分数：2.50）A.栈是先进后出的线性表B.栈只能顺序存储C.栈具有记忆作用D.对栈的插入与删除操作中，不需要改变栈底指针3.对于长度为”的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是_。（分数：2.50）A.冒泡排序为 n/2B.冒泡排序为 nC.快速
2、排序为 nD.快速排序为 n(n-1)/24.对长度为 n 的线性表进行顺序查找，在最坏情况下所需要的比较次数为_。（分数：2.50）A.log2nB.n/2CnD.n+15.下列对于线性链表的描述中正确的是_。（分数：2.50）A.存储空间不一定是连续，且各元素的存储顺序是任意的B.存储空间不一定是连续，且前件元素一定存储在后件元素的前面C.存储空间必须连续，且前件元素一定存储在后件元素的前面D.存储空间必须连续，且各元素的存储顺序是任意的6.下列对于软件测试的描述中正确的是_。（分数：2.50）A.软件测试的目的是证明程序是否正确B.软件测试的目的是使程序运行结果正确C.软件测试的目的是尽
3、可能多地发现程序中的错误D.软件测试的目的是使程序符合结构化原则7.为了使模块尽可能独立，要求_。（分数：2.50）A.模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强B.模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱C.模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱D.模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强8.下列描述中正确的是_。（分数：2.50）A.程序就是软件B.软件开发不受计算机系统的限制C.软件既是逻辑实体，又是物理实体D.软件是程序、数据与相关文档的集合9.数据独立性是数据库技术的重要特点之一。所谓数据独立性是指_。（分数：2.50）A.数据与程序独
4、立存放B.不同的数据被存放在不同的文件中C.不同的数据只能被对应的应用程序所使用D.以上三种说法郜不对10.用树形结构表示实体之间联系的模型是_。（分数：2.50）A.关系模型B.网状模型C.层次模型D.以上三个都是11.在窗体(名称为 Form1)上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是_。（分数：2.50）A.Private Sub Text1_Change()Command1.Caption=“计算机等级考试“En
5、d SubB.Private Sub Command1_Click()Caption=“计算机等级考试“End SubC.Private Sub Form_Load()Text1.Caption=“计算机等级考试“End SubD.Private SubCommand1_Click()Text1.Text=“计算机等级考试“End Sub12.设 a=5，b=4，c=3，d=2，下列表达式的值是_。 32*b Or a=c And bc Or cd（分数：2.50）A.1B.TrueC.FalseD.213.设 a=“MicrosoftVisualBasic“，则以下使变量 b 的值为“Vis
6、ualBasic“的语句是_。（分数：2.50）A.b=Left(a,10)B.b=Mid(a,10)C.b=Right(a,10)D.b=Mid(a,11,10)14.假定有如下的窗体事件过程： Private Sub Command1_Click() a$=“Microsoft Visual Basic“ b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是_。（分数：2.50）A.Microsoft VisualB.MicrosoftC.BasicD.515.设
7、a=“a“,b=“b“,c=“c“,d=“d“，执行语句 x=IIf(ab)Or(cd),“A“,“B“)后，x 的值为_。（分数：2.50）A.“a“B.“b“C.“B“D.“A“16.为了使命令按钮(名称为 Command1)右移 200，应使用的语句是_。（分数：2.50）A.Command1.Move-200B.Command1.Move 200C.Command1.Left=Command1.Left+200D.Command1.Left=Command1.Left-20017.在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click() x=Inp
8、utBox(“请输入一个整数“) Print x+Text1.Text End Sub 程序运行时，在文本框中输入 456，然后单击窗体，在输入对话框中输入 123，单击“确定”按钮后，在窗体上显示的内容为_。（分数：2.50）A.123B.456C.579D.12345618.在窗体上画一个文本框和一个计时器控件，名称分别为 Text1 和 Timer1，在属性窗口中把计时器的Interval 属性设置为 1000，Enabled 属性设置为 False。程序运行后，如果单击命令按钮，则每隔 1 秒在文本框中显示一次当前的时间。以下是实现上述操作的程序： Private Sub Comman
9、d1_Click() Timer1. End Sub Private Sub Timer1_Timer() Text1.Text=Time End Sub 在填空处应填入的内容是_。（分数：2.50）A.Enabled=TrueB.Enabled=FalseC.Visible=TrueD.Visible=False19.假定在图片框 Picture1 中装入了一个图形，为了清除该图形(不删除图片框)，应采用的正确方法是_。（分数：2.50）A.选择图片框，然后按 Del 键B.执行语句 Picture1.Picture=LoadPicture(“)C.执行语句 Picture1.Picture
10、=“D.选择图片框，在属性窗口中选择 Picture 属性条，然后按 Enter 键20.在窗体上画一个名称为 List1 的列表框，一个名称为 Label1 的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的、程序是_。（分数：2.50）A.Private Sub List1_Click()Lsbel1.Caption=List1.ListIndexEnd SubB.Private Sub List1_Click()Label1.Name=List1.ListIndexEnd SubC.Private Sub List1_Cli
11、ck()Label1.Name=List1.TextEnd SubD.Private Sub List1_Click()Label1.Caption=List1.TextEnd Sub21.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, x As Integer For i=1 To 6 If i=1 Then x=i If i=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为
12、_。（分数：2.50）A.9B.6C.12D.1522.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=“ABCD“ For n=1 To 4 Print _ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在填空处应填入的内容为_。（分数：2.50）A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)23.执行以下程序段： Dim x As Integer, i As Integer x=0 For
13、i=20 To 1 Step-2 x=x+i/5 Next i 后，x 的值为_。（分数：2.50）A.16B.17C.18D.1924.在 Visual Basic 工程中，可以作为“启动对象”的程序是_。（分数：2.50）A.任何窗体或标准模块B.任何窗体或过程C.Sub Main 过程或其他任何模块D.Sub Main 过程或任何窗体25.假定建立了一个名为 Command1 的命令按钮数组，则以下说法中错误的是_。（分数：2.50）A.数组中每个命令按钮的名称(Name 属性)均为 Command1B.数组中每个命令按钮的标题(Caption 属性)都一样C.数组中所有命令按钮可以使用
14、同一个事件过程D.用名称 Command1(下标)可以访问数组中的每个命令按钮26.把窗体的 KeyPreview 属性设置为 True，然后编写如下事件过程： Private Sub Form_KeyPress(KeyAscii As Integer) Dim Ch As String Ch=Chr(KeyAscii) KeyAscii=Asc(UCase(Ch) Print Chr(KeyAscii+2) End Sub 程序运行后，按键盘上的“A”键，则在窗体上显示的内容是_。（分数：2.50）AABBCCDD27.在窗体上画一个命令按钮和一个文本框，名称分别为 Command1 和 T
15、ext1，然后编写如下程序： Private Sub Command1_Click() a=InputBox(“请输入日期(131)“) t=“旅游景点:“ Else if x8 then Print “x8“; Else if x=6 then Print: “x=6“; End if End if End if End Sub （分数：2.50）A.B.C.D.二级 VISUAL+BASIC-72 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.数据的存储结构是指_。（分数：2.50）A.存储在外存中的数据B.数据所占的存储空间量C.数
16、据在计算机中的顺序存储方式D.数据的逻辑结构在计算机中的表示 解析：解析 数据的存储结构是数据按逻辑结构规定的关系在计算机存储器中的存放方式，也称数据的物理结构。2.下列关于栈的描述中错误的是_。（分数：2.50）A.栈是先进后出的线性表B.栈只能顺序存储 C.栈具有记忆作用D.对栈的插入与删除操作中，不需要改变栈底指针解析：解析 在栈中，允许插入与删除的一端称为栈顶，不允许插入与删除的另一端称为栈底。栈顶元素总是最后被插入的元素，从而也是最先能被删除的元素；栈底元素总是最先被插入的元素，从而也是最后才能被删除的元素。即栈是按照先进后出(First In Last Out，FILO)或后进先出
17、(Last In First Out，FIFO)的原则组织数据的，因此，栈也被称为先进后出表或后进先出表。由此可以看出，栈具有记忆作用。答案 B 错在带链的栈的结点存储顺序与其逻辑顺序是可以不一致的。3.对于长度为”的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是_。（分数：2.50）A.冒泡排序为 n/2B.冒泡排序为 nC.快速排序为 nD.快速排序为 n(n-1)/2 解析：解析 快速排序的最坏情况是当序列已排序时，选取序列的第一个值作为基准值，分成的两个子序列长度为 1 与 n-1，这样必须经过 n-1 趟才能完成排序。因此总的比较次数为 n(n-1)/2。4.对长度为
18、n 的线性表进行顺序查找，在最坏情况下所需要的比较次数为_。（分数：2.50）A.log2nB.n/2Cn D.n+1解析：解析 对于线性表进行顺序查找，最差的情况下比较次数为线性表的长度 n，因此答案 C 是正确的。5.下列对于线性链表的描述中正确的是_。（分数：2.50）A.存储空间不一定是连续，且各元素的存储顺序是任意的 B.存储空间不一定是连续，且前件元素一定存储在后件元素的前面C.存储空间必须连续，且前件元素一定存储在后件元素的前面D.存储空间必须连续，且各元素的存储顺序是任意的解析：解析 线性链表是链式存储结构。在链式存储结构中，存储数据结构的存储空间可以不连续，各数据结点的存储顺
19、序与数据元素之间的逻辑关系可以不一致，而数据元素之间的逻辑关系是由指针域来确定的。6.下列对于软件测试的描述中正确的是_。（分数：2.50）A.软件测试的目的是证明程序是否正确B.软件测试的目的是使程序运行结果正确C.软件测试的目的是尽可能多地发现程序中的错误 D.软件测试的目的是使程序符合结构化原则解析：解析 软件测试是为了发现错误而执行程序的过程，一个好的测试用例是指很可能找到迄今为止尚未发现的错误的用例，一个成功的测试是发现了至今尚未发现的错误的测试。软件测试是以查找错误为中心，而不是演示软件的正确功能。所以软件测试的目的是尽可能多地发现程序中的错误。7.为了使模块尽可能独立，要求_。（
20、分数：2.50）A.模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强B.模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 C.模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱D.模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强解析：解析 衡量模块的独立程度使用耦合性和内聚性两个定性的度量标准。内聚性是一个模块内部各个元素间彼此结合的紧密程度的度量。内聚性是从功能角度来度量模块内的联系。模块内聚的程度越高越独立。耦合性是模块间互相连接的紧密程度的度量。耦合程度越低越独立。8.下列描述中正确的是_。（分数：2.50）A.程序就是软件B.软件开发不受计算机系统的限制C.软件既是逻辑实
21、体，又是物理实体D.软件是程序、数据与相关文档的集合 解析：解析 计算机软件(Software)是计算机系统中与硬件相互依存的另一部分，是包括程序、数据及相关文档的完整集合。其中，程序是按事先设计的功能和性能要求执行的执行序列；数据是使程序能正常操纵信息的数据结构；文档是与程序开发、维护和使用有关的图文材料。9.数据独立性是数据库技术的重要特点之一。所谓数据独立性是指_。（分数：2.50）A.数据与程序独立存放B.不同的数据被存放在不同的文件中C.不同的数据只能被对应的应用程序所使用D.以上三种说法郜不对 解析：解析 数据独立性是数掘与程序的互不依赖性，即数据库中数据独立于应用程序而不依赖于应
22、用程序。10.用树形结构表示实体之间联系的模型是_。（分数：2.50）A.关系模型B.网状模型C.层次模型 D.以上三个都是解析：解析 用树形结构表示实体之间联系的模型是层次模型。11.在窗体(名称为 Form1)上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是_。（分数：2.50）A.Private Sub Text1_Change()Command1.Caption=“计算机等级考试“End Sub B.Private Su
23、b Command1_Click()Caption=“计算机等级考试“End SubC.Private Sub Form_Load()Text1.Caption=“计算机等级考试“End SubD.Private SubCommand1_Click()Text1.Text=“计算机等级考试“End Sub解析：解析 当在文本框 Text1 中输入一个字符时，系统将激活 Text1_Change 事件。要设置命令按钮Command1 的标题应改变 Caption 的值。12.设 a=5，b=4，c=3，d=2，下列表达式的值是_。 32*b Or a=c And bc Or cd（分数：2.50
24、）A.1B.True C.FalseD.2解析：解析 将原表达式改写成 32*4 Or 5=3And 43 Or 32，经过算术计算后得 38 Or 5=3And 43 Or 32，经过关系计算后得 False Or FalseAnd True Or True，经逻辑计算后得 False Or False OrTrue，最后得 True。13.设 a=“MicrosoftVisualBasic“，则以下使变量 b 的值为“VisualBasic“的语句是_。（分数：2.50）A.b=Left(a,10)B.b=Mid(a,10) C.b=Right(a,10)D.b=Mid(a,11,10)解
25、析：解析 Mid()函数返回字符串中指定数量的字符，其格式为： Mid(字符串,位置,长度) 如果略去了“长度”，函数将返回从“字符串”的左边“位置”开始右边的字符。在“MicrosoftVisualBasic”中“V”在左边的第 10 位置，从“V”开始右边的字符为“VisualBasic”。14.假定有如下的窗体事件过程： Private Sub Command1_Click() a$=“Microsoft Visual Basic“ b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 End Sub 程序运行后，单击窗体，则在弹出的信息框
26、的标题栏中显示的信息是_。（分数：2.50）A.Microsoft VisualB.MicrosoftC.Basic D.5解析：解析 MsgBox 语句格式为： MsgBox Msg$,type%,title$,helptile, context 其中：Msg$是一个字符串；type 是一个整数值或符号常量；title 是一个字符串，用来显示对话框的标题。Right(字符串，n)将返回“字符串”的右边，n 个字符，变量 b 的内容为“Basic”。15.设 a=“a“,b=“b“,c=“c“,d=“d“，执行语句 x=IIf(ab)Or(cd),“A“,“B“)后，x 的值为_。（分数：2.
27、50）A.“a“B.“b“C.“B“D.“A“ 解析：解析 IIf 函数可用来执行简单的条件判断操作，它是“If-Then-Else”结构的简写版本，IIf 函数的格式如下： Result=IIf(条件，True 部分，False 部分) “Result”是函数的返回值，“条件”是一个逻辑表达式。当“条件”为“真”时，IIf 函数返回“True部分”，而当“条件”为“假”时，返回“False 部分”。字符串关系表达式运算是按其 ASCII 码来运算的。因“(ab)Or(cd)”的运算结果为“True”，变量 x 的值为“A”。16.为了使命令按钮(名称为 Command1)右移 200，应使用
28、的语句是_。（分数：2.50）A.Command1.Move-200B.Command1.Move 200C.Command1.Left=Command1.Left+200 D.Command1.Left=Command1.Left-200解析：解析 Move 方法是按绝对坐标值对控件进行移动。按题意要求，相对位移控件应采用改变 Left属性值增量的方法，Left 属性值增加某一增量时控件将向右移，反之将向左移。17.在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click() x=InputBox(“请输入一个整数“) Print x+Text1.Text
29、End Sub 程序运行时，在文本框中输入 456，然后单击窗体，在输入对话框中输入 123，单击“确定”按钮后，在窗体上显示的内容为_。（分数：2.50）A.123B.456C.579D.123456 解析：解析 InputBox 函数返回的是字符型内容，文本框的 Text 属性也是字符型，所以两个字符型变量进行“+”运算实际上是将两个字符串连接起来。在窗体上显示内容为“123456”。18.在窗体上画一个文本框和一个计时器控件，名称分别为 Text1 和 Timer1，在属性窗口中把计时器的Interval 属性设置为 1000，Enabled 属性设置为 False。程序运行后，如果单击
30、命令按钮，则每隔 1 秒在文本框中显示一次当前的时间。以下是实现上述操作的程序： Private Sub Command1_Click() Timer1. End Sub Private Sub Timer1_Timer() Text1.Text=Time End Sub 在填空处应填入的内容是_。（分数：2.50）A.Enabled=True B.Enabled=FalseC.Visible=TrueD.Visible=False解析：解析 用 Visible 属性设置对象的可见性，如果将该属性设置为 False，则隐藏对象；如果设置为 True，则对象可见。用 Enabled 属性设置对象
31、的可用性，如果将该属性设置为 False，则对象为不可用；如果设置为 True，则对象为可用。按题意应将 Enabled 属性设置为 True。19.假定在图片框 Picture1 中装入了一个图形，为了清除该图形(不删除图片框)，应采用的正确方法是_。（分数：2.50）A.选择图片框，然后按 Del 键B.执行语句 Picture1.Picture=LoadPicture(“) C.执行语句 Picture1.Picture=“D.选择图片框，在属性窗口中选择 Picture 属性条，然后按 Enter 键解析：解析 图片框和图像框中的图形也可以用 LoadPicture 函数删除，只要用一
32、个“空”图形覆盖原来的图形就能实现。例如： 对象.Picture=LoadPicture(“) 将删除图片框和图像框中的图形，使图片框和图像框变为空白。20.在窗体上画一个名称为 List1 的列表框，一个名称为 Label1 的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的、程序是_。（分数：2.50）A.Private Sub List1_Click()Lsbel1.Caption=List1.ListIndexEnd SubB.Private Sub List1_Click()Label1.Name=List1.ListI
33、ndexEnd SubC.Private Sub List1_Click()Label1.Name=List1.TextEnd SubD.Private Sub List1_Click()Label1.Caption=List1.TextEnd Sub 解析：解析 以上 4 个选项都是列表框的 Click 事件过程。单击列表框中的某一项时，将发生单击事件，同时选择一个列表项，这个列表项可以用列表框的 Text 属性来表示。也就是说，List1.Text 就是所选择的项目。此外，为了在标签中显示所选择的列表项，必须使用标签的标题属性，即 Label1.Caption。因此，正确的语句应当是： L
34、abel1.Caption=List1.Text 在 Visual Basic 中，不能在运行期间改变控件或窗体的名称(Name 属性)，因此选项 B 和选项 C 都是错误的；而列表框的 ListIndex 属性是所选择的列表项的位置，即列表项的标题，不是列表项本身。所以选项A 错误。21.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, x As Integer For i=1 To 6 If i=1 Then x=i If i=4 Then x=x+1 Else x=x+
35、2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为_。（分数：2.50）A.9 B.6C.12D.15解析：解析 在本题中，计算变量 x 的值有 3 个表达式，当 i=1 时，x=1；当 x=4 时，x=x+1；当x=5、6 时，x=x+2。x 的计算过程为：x=1、2、3、4、5、7、9。22.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=“ABCD“ For n=1 To 4 Print _ Next End Sub 程序运行后，单击命令按钮，要求
36、在窗体上显示如下内容： D CD BCD ABCD 则在填空处应填入的内容为_。（分数：2.50）A.Left(c,n)B.Right(c,n) C.Mid(c,n,1)D.Mid(c,n,n)解析：解析 Right(字符串，n)将返回“字符串”的右边 n 个字符。本题中循环变量”还起到返回 n 个字符的作用，循环 4 次分别返回 4 个字符串，从显示的内容提示，字符串是从右向左逐个增加的。23.执行以下程序段： Dim x As Integer, i As Integer x=0 For i=20 To 1 Step-2 x=x+i/5 Next i 后，x 的值为_。（分数：2.50）A.
37、16B.17C.18 D.19解析：解析 “/”为整数除法，“i/5”的计算过程为：4、3、3、2、2、2、1、1、0、0，将其值相加来，变量 x 的计算过程为：4、7、10、12、14、16、17、18。24.在 Visual Basic 工程中，可以作为“启动对象”的程序是_。（分数：2.50）A.任何窗体或标准模块B.任何窗体或过程C.Sub Main 过程或其他任何模块D.Sub Main 过程或任何窗体 解析：解析 在一个含有多个窗体或多个工程的应用程序中，有时需要在显示多个窗体之前对一些条件进行初始化，因此需要在启动程序时执行一个特定的过程。在 Visual Basic 中，这样的
38、过程称为启动过程，并命名为 Sub Main。25.假定建立了一个名为 Command1 的命令按钮数组，则以下说法中错误的是_。（分数：2.50）A.数组中每个命令按钮的名称(Name 属性)均为 Command1B.数组中每个命令按钮的标题(Caption 属性)都一样 C.数组中所有命令按钮可以使用同一个事件过程D.用名称 Command1(下标)可以访问数组中的每个命令按钮解析：解析 控件数组中的各个元素共享 Name 属性。控件数组的每个元素都有一个与之关联的下标，或称索引(Index)，下标值由 Index 属性指定，即数组中的每个元素则由 Index 属性指定。控件数组中的每个命
39、令按钮的标题(Caption 属性)可以各不相同。26.把窗体的 KeyPreview 属性设置为 True，然后编写如下事件过程： Private Sub Form_KeyPress(KeyAscii As Integer) Dim Ch As String Ch=Chr(KeyAscii) KeyAscii=Asc(UCase(Ch) Print Chr(KeyAscii+2) End Sub 程序运行后，按键盘上的“A”键，则在窗体上显示的内容是_。（分数：2.50）AABBCC DD解析：解析 KeyPress 事件用来识别按键的 ASCII 码。参数 KeyAscii 是一个预定义的
40、变量，执行KeyPress 事件过程时，KeyAscii 是所按键的 ASCII 码。函数 Chr(x)是把 x 的值转换为相应的 ASCII 字符，函数 Asc(x)是返回字符串 x 的首个字母的字符代码，函数 UCase(x)返回大写的字符串 X。当按键盘上的A 键时，KeyPress 值为 97，Chr(97)的返回值为“a”，Asc(UCase(“a“)返回值为“65”Chr(65+2)的返回值为“C”。27.在窗体上画一个命令按钮和一个文本框，名称分别为 Command1 和 Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox(“请输入日期(131)“) t=“旅游景点:“ Else if x8 then Print “x8“; Else if x=6 then Print: “x=6“; End if End if End if End Sub （分数：2.50）A.B. C.D.解析：解析 本题难点是如何确定 if 结构语句的判决条件，不要将其与输出结果混淆起来。打印分隔符为“；”时，字符串之间没有空格。
