[计算机类试卷]VB笔试模拟试卷127及答案与解析.doc

1、VB笔试模拟试卷 127及答案与解析 1 通过以下 _ 窗口可以在设计时直观的调整窗体在屏幕上的位置。 （ A）代码 （ B）窗体设计 （ C）窗体布局 （ D）属性 2 不能作为容器使用的对象是 _。 （ A）窗体 （ B）框架 （ C）图像框 （ D）图片框 3 对变量名说法不正确的是 _ 。 （ A）必须是字母开头，不能是数字或其他字符 （ B）可以包含字母、数字、下划线和标点符号 （ C）不能是 Visual Basic的保留字 （ D）不能超过 255个字符 4 骰子是一个正六面体，用 1 6这六个数分别代表这六面，掷一次骰子出现的数可表示为 _ 。 （ A） Int(Rnd(6)+

2、1) （ B） Int(Rnd*6+1) （ C） Int(Rnd*7) （ D） Int(Rnd*6) 5 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1和 Command1，然后编写如下两个事件过程： Private Sub Command1_Click() strText=InputBox(“请输入 “) Text1.Text=strText End Sub Private Sub Text1_Change() Label1.Caption=Right(Trim(Text1.Text)， 4) End Sub 程序运行后，如果在对话框中输入 abcd

3、efgh，则在标签中显示的内容是 _。 （ A）空 （ B） abcdef （ C） abcd （ D） efgh 6 如果在 “立即 ”窗口中执行以下操作： a=8 CR ( CR是回车键，下同 ) b=9 CR Print a b CR 则输出的结果是 _。 （ A） 1 （ B） 0 （ C） False （ D） True 7 无论什么控件，都有一个共同的属性，这个属性是 _。 （ A） Name （ B） Caption （ C） Text （ D） Font 8 为了暂时关闭计时器，应把该计时器的某个属性设置为 False，这个属性是 _。 （ A） Visible （ B） Ti

4、mer （ C） Enabled （ D） Interval 9 在程序运行期间 ，如果拖动滚动条上的滑快，则触发的滚动条事件是 _。 （ A） Move （ B） Change （ C） Scroll （ D） GetFocus 10 唯一能区别一个控件的属性是 _。 （ A） Index （ B） Text （ C） Name （ D） Caption 11 以下能够触发文本框 Change事件的操作是 _。 （ A）改变文本框的内容 （ B）文本框失去焦点 （ C）文本框获得焦点 （ D）设置文本框的焦点 12 文本框控件最多能处理 _ 个字节。 （ A） 16K （ B） 32K （

5、C） 64K （ D） 128K 13 下列程序段的执行结果为 _。 n=16 For k=n To 1 Step-1 x=Sqr(k) x=x-2 Next k Print x-2 （ A） -3 （ B） -1 （ C） 1 （ D） 2 14 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox(“请输入 a的值 “) a=Val(A) b=InputBox(“请输入 b的值 “) b=Val(B) x=InputBox(“请输入 x的值 “) x=Val(x) a=a+b+x

6、Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入 10、 8、 9、 2、 11、 -1，则输出结果为 _。 （ A） 15 （ B） 14 （ C） 13 （ D） 12 15 在窗体上画一 个名称为 command1的命令按钮，然后编写如下程序； Option Base 1 Private Sub Command1_Click() Dim arr(4)As String For i=1 To 4 arr(i) = Chr(Asc(“A“)+(i-1) Next i For Each b1 In arr Print b1； Next End Sub

7、程序运行后，如果单击命 令按钮，则在窗体上输出的内容为 _。 （ A） ABCD （ B） abcd （ C）出错信息 （ D） 1 2 3 4 16 假定有如下的 Sub过程： Sub Func(x As Single， y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, B) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 _。 （

8、A） 6 5 （ B） 1 1 （ C） 1.2 5 （ D） 1.2 1 17 在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母 “a”，则文本框中显示的内容为 _。 Private Sub Text1_KeyPress KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5， KeyAscii) End Sub （ A） aaaaa （ B） AAAAA （ C） aaaaaa （ D） AAAAAA 18 在对象的 MouseDown和 MouseUp事件

