1、二级 VISUAL+BASIC-106及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：37，分数：100.00)1.设有窗体的 Form_MouseMove事件过程如下： Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If(Button And 3)=3 Then Print “检查按键“ End If End Sub 关于上述过程，以下叙述中正确的是_。（分数：3.50）A.按下鼠标左键时，在窗体上显示“检查按键”B.按下鼠标右键时，
2、在窗体上显示“检查按键”C.同时按下鼠标左、右键时，在窗体上显示“检查按键”D.不论做何种操作，窗体上都不会显示2.要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为 Label1)中，如下图所示，放开鼠标左键后，停止同步显示。 （分数：3.50）A.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button=1 ThenLabell=“X=“ &X&“ Y=“&YEnd IfEnd SubB.Private
3、Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button=1 ThenLabel1=“X=“&X&“ Y=“&YEnd IfEnd SubC.Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button=1 ThenLabel1=“X=“&X&“ Y=“&YEnd IfEnd SubD.Private Sub Form_MouseMove(Butt
4、on As Integer, Shift As Integer, X As Single, Y As Single)Labell=“X=“&X&“ Y=“&YEnd Sub3.下列操作说明中，错误的是_。（分数：3.50）A.在具有焦点的对象上进行一次按下字母键操作，会引发 KeyPress事件B.可以通过 MousePointer属性设置鼠标光标的形状C.不可以在属性窗口设置 MousePointer属性D.可以在程序代码中设置 MousePointer属性4.为了实现对象的自动拖放，应该设置该对象的一个属性。下面设置中正确的是_。（分数：3.50）A.DragMode=1B.DragMod
5、e=0C.DragIcon=1D.DragIcon=05.鼠标拖放控件要触发两个事件，这两个事件是_。（分数：3.50）A.DragOver事件和 DragDrop事件B.Drag事件和 DragDrop事件C.MouseDown事件和 KeyDown事件D.MouseUp事件和 KeyUp事件6.设工程中有 2个窗体：Form1 和 Form2，每个窗体上都有一个名称为 Text1的文本框。若希望把 Form1上文本框中的内容复制到 Form2上的文本框中，应进行的操作是_。（分数：3.50）A.执行 Form1中的语句：Form1.Text1=Form2.Text1B.执行 Form1中的
6、语句：Fext1=Form1.TextC.执行 Form2中的语句：Form1.Text1=Text1D.执行 Form2中的语句：Text1=Form1.Text17.以下关于窗体的叙述中错误的是_。（分数：2.50）A.窗体的 Hide方法将窗体隐藏并卸载B.窗体的 Show方法可以将窗体装入内存并显示该窗体C.若工程中包含多个窗体，则可指定一个为启动窗体D.窗体的 Load事件在加载窗体时发生8.设工程中有 Form1、Form2 两个窗体，要求单击 Form2上的 Command1命令按钮，Form2 就可以从屏幕上消失，下面的事件过程中不能实现此功能的是_。（分数：2.50）A.Pr
7、ivate Sub Command1_Click()Form2.HideEnd SubB.Private Sub Command1_Click()Unload MeEnd SubC.Private Sub Command1_Click()Form2.UnloadEnd SubD.Private Sub Command1_Click()Me.HideEnd Sub9.如果要将一个窗体从内存中清除，应使用的语句是_。（分数：2.50）A.UnloadB.ShowC.LoadD.Hide10.为了在 Form_Load事件过程中用 Print方法在窗体上输出指定的内容，首先应执行的操作是_。（分数：
8、2.50）A.设置窗体的 Visible属性B.设置窗体的 AutoRedraw属性C.调用窗体的 Show方法D.设置窗体的 Enabled属性11.以下关于多重窗体程序的叙述中，错误的是_。（分数：2.50）A.对于多重窗体程序，需要单独保存每个窗体B.在多重窗体程序中，可以根据需要指定启动窗体C.在多重窗体程序中，各窗体的菜单是彼此独立的D.用 Hide方法不仅可以隐藏窗体，而且还可以清除内存中的窗体12.以下叙述中错误的是_。（分数：2.50）A.Sub Main是定义在标准模块中的特定过程B.一个工程中只能有一个 Sub Main过程C.Sub Main过程不能有返回值D.当工程中含
9、有 Sub Main过程时，工程执行时一定最先执行该过程13.以下关于 VB特点的叙述中，错误的是_。（分数：2.50）A.VB中一个对象可有多个事件过程B.VB应用程序能以编译方式运行C.VB应用程序从 Form_Load事件过程开始执行D.在 VB应用程序中往往通过引发某个事件导致对对象的操作14.Visual Basic中的“启动对象”是指启动 Visual Basic应用程序时，被自动加载并首先执行的对象。下列关于 Visual Basic“启动对象”的描述中，错误的是_。（分数：2.50）A.“启动对象”可以是指定的标准模块B.“启动对象”可以是指定的窗体C.“启动对象”可以是 Su
10、b Main过程D.若没有经过设置，则默认的“启动对象”是第一个被创建的窗体15.以下关于 VB文件的叙述中，正确的是_。（分数：2.50）A.标准模块文件的扩展名是.frmB.一个.vbg 文件中可以包括多个.vbp 文件C.一个.vbp 文件只能含有一个标准模块文件D.类模块文件的扩展名为.bas16.以下叙述中错误的是_。（分数：2.50）A.标准模块文件的扩展名是.basB.标准模块文件是纯代码文件C.在标准模块中声明的全局变量可以在整个工程中使用D.在标准模块中不能定义过程17.下面有关标准模块的叙述中，错误的是_。（分数：2.50）A.标准模块不完全由代码组成，还可以有窗体B.标准
11、模块中的 Private过程不能被工程中的其他模块调用C.标准模块的文件扩展名为.basD.标准模块中的全局变量可以被工程中的任何模块引用18.下面关于标准模块的叙述中错误的是_。（分数：2.50）A.标准模块中可以声明全局变量B.标准模块中可以包含一个 Sub Main过程，但此过程不能被设置为启动过程C.标准模块中可以包含一些 Public过程D.一个工程中可以含有多个标准模块19.在标准模块中用 Public关键字定义的变量，其作用域为_。（分数：2.50）A.本模块所有过程B.整个工程C.所有窗体D.所有标准模块20.如果在窗体模块中所有程序代码的前面有语句：Dim x，则 x是_。（
12、分数：2.50）A.全局变量B.局部变量C.静态变量D.窗体级变量21.下列操作中不能向工程添加窗体的是_。（分数：2.50）A.执行“工程”菜单中的“添加窗体”命令B.单击工具栏上的“添加窗体”按钮C.右键单击窗体，在弹出的菜单中选择“添加窗体”命令D.右键单击工程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择“添加窗体”命令22.以下关于 VB文件的叙述中，正确的是_。（分数：2.50）A.标准模块文件的扩展名是.frmB.VB应用程序可以被编译为.exe 文件C.一个工程文件只能含有一个标准模块文件D.类模块文件的扩展名为.bas23.以下关于文件的叙述中，错误的是_
13、。（分数：2.50）A.顺序文件有多种打开文件的方式B.读取顺序文件的记录时，只能从头至尾逐记录进行C.顺序文件中各记录的长度是固定的D.随机文件一般占用空间比较小24.以下不属于 Visual Basic数据文件的是_。（分数：2.50）A.顺序文件B.随机文件C.数据库文件D.二进制文件25.下列关于顺序文件的描述中，正确的是_。（分数：2.50）A.文件的组织与数据写入的顺序无关B.主要的优点是占空间少，且容易实现记录的增减操作C.每条记录的长度是固定的D.不能像随机文件一样灵活地存取数据26.以下关于文件的叙述中，错误的是_。（分数：2.50）A.顺序文件中的记录是一个接一个地顺序存放
14、B.随机文件中记录的长度是随机的C.文件被打开后，自动生成一个文件指针D.EOF函数用来测试是否到达文件尾27.下面关于文件的叙述中，错误的是_。（分数：2.50）A.VB数据文件需要先打开，再进行处理B.随机文件每个记录的长度是固定的C.不论是顺序文件还是随机文件，都是数据文件D.顺序文件的记录是顺序存放的，可以按记录号直接访问某个记录28.在窗体上有两个名称分别为 Text1、Text2 的文本框，一个名称为 Command1的命令按钮。运行后的窗体外观如图所示。 （分数：2.50）A.Open“c: /Test2. dat“ For Output As #1Put #1, 1, pClo
15、se #1B.Open “c: /Test2. dat“ For Random As #1Get #1, 1, pClose #1C.Open “c: /Test2. dat“ For Random As #1 Len=Len(p)Put #1, 1, pClose #1D.Open “c: /Test2. dat“ For Random As #1 Len=Len(p)Get#1, 1, pClose #129.下列有关文件的叙述中，正确的是_。（分数：2.50）A.以 Output方式打开一个不存在的文件时，系统将显示出错信息B.以 Append方式打开的文件，既可以进行读操作，也可以进行
16、写操作C.在随机文件中，每个记录的长度是固定的D.无论是顺序文件还是随机文件，其打开的语句和打开方式都是完全相同的30.设有语句： Open “C: /Test. Dat“ For Output As #1 则以下叙述中错误的是_。（分数：2.50）A.该语句打开 C盘根目录下的一个文件 Test.Dat，如果该文件不存在则出错B.该语句打开 C盘根目录下一个名为 Test.Dat的文件，如果该文件不存在则创建该文件C.该语句打开文件的文件号为 1D.执行该语句后，就可以通过 Print#语句向文件 Test.Dat中写入信息31.在窗体上画一个名称为 Command1的命令按钮，并编写如下程
17、序： Private Type Record ID AS Integer Name As String*20 End Type Private Sub Command1_Click() Dim MaxSize, NextChar, MyChar Open “d: /temp/female. txt“ For Input As #1 MaxSize=LOF(1) For NextChar=MaxSize To 1 Step-1 MyChar=Input(1, #1) Next NextChar Print EOF(1) Close #1 End Sub 运行程序，单击命令按钮，其输出结果为_。（
18、分数：2.50）A.TrueB.FalseC.0D.Null32.某人编写了下面的程序，希望能把 Text1文本框中的内容写到 out.txt文件中： Private Sub Command1_Click() Open “out. txt“ For Output As #2 Print “Text1“ Close #2 End Sub 调试时发现没有达到目的，为实现上述目的，应做的修改是_。（分数：2.50）A.把 Print “Text1“改为 Print #2, Text1B.把 Print “Text1“改为 Prim Text1C.把 Print “Text1“改为 Write “Te
19、xt1“D.把所有#2 改为#133.以下叙述中错误的是_。（分数：2.50）A.Print#语句和 Write#语句都可以向文件中写入数据B.用 Print#语句和 Write#吾句所建立的顺序文件格式总是一样的C.如果用 Print#语句把数据输出到文件，则各数据项之间没有逗号分隔，字符串也不加双引号D.如果用 Write#语句把数据输出到文件，则各数据项之间自动插入逗号，并且把字符串加上双引号34.设在当前目录下有一个名为“file.txt”的文本文件，其中有若干行文本。编写如下程序： Private Sub Command1_Click() Dim ch$, ascii As Inte
20、ger Open “file. txt“ For Input As #1 While Not EOF(1) Line Input #1, ch ascii=toascii(ch) Print ascii Wend Close #1 End Sub Private Function toascii(mystr As String)As Integer n=0 For k=1 To Len(mystr) n=n+Asc(Mid(mystr, k, 1) Next k toascii=n End Function 程序的功能是_。（分数：2.50）A.按行计算文件中每行字符的 ASCII码之和，并显
21、示在窗体上B.计算文件中所有字符的 ASCII码之和，并显示在窗体上C.把文件中所有文本行按行显示在窗体上D.在窗体上显示文件中所有字符的 ASCII码值35.文件 d:/city.Lxt的内容如下： BeiJing TianJin ShangHai ChongQing 编写如下事件过程： Private Sub Form_Click() Dim InD Open “d:/city.txt“ For Input As #1 Do While Not EOF(1) Line Input #1.InD Loop Close 1 Print InD End Sub 运行程序，单击窗体，输出结果是_。
22、（分数：2.50）A.文件 city.txt的全部内容B.BeiJingC.ChongQingD.空白36.下面语句中能够打开随机文件的是_。（分数：2.50）A.Open “file.txt“ For Random As. #1B.Open “file.txt“ For Input As #1C.Open “file.txt“ For Output As #1D.Open “file.txt“ For Append As #137.关于文件操作，以下叙述中正确的是_。（分数：4.00）A.Kill命令的作用是删除用户编写的 VB程序文件B.使用 Name命令能够对文件或文件夹重新命名C.用
23、FileCopy进行文件拷贝时，可以使用通配符D.用 FileCopy可以将打开的文件复制到指定的文件夹二级 VISUAL+BASIC-106答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：37，分数：100.00)1.设有窗体的 Form_MouseMove事件过程如下： Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If(Button And 3)=3 Then Print “检查按键“ End If End Sub 关于上述过程，以
24、下叙述中正确的是_。（分数：3.50）A.按下鼠标左键时，在窗体上显示“检查按键”B.按下鼠标右键时，在窗体上显示“检查按键”C.同时按下鼠标左、右键时，在窗体上显示“检查按键” D.不论做何种操作，窗体上都不会显示解析：解析 Mose Move 事件中的 Button表示鼠标所有按键的状态。用 0、1、2 三个位表示左、右、中键，当按下某个键时，相应位是 1，否则是 0。三位的二进制数也可转换为十进制数，作为 Button的值。如表： Button参数值 操作 000(十进制 0) 未按任何键 001(十进制 1) 左键被按下(默认) 010(十进制 2) 右键被按下 011(十进制 3)
25、左、右键同时被按下 100(十进制 4) 中间键被按下 101(十进制 5) 同时按下中间和左键 110(十进制 6) 同时按下中间和右键 111(十进制 7) 3个键同时被按下 本题中当 Button值为 011或 111时，(Button And 3)=3，条件才成立，窗体上显示“检查按键”。这说明只要同时按下鼠标的左右键时，在窗体上就显示“检查按键”。故选 C。2.要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为 Label1)中，如下图所示，放开鼠标左键后，停止同步显示。 （分数：3.50）A.Private Sub Form_Mous
26、eDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button=1 ThenLabell=“X=“ &X&“ Y=“&YEnd IfEnd SubB.Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button=1 ThenLabel1=“X=“&X&“ Y=“&YEnd IfEnd SubC.Private Sub Form_MouseMove(Button As Int
27、eger,Shift As Integer,X As Single,Y As Single)If Button=1 ThenLabel1=“X=“&X&“ Y=“&YEnd IfEnd Sub D.Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Labell=“X=“&X&“ Y=“&YEnd Sub解析：解析 鼠标移动时产生的事件是 MouseMove事件。MouseDown 事件过程的参数定义如下： Sub Form_MouseMove(Button As in
28、teger,Shift As Integer, x As Single, y As single) 其中 Button表示被按下的鼠标键，按下左键时值为 1，按下右键时值为 2，按下中间键时值为 4。x，y 参数表示鼠标光标当前位置的坐标。 题目要求按住左键时移动显示鼠标位置，因此在事件过程要判断是否按下了左键，按下了左键则在标签中显示鼠标位置，否则不显示。因此可用 If Button=1来判断是否按下了左键及是否显示鼠标位置。因此应该选择 C选项。3.下列操作说明中，错误的是_。（分数：3.50）A.在具有焦点的对象上进行一次按下字母键操作，会引发 KeyPress事件B.可以通过 Mous
29、ePointer属性设置鼠标光标的形状C.不可以在属性窗口设置 MousePointer属性 D.可以在程序代码中设置 MousePointer属性解析：解析 可以在属性窗口中给 MousePointer属性设置属性值。故 C选项错误。4.为了实现对象的自动拖放，应该设置该对象的一个属性。下面设置中正确的是_。（分数：3.50）A.DragMode=1 B.DragMode=0C.DragIcon=1D.DragIcon=0解析：解析 实现对象的自动拖放应设置 DragMode=1。5.鼠标拖放控件要触发两个事件，这两个事件是_。（分数：3.50）A.DragOver事件和 DragDrop事
30、件 B.Drag事件和 DragDrop事件C.MouseDown事件和 KeyDown事件D.MouseUp事件和 KeyUp事件解析：解析 当鼠标拖动控件到目标对象上，不松开鼠标时，触发目标对象的 DragOver事件；松开鼠标时，就会触发目标对象的 DragDrop事件。故选 A。6.设工程中有 2个窗体：Form1 和 Form2，每个窗体上都有一个名称为 Text1的文本框。若希望把 Form1上文本框中的内容复制到 Form2上的文本框中，应进行的操作是_。（分数：3.50）A.执行 Form1中的语句：Form1.Text1=Form2.Text1B.执行 Form1中的语句：F
31、ext1=Form1.TextC.执行 Form2中的语句：Form1.Text1=Text1D.执行 Form2中的语句：Text1=Form1.Text1 解析：解析 把 Form1上文本框中的内容复制到 Form2上的文本框中，所以应该在 Form2中添加语句：Text1=Form1.Text1。7.以下关于窗体的叙述中错误的是_。（分数：2.50）A.窗体的 Hide方法将窗体隐藏并卸载 B.窗体的 Show方法可以将窗体装入内存并显示该窗体C.若工程中包含多个窗体，则可指定一个为启动窗体D.窗体的 Load事件在加载窗体时发生解析：解析 窗体的 Hide方法只是将窗体隐藏，并不卸载窗
32、体。故 A选项错误，其他选项都正确。8.设工程中有 Form1、Form2 两个窗体，要求单击 Form2上的 Command1命令按钮，Form2 就可以从屏幕上消失，下面的事件过程中不能实现此功能的是_。（分数：2.50）A.Private Sub Command1_Click()Form2.HideEnd SubB.Private Sub Command1_Click()Unload MeEnd SubC.Private Sub Command1_Click()Form2.UnloadEnd Sub D.Private Sub Command1_Click()Me.HideEnd Sub
33、解析：解析 Form2.Hide 是隐藏 Fom2窗体；unload Me 是卸载并关闭当前窗体；Me.Hide 是隐藏当前窗体。From2.Unload 语法错误。故 C选项不能使窗体 Form2消失。9.如果要将一个窗体从内存中清除，应使用的语句是_。（分数：2.50）A.Unload B.ShowC.LoadD.Hide解析：解析 Unload 语句用来将指定窗体从内存中清除。格式为：Unload 窗体名称。10.为了在 Form_Load事件过程中用 Print方法在窗体上输出指定的内容，首先应执行的操作是_。（分数：2.50）A.设置窗体的 Visible属性B.设置窗体的 Auto
34、Redraw属性C.调用窗体的 Show方法 D.设置窗体的 Enabled属性解析：解析 窗体加载时是可以执行 Print，但这个时候看不到显示的结果，可以调用窗体的 Show方法显示。11.以下关于多重窗体程序的叙述中，错误的是_。（分数：2.50）A.对于多重窗体程序，需要单独保存每个窗体B.在多重窗体程序中，可以根据需要指定启动窗体C.在多重窗体程序中，各窗体的菜单是彼此独立的D.用 Hide方法不仅可以隐藏窗体，而且还可以清除内存中的窗体 解析：解析 用 Hide方法只是隐藏窗体，不卸载窗体，所以不会清除内存中的窗体。故选项 D错误。12.以下叙述中错误的是_。（分数：2.50）A.
35、Sub Main是定义在标准模块中的特定过程B.一个工程中只能有一个 Sub Main过程C.Sub Main过程不能有返回值D.当工程中含有 Sub Main过程时，工程执行时一定最先执行该过程 解析：解析 Visual Basic 工程的启动对象有：Sub Main 过程(在标准模块中定义)和窗体(在多个窗体可选一个窗体启动)，可以通过在“工程属性”对话框中设置启动对象来实现，设置哪个就用哪个启动。所以当工程中含有 Sub Main过程时，工程执行不一定最先执行该过程，也可以通过窗体启动。故选项 D错误。13.以下关于 VB特点的叙述中，错误的是_。（分数：2.50）A.VB中一个对象可有
36、多个事件过程B.VB应用程序能以编译方式运行C.VB应用程序从 Form_Load事件过程开始执行 D.在 VB应用程序中往往通过引发某个事件导致对对象的操作解析：解析 Visual Basic 应用程序不一定从 Form_Load事件开始执行，它是由工程中启动对象决定先从哪儿开始执行。故 C选项错误。14.Visual Basic中的“启动对象”是指启动 Visual Basic应用程序时，被自动加载并首先执行的对象。下列关于 Visual Basic“启动对象”的描述中，错误的是_。（分数：2.50）A.“启动对象”可以是指定的标准模块 B.“启动对象”可以是指定的窗体C.“启动对象”可以
37、是 Sub Main过程D.若没有经过设置，则默认的“启动对象”是第一个被创建的窗体解析：解析 Visual Basic 中启动对象可以是 Sub Main过程或窗体，不能是标准模块。故 A选项错误。15.以下关于 VB文件的叙述中，正确的是_。（分数：2.50）A.标准模块文件的扩展名是.frmB.一个.vbg 文件中可以包括多个.vbp 文件 C.一个.vbp 文件只能含有一个标准模块文件D.类模块文件的扩展名为.bas解析：解析 标准模块文件的扩展名是.bas；工程组文件的扩展名是.vbg，由多个工程文件组成；工程文件的扩展名是.vbp，可以含有多个标准模块文件；类模块文件的扩展名为.c
38、ls。16.以下叙述中错误的是_。（分数：2.50）A.标准模块文件的扩展名是.basB.标准模块文件是纯代码文件C.在标准模块中声明的全局变量可以在整个工程中使用D.在标准模块中不能定义过程 解析：解析 标准模块独立保存为标准模块文件.bas，故 A选项正确。 标准模块是应用程序内其他模块访问的过程和声明的容器。当应用程序比较庞大，含有多个窗口，而且几个窗口需要写重复的过程、变量等代码时，就可以把这些重复的代码写在标准模块。故 B选项正确。 在标准模块中定义的 Public变量、Public 过程属于全局变量和全局过程，在整个工程中的其他窗体、模块都可以使用。故 C选项正确， 在标准模块中可
39、以定义过程，故 D选项错误。17.下面有关标准模块的叙述中，错误的是_。（分数：2.50）A.标准模块不完全由代码组成，还可以有窗体 B.标准模块中的 Private过程不能被工程中的其他模块调用C.标准模块的文件扩展名为.basD.标准模块中的全局变量可以被工程中的任何模块引用解析：解析 标准模块中只包含其他窗体模块中公用的一些变量、过程等代码，不包括窗体。故选项 A错误。 标准模块中用 Private声明的过程属于私有过程，只能被它所在的模块中的其他过程调用，不能被工程中其他模块调用。用 Public声明的全局变量属于公用变量，可以被工程中的任何模块引用。标准模块的文件扩展名是.bas。1
40、8.下面关于标准模块的叙述中错误的是_。（分数：2.50）A.标准模块中可以声明全局变量B.标准模块中可以包含一个 Sub Main过程，但此过程不能被设置为启动过程 C.标准模块中可以包含一些 Public过程D.一个工程中可以含有多个标准模块解析：解析 标准模块中可以包含一个 Sub Main过程，可以通过“工程属性”对话框中将 Sub Main过程设置启动对象。故 B选项错误。19.在标准模块中用 Public关键字定义的变量，其作用域为_。（分数：2.50）A.本模块所有过程B.整个工程 C.所有窗体D.所有标准模块解析：解析 在标准模块中用 Public定义的变量是公用的全局变量，在
41、整个工程中的所有窗口、模块中都能引用，作用域是整个工程。故 B选项正确。20.如果在窗体模块中所有程序代码的前面有语句：Dim x，则 x是_。（分数：2.50）A.全局变量B.局部变量C.静态变量D.窗体级变量 解析：解析 在窗体所有代码前定义的变量是窗体级变量，在整个窗体模块的过程中都能引用。21.下列操作中不能向工程添加窗体的是_。（分数：2.50）A.执行“工程”菜单中的“添加窗体”命令B.单击工具栏上的“添加窗体”按钮C.右键单击窗体，在弹出的菜单中选择“添加窗体”命令 D.右键单击工程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择“添加窗体”命令解析：解析 右击
42、窗体，弹出的菜单中没有“添加窗体”命令，故 C选项错误。22.以下关于 VB文件的叙述中，正确的是_。（分数：2.50）A.标准模块文件的扩展名是.frmB.VB应用程序可以被编译为.exe 文件 C.一个工程文件只能含有一个标准模块文件D.类模块文件的扩展名为.bas解析：解析 标准模块文件的扩展名是.bas，不是.frm，故 A选项错误。一个工程中可以包含一个或多个标准模块文件，故 C选项错误。类模块文件的扩展名为.cls，不是.bas。故 D选项错误。B 选项正确。23.以下关于文件的叙述中，错误的是_。（分数：2.50）A.顺序文件有多种打开文件的方式B.读取顺序文件的记录时，只能从头
43、至尾逐记录进行C.顺序文件中各记录的长度是固定的 D.随机文件一般占用空间比较小解析：解析 顺序文件中各记录的长度不固定。24.以下不属于 Visual Basic数据文件的是_。（分数：2.50）A.顺序文件B.随机文件C.数据库文件 D.二进制文件解析：解析 可以从不同的角度对文件进行分类：按照文件的内容，可分成程序文件和数据文件；按照文件存储信息的形式，可分为 ASCII文件和二进制文件；按照文件的组织形式，可分成顺序文件和随机文件；按照存储介质，又可以分为光盘文件、磁盘文件、磁带文件和打印文件等。25.下列关于顺序文件的描述中，正确的是_。（分数：2.50）A.文件的组织与数据写入的顺
44、序无关B.主要的优点是占空间少，且容易实现记录的增减操作C.每条记录的长度是固定的D.不能像随机文件一样灵活地存取数据 解析：解析 顺序文件的特点是：文件中各记录写入、存放和读取的顺序是一致的，即最先写入的记录放在文件的最前面，后面写入的依次往后面存放，最后写入的记录存放在文件的最后。读取时也是，先读取完前面的记录，才能读取后面的记录。所以文件的组织与数据写入的顺序有关，而且读取文件时效率低，不灵活。故 A选项错误，D 选项正确。根据顺序文件的特点，文件实现记录的增减不容易。故 B选项错误。顺序文件的每条记录中各数据项个数不固定，所以记录的长度也不固定。故 C选项错误。26.以下关于文件的叙述
45、中，错误的是_。（分数：2.50）A.顺序文件中的记录是一个接一个地顺序存放B.随机文件中记录的长度是随机的 C.文件被打开后，自动生成一个文件指针D.EOF函数用来测试是否到达文件尾解析：解析 随机文件中记录的长度是固定的、相等的，不是随机的。故选项 B错误。27.下面关于文件的叙述中，错误的是_。（分数：2.50）A.VB数据文件需要先打开，再进行处理B.随机文件每个记录的长度是固定的C.不论是顺序文件还是随机文件，都是数据文件D.顺序文件的记录是顺序存放的，可以按记录号直接访问某个记录 解析：解析 顺序文件的记录是顺序存放的，先写入的记录存放在文件的最前面，后写入的依次往后面存放，最后写
46、入的记录放在文件的最后面。如果访问某条记录，要先访问前面的记录，才能访问后面的记录，不能按记录号直接访问。故 D选项错误。28.在窗体上有两个名称分别为 Text1、Text2 的文本框，一个名称为 Command1的命令按钮。运行后的窗体外观如图所示。 （分数：2.50）A.Open“c: /Test2. dat“ For Output As #1Put #1, 1, pClose #1B.Open “c: /Test2. dat“ For Random As #1Get #1, 1, pClose #1C.Open “c: /Test2. dat“ For Random As #1 Len
47、=Len(p)Put #1, 1, pClose #1 D.Open “c: /Test2. dat“ For Random As #1 Len=Len(p)Get#1, 1, pClose #1解析：解析 在 Visual Basic中可以访问的文件有顺序文件、随机文件和二进制文件。不同文件存取方式不同，但处理的步骤大致一样。 用 Open语句打开文件，并为文件制定一个文件号。根据文件的的存取方式使用不同的模式打开文件。 本题是随机文件，读写的是一条一条的记录，所以用 For Random模式打开，记录的长度为 Person类型变量 p的长度。 从文件中读出数据进行处理或处理数据后，把数据写
48、入文件。 本题是把变量的数据写入随机文件，所以用 Put语句写入。 文件操作结束，关闭文件。各种文件关闭统一用 Close#文件号关闭。 综合以上，故选 C。29.下列有关文件的叙述中，正确的是_。（分数：2.50）A.以 Output方式打开一个不存在的文件时，系统将显示出错信息B.以 Append方式打开的文件，既可以进行读操作，也可以进行写操作C.在随机文件中，每个记录的长度是固定的 D.无论是顺序文件还是随机文件，其打开的语句和打开方式都是完全相同的解析：解析 A 选项错误原因：当以 Output方式打开一个不存在的顺序文件时，Open 语句会首先创建该文件，然后再打开它，系统不会出错。 B选项错误原因：以 Append方式打开文件后，可将内存中的数据追加到顺序文件的尾部，可进行写操作，不能进行读操作。 D选项错误原因：Visual Basic 中可访问的文件有顺序文件、随机文件和二进制文件，不同文件打开的方式是不同的。 C选项中随机文件中的每一行称为一条记录，每条记录的长度相同，通过记录号来定位和查找指定记录。故 C选项正确。30.设有语句： Open “C: /Test.