9、过程中，当 Button参数的值为 1、 2、 4时，分别代表按下鼠标 _。 （ A）左键、中间键和右键 （ B）左键、右键和中间键 （ C）中间键、左键和右键 （ D）左键、右键和同时按下左右键 19 在窗体上画一个通用对话框，其名称为 CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialogl.Flags=cdlOFNHideReadOnly commonDialogl.Filter=“All Files(*.*)|*.*| Text Files“&_ “(*.txt)|*.txt|Batch

10、Files(*.bat)|*.bat“ CommonDialogl.Filterlndex=1 CommonDialogl.ShowOpen MsgBox CommonDialogl.FileName End Sub 程序运行后，单击命令按钮，将显示一个 “打开 ”对话框，此时在 “文件类型 ”框中显示的是 _。 （ A） AllFiles(*.*) （ B） TextFiles(*.txt) （ C） BatchFiles(*.bat) （ D）不确定 20 Visual Basic没有提供下列 _ 事件。 （ A） MouseDown （ B） MouseUp （ C） MouseExit

11、 （ D） MouseMove 21 编写如下事件过程： Private Sub Form KeyDown(KeyCode As Integer， Shift As Integer) If(Button And 3)=3 Then Print “AAAA“ End If End Sub 程序运行后，为了在窗体上输出 “AAAA“，应按下的鼠标键为 _。 （ A）左 （ B）右 （ C）同时按下左、右 （ D）按什么键都不显示 22 假定在窗体上建立一个通用对话框，其名称为 CommonDialogl，用下面的语句可以建立一个对话框： CommonDialogl.Action=1 与该语句等价的

12、语句是 _。 （ A） CommonDialogl.ShowOpen （ B） CommonDialogl.ShowSave （ C） CommonDialogl.ShowFont （ D） CommonDialogl.ShowColor 23 Visual Basic根据计算机访问文件的方式将文件分成三类，其中不包括 （ A）顺序文件 （ B）二进制文件 （ C）随机文件 （ D） Unix文件 24 读数据文件的操作可以通过下列 _ 语句来实现。 （ A） Input#和 Get# （ B） Read和 Line Input# （ C） Get#和 Line Input# （ D） Lin

13、e Input# 和 Input# 25 用 Close语句可以关闭一个已经用完不再使用的文件，当该语句不带任何参数时，它的功能是 （ A）可以关闭所有已打开的文件 （ B） 只能关闭最近打开的那个文件 （ C）可以关闭最近打开的那个文件 （ D）语法错误 26 在数据的存储结构中，不仅需要存储各数据元素的信息，还要存放各元素之间_的信息。 27 按照 “先进先出 ”的原则组织数据的结构的是 _。 28 深度为 5的满二叉树中，叶子结点的个数为 _。 29 在面向对象方法中， _描述的是具有相似属性与操作的一组对象。 30 Jackson方法是一种面向 _的结构化方法。 31 属性窗口分为 4

14、个部分，这 4个部分分别是 _。 32 Text文本框接受的最长字符数由文本框的 _属性确定。 33 设当前日期为 2008年 4月 28日，星期一，则执行下面语句后的输出结果为_。 Print Day(Now) Print Month(Now) Print Year(Now) Print Weekday(Now) 34 表达式 “12345“ “12345“ & “ABC“的值是 _。 35 若要添加 CommonDialog控件，则应从 “工程 ”菜单中选择 “部件 ”命令，在 弹出的 “部件 ”对话框的 “控件 ”选项卡中选择 _，将控件添加到工具箱中。 36 下列程序功能为：弹出一个对

15、话框询问用户是否输出，如果是，则输出；否则结束。请在程序空白处填入适当内容使程序完整。 Sub PrintOut() Dim a As Integer a = MsgBox(“输出结果 ?“, vblnformation + vbYesNo, “提示： “) If a = _ Then Print “Myresult“ End If End Sub 37 如果要通过程序代码来一次性删除列表框中所有项目，则应使用的方法是_。 38 窗体中有图片框 (Picture1)和计时器 (Timer1)两个控件。程序运行时，将图片加载到图片框中，然后图片框以每秒一次的速度向窗体的右下角移动，每次向左、向右

16、移动 300twip。请在程序空白处填入适当内容使程序完整。Private Sub Form_Load() PicturePicture = LoadPicture(“c:My Documents图片 Qian1_Icon0ico“) _ End Sub Private Sub Timer1_Timer() Static x, y As Integer x = x + 300 y = y + 300 PictureMove x, y End Sub 39 文件根据数据性质，可分为【 】文件和【 】文件。 VB笔试模拟试卷 127答案与解 析 1 【正确答案】 C 【试题解析】 Form Lay

17、out Window即窗体布局窗口，允许使用表示屏幕的小图像来布置应用程序中各窗体的位置。 2 【正确答案】 C 【试题解析】 窗体、框架和图片框都可以作为容器使用，在这些对象中可以放置其他控件。图像框不能放置其他控件，不能作为容器使用。 3 【正确答案】 B 【试题解析】 变量名不能包含标点符号。 4 【正确答案】 B 【试题解析】 Rnd函数产生一个小于 1、大于 0的随机数， Int函数是求不大于参数的最大整数。选 项 A的最大数是 1，选项 B的最大数是 5，选项 C的最小数是 0，只有选项 D能产生 1 6之间的整数。 5 【正确答案】 D 【试题解析】 Trim函数返回 Varia

18、nt(String)类型，其中包含指定字符串的拷贝，但不包含前导和尾随空白。 Right(字符串， n)：返回 “字符串 ”的后 n个字符。这里的 “字符串 ”可以是字符串常量、字符串变量、字符串函数或字符串连接表达式。本题中输入的是 abcdef,返回后 4个字符就是 efgh。 6 【正确答案】 D 【试题解析】 本题中的 Print命令输出的是关系表 达式的运算结果，由于 a b成立，因此返回值是 True。 7 【正确答案】 A 【试题解析】 每个控件都有 Name属性，该属性表示控件的名称，如同变量名一样，以便在程序中对该控件实施操作。 8 【正确答案】 C 【试题解析】 计时器可以

19、使用 Name属性和 Enabled属性。如果想暂时关闭计时器 (让计时器不起作用 )，应将计时器的 Enabled属性设置为 False。 9 【正确答案】 C 【试题解析】 与滚动条有关的重要事件是 Scroll和 Change。当拖动滚动条上的滑块时，会触发 Scroll事件，而当改变 Value属性 (滚动条内滑块位置改变 )时会触发 Change事件。 10 【正确答案】 C 【试题解析】 在程序中每个控件都有个名字，控件的名字也是它们互相区别的唯一标志。 11 【正确答案】 A 【试题解析】 当用户向文本框中输入新信息，或当程序把 Text属性设置为新值从而改变文本框的 Text属

20、性时，将触发 Change事件。程序运行后，在文本框中每键入一个字符，就会引发一次 Change事件。 12 【正确答案】 B 【试题解析】 对于用户系统上单行 TextBox控件来说，最大值不能超过被内存强制建立的值，并且对于多行 TextBox控件而言，最大值大约为 32K。 13 【正确答案】 A 【试题解析】 因为在 For循环每次执行时，都会根据循环控制变量 k给 x重新赋值，所以只需根据最后一次循环的值计算 x的值即可。最后一次循环， k=1，所以x=Sqr(1)=1， x=x-2=-1。打印 x-2的值，即为 -1-2=-3。 14 【正确答案】 D 【试题解析】 本题中，每次循

21、环开始的时候，变量 a都被重新赋了一次值，所以最后的结果仅仅是 2+11+(-1)，因此最终输出的值是 12。 15 【正确答案】 A 【试题解析】 语句 Chr(Asc(“A“)+(i-1)的作用是将字符 A的 ASCII码值加上循环变量的值减 1，求出此 ASCII码对应的字符。将计算出的字符赋值给数组 arr的第 i个元素。循环结束后， arr的 4个元素分别为字符 A、 B、 C、 D。 Print方法输出项的最后用分号结束，使得输出不换行。 16 【正确答案】 D 【试题解析】 Visual Basic的函数参数默认的方式是传地址的，所以函数 s对参数做的改变会反映到原来的变量里。

22、17 【正确答案】 D 【试题解析】 在程序段用到了 4个函数，在按了键盘上的某个键 (在这里是字母键 A)后， Chr函数将得到的键的 ASCII码值 (101)转换成该 ASCII码值对应的字符(A)，然后利用 Ucase函数将该字符转换成大写字母 (A)，将该大写字母的 ASCII码值 (利用函数 Asc()赋给 KeyAscii，最后利用 String函数的 5个 ASCII码值等于KeyAscii的字符 (即 5个 A)赋给文本框 Text1，此时文本框中将显示 5个 A，又因为 KeyPress事件本身会在文本框中显示 输入一个 ASCII码值为 KeyAscii的字符(A)，因此

23、最后在文本框中将显示 6个大写字母 A。 18 【正确答案】 B 【试题解析】 Button参数指示用户按下或释放了哪个鼠标键。当 Button参数的值为 1时，表示用户按下或释放了鼠标的左键；当 Button参数的值为 2时，表示用户按卞或释放了鼠标的右键；当 Button参数的值为 4时，表示用户按下或释放了鼠标的中间键。 19 【正确答案】 A 【试题解析】 从程序可见 FilterIndex属性已经设为 1，所以缺省过滤器为 *.*。 20 【正确 答案】 C 【试题解析】 MouseDown代表鼠标键在对象上按下， MouseUp代表鼠标键在对象上弹起， MouseMove代表鼠标键

24、在屏幕上移动，而 MouseExit不是 Visual Basic中的事件。 21 【正确答案】 D 【试题解析】 从题目中的程序可以看出， (BuRon And 3)=3这个条件永远是假的，所以输出语句也永远不会被执行。 22 【正确答案】 A 【试题解析】 通用对话框的 Action属性为 1表示显示的是 “打开 ”对话框，所以相当于 Common Dialogl.ShowOpen。 23 【正确答案】 D 【试题解析】 Visual Basic访问文件的方式分为三类有 Input/Output/Append(访问顺序文件 )、 Binary(访问二进制文件 )、 Random(访问随机文

25、件 )。如果未指定方式，则以 Random访问方式打开文件。 24 【正确答案】 D 【试题解析】 Get#语句把由 “文件号 ”所指定的磁盘文件中的数据读到 “变量 ”中。Visual Basic中没有 Read语句。读数据文件的操作由 Input#语句、 Line Input#语句和 Input()函数来实现。 25 【正确答案】 A 【试题解析】 Close语句的格式如下： Close#文件号 ,#文件号 参数 “#文件号 ”可省略，当省略时表示关闭所有文件。 26 【正确答案】 前后件关系 【试题解析】 在数据存储结构中，除了要存储数据，还要存储数据的前后件关系，对于顺序存储的数据结构

26、，前后件之间的关系，是通过存储空间的位置来实现的，而对于链式存储来说，数据元素之间的前后件关系是通过指针来实现的。 27 【正确答案】 队列 【试题解 析】 队列是一种特殊的线性表，只允许在表的一端插入元素，在表的另一端删除元素，插入元素的一端叫做 “队尾 ”，删除元素的一端叫做 “队头 ”，先插入的元素先被删除，是按先进先出的原则组织数据的。 28 【正确答案】 16 【试题解析】 满二叉树的叶子结点都在最后一层，即第 4层，且第 4层的结点达到最大数，即 25-1=16。 29 【正确答案】 类 【试题解析】 在面向对象方法中，把具有相同属性和方法的对象称为类，类是对象的抽象，对象是类的实

27、例。 30 【正确答案】 数据结构 【试题解析】 Jackson方法是一种结构化分析方法，它是一种面向数据结构的方法。 31 【正确答案】 对象框、属性显示方式、属性列表和属性解释 【试题解析】 对象属性在设计阶段可以通过属性窗口来设置。属性窗口分为 4个部分，即对象框、属性显示方式、属性列表和属性解释。 32 【正确答案】 MaxLength 【试题解析】 MaxLength属性返回或设置一个值，指定文本框控件中能够输入的字符最大数量，默认为 0，表示对输入的数量不限制。 33 【正确答案】 28 CR 4 CR 2008 CR 2 CR ( CR表示换行 ) 【试题解析】 本题考查了日期函

28、数的应用。其中， Day(Now)函数，表示返回当前号数 (即当前天是几号 )； Month(Now)函数，表示返回当前月份 (即当前是几月 )；Year(Now)函数，表示返回当前年份 (即当前是哪年 )； Weekday(Now)函数，表示返回当前星期号 (即当前是星期几 )。注意，星期号是用 0 6来表示， 0代表周六，1代表周日， 2代表周一， 3代表周二， 4代表周三， 5代表周四， 6代表周五。 34 【正确答案】 True 【试题解析】 运算的顺序 为先进行算术运算 “&”，然后是关系运算 “ ”。表达式 “12345“， “12345“&“ABC“的运算过程如下： 先进行算术运

29、算，“12345“ “12345“&“ABC“=“12345“ “12345ABC“； 再进行关系运算，“12345“ “12345“&“ABC“=“12345“ “12345ABC“=true。 35 【正确答案】 Microsoft Common Dialog Control 6.0 【试题解析】 通用对话框是 VB提供的 ActiveX控件。 ActiveX控件是具有 .OCX扩展名的文件，或一个可插入的对象。当使用 “部件 ”对话框将其添加到工程中时，将扩充工具箱的内容。当工具箱上无通用对话框控件图标时，可以通过选择“工程 ”菜单中的 “部件 ”命令，或用鼠标右键单击工具箱，在弹出的快

30、捷菜单中，选择 “部件 ”命令，打开 “部件 ”对话框。然后在对话框中的 “控件 ”选项卡中，找到“Microsoft Common Dialog Control 6.0”，并选中该项，单击 “确定 ”按钮后即可将通用对话框控件添加到工具箱中。 36 【正确答案】 vbYes(或 6) 【试题解析】 MsgBox函数在对话框中显示消息，等待用户单击按钮，并返回一个 Integer告诉用户单击哪一个按钮。返回值是一个整数，这个整数与选择的按钮有关，如下表所示。37 【正确答案】 Clear 【试题解析】 Clear方法用于清除控件中所有列表内容或系统剪贴板的内容。 38 【正确答案】 Timer1.Interval=1000 【试题解析】 Interval属性返回或设置对 Timer控件的计时事件各调用间的毫秒数； Timer事件在一个 Timer控件的预定时间间隔过去之后发生，即每隔 Interval属性设定的时间间隔，就会触发一次。题中要求每隔一秒移动一次，因此在窗体启动时，应将 Timer1控件的 Interval属性值设置为 1000。 39 【正确答案】 程序 ,数据 【试题解析】 如果一个文件内存放的是程序数据，则该文件是程序文件。否则该文件内存放的就是供其他程序使用的数据，也就是数据文件。