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

《[计算机类试卷]VB笔试模拟试卷271及答案与解析.doc》由会员分享，可在线阅读，更多相关《[计算机类试卷]VB笔试模拟试卷271及答案与解析.doc（24页珍藏版）》请在麦多课文档分享上搜索。

1、VB 笔试模拟试卷 271及答案与解析 1 以下不属于对象的基本特点的是 （ A）分类性 （ B）多态性 （ C）继承性 （ D）封装性 2 对长度为 n的线性表进行顺序查找，在最坏情况下需要比较的次数为 ( )。 （ A） 125 （ B） n/2 （ C） n （ D） n+1 3 在窗体上画一个命令按钮，名称为 Command1。单击命令按钮时，执行如下事件过程： Private Sub Command1_Click() a$=“software and hardware“ b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,b$,c$,1 End Sub 则

2、在弹出的信息框的标题栏中显示的信息是 ( )。 （ A） hardware （ B） software （ C） hardware （ D） 1 4 将 E-R图转换到关系模式时，实体与实体间的联系可以表示成 ( )。 （ A）属性 （ B）关系 （ C）键 （ D）域 5 下列不属于软件工程 3个要素的是 ( )。 （ A）工具 （ B）过程 （ C）方法 （ D）环境 6 设计数据库的存储结构属于 ( )。 （ A）需求分析 （ B）概念设计 （ C）逻辑设计 （ D）物理设计 7 软件生命周期中花费时间最多的阶段是 （ A）详细设计 （ B）软件编码 （ C）软件测试 （ D）软件维护

3、8 关系数据库管理系统能实现的专门关系运算包括 （ A）排序、索引、统计 （ B）选择、投影、连接 （ C）关联、更新、排序 （ D）显示、打印、制表 9 下述关于数据库系统的叙述中正确的是 _。 （ A） 数据库系统减少了数据冗余 （ B）数据库系统避免了一切冗余 （ C）数据库系统中数据的一致性是指数据类型的一致 （ D）数据库系统比文件系统能管理更多的数据 10 所谓概念模型，指的是 _。 （ A）客观存在的事物及其相互联系 （ B）将信息世界中的信息进行数据化 （ C）实体模型在计算机中的数据化表示 （ D）现实世界到机器世界的一个中间层次，即信息世界 11 单击滚动条的滚动箭头时，产

4、生的事件是 （ A） Click （ B） Scroll （ C） Change （ D） Move 12 为使图像框的大小自动适应图像的大小，则应 ( )。 （ A）将其 AutoSize属性值设置为 True （ B）将其 AutoSize属性值设置为 False （ C）将其 Shape属性值设置为 True （ D）将其 Stretch属性值设置为 False 13 在窗体上画两个单选按钮，名称分别为 Opfion1， Option2，标题分别为 “宋体 ”和“黑体 ”；一个复选框，名称为 Check1，标题为 “粗体 ”：一个文本框，名称为Text1， Text属性为 “改变文字字体

5、 ”。要求程序运行时， “宋体 ”单选按钮和 “粗体 ”复选框被选中，则能够实现上述要求的语句序列是 ( )。 （ A） Option1.Value=True Check1.Value=False （ B） Oprion1.Value=True Check1.Value=Tme （ C） Option2.Value=False Check1.Value=Tme （ D） Optionl.Value=True Check1.Value=1 14 在窗体上画一个名称为 CommonDialog1 的通用对话框，一个名称为 Command1的命令按 钮。要求单击命令按钮时，打开一个保存文件的通用对话

6、框。该窗口的标题为 “Save”，缺省文件名为 “SaveFile”；在 “文件类型 ”栏中显示 *.txt。则能够满足上述要求的程序是 ( ) （ A） Private Sub Command_Cilck() CommonDialOR1.P11eName=“SaveFile“ CommonDialOg1.Filter=“AllFiles|*.*|(*.txt)|(*.doc)|*.doc“ CommonDialOg1.P11terlndex=2 CommonDialOg1.DialogTitle=“Save“ CommonDialOg1.Action=2 End Sub （ B） Priva

7、te Sub Commandl_Click() CommonDial021.FileName： “SaveFile“ CommonDialog1.Pnter二 ”AllFlleS卜刮 (* txt)陡 txtHdOc卜 doc” CommonDialog1.FilterIndex=1 CommonDialog1.DialogTitle=“Save“ CommonDialog1.Action=2 End Sub （ C） Private Sub Commandl_Cilck() CommonDialog1.FileName=“Save“ CommonDialog1.Filter=“AllFile

8、S|*.*|(*.txt)|*.txt|(*.doc)|*.doc“ CommonDialog1.Filterlndex=2 C0mmonDialoZ1.DialogTitle=“SaveFlle“ CommonDialog1.Action=2 End Sub （ D） Private Sub Commandl_Click() CommonOialoR1.FlleName=“SaveFile“ CommonDialog1.Filter=“AllFiles|*.*|(*.txt)|*.txt|(*.doc)|*.doc“ CommonDialog1.Filterlndex=1 CommonDia

9、log1.DialogTitle=“Save“ CommonDialog1.Action=1 End Sub 15 下列关于菜单的说法错误的是 ( )。 （ A）每个菜单项都是一个控件，与其他控件一样也有其属性和事件 （ B）除了 Click事件之外，菜单项不可以响应其他事件 （ C）菜单项的索引号可以不连续 （ D）菜单项的索引号必须从 1开始 16 如果一个正整数从高位到低位上的数字依次递减，则称其为降序数 (如： 9632是降 序数，而 8516则不是降序数 )。现编写如下程序判断输入的正整数是否为降序数。 Private Sub Commandl一 Click() Dim n AS L

10、ong Dim flag AS Boolean n=InputBox(”输入一个正整数 ”) S=Trim(Str(11) For i=2 To Len(s) If Mid(S， i一 1， 1)Mid(s,i,1)Then Exit For Next i lf i=Len(s)Then flag=True Else flag=False If flag Then Print n； “足降序数 “ Else Print n； “不是降序数 “ End If End Sub 运行以上程序，发现有错误，需要对给 flag变量赋值的 If语句进行修改。以下正确的修改是 ( )。 （ A） If i=

11、Len(s)+l Then flag=False Else flag=True （ B） If i=Len(s)+l Then flag=True Else flag=False （ C） If i-Len(s)-l Thetl flag=False Else flag=True （ D） If i=Len(s)-l Then flag=True Else flag=False 17 下列程序段的执行结果为 _。 x=5 y=-20 If Not X 0 Then X=Y-3 Else Y=X+3 Print X-Y;Y-X （ A） -3 3 （ B） 5 -8 （ C） 3 -3 （ D）

12、 25 -25 18 在程序代码中将图片文件 mypic.jpg装入图片框 Picture1的语句是 _。 （ A） Picture1.Picture=“mypic.jpg“ （ B） Picture1.Image=“mypic.jpg“ （ C） Picture1.Picture=LoadPicture(“mypic.jpg“) （ D） LoadPicture(“mypic.jpg“) 19 设 “A=“87654321“”，则表达式 Val(Left(A， 4)+Mid(A， 4， 2)的值为 ( )。 （ A） 876543 （ B） 876554 （ C） 8 （ D） 6 20 在

13、窗体上画一个名为 Command 1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1, 2, 3, 4, 5) j=1 For i=5 To 1 Step -1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后，单击命令按钮，输出结果为 ( )。 （ A） 54321 （ B） 123 （ C） 12345 （ D） 345 21 图像框的 ( )属性，可以自动调整图形的大小以适应图像的尺寸。 （ A） AutoSize （ B） Stretc

14、h （ C） AutoRedraw （ D） Appearance 22 在窗体上画两个单选按钮，名称分别为 Option1、 Option2，标题分别为 “宋体 ”和“黑体 ”；一个复选框，名称为 Check1，标题为 “粗体 ”；一个文本框，名称为Text1， Text属性为 “改变文字字体 ”。要求程序运行时， “宋体 ”单选按钮和 “粗体 ”复选框被选中 (窗体外观如图 16-2所示 )，则能够实 现上述要求的语句序列是_。 （ A） Optionl. Value=True Checkl. Value=False （ B） Optionl. Value=True Checkl. Val

15、ue=True （ C） Option2. Value=False Checkl. Value=True （ D） Optionl. Value=True Checkl. Value=1 23 在窗体中添加一个列表框 (listBox1)和一个命令按钮，并编写如下代码 ： Private Sub Command1_ Click() Dim Entry, I, Msg Msg = “Choose Ok to add 100 items to your list box.“ MsgBox Msg for I = 1 To 100 Entry = “Entry“ i End Sub Private

16、Sub sub1(n As Integer) n = 1 + 2 * n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 （ A） 1 3 （ B） 11 14 （ C） 15 4 （ D） 4 15 31 单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click( ) Dim a As Integer， b As Integer， c As Integer a=3 b=4 C=5 Print SecProc(c， b， A)End Sub Function Fir Proc(x As Integer， y As Integer， z As I

17、nteger) Fir Proc=2*x+y+3*z End Function Function SecProc(x As Integer， y As Integer， z As Integer) SecProc=FirProc(z，x， y)+x End Function （ A） 20 （ B） 22 （ C） 28 （ D） 30 32 骰子是一个正六面体，用 1 6这六个数分别代表这六面，掷一次骰子出 现的数可表示为 _。 （ A） INT(RND(6)+1) （ B） INT(RND*6) （ C） INT(RND*7) （ D） INT(RND*6+1) 33 下列几项中，属于合法

18、的日期型常量的是 （ A） 10/10/02 （ B） 10/10/02 （ C） 10/10/02 （ D） #10/10/02# 34 如果一个变量未经定义就直接使用，则该变量的类型为 （ A） Integer （ B） Byte （ C） Boolean （ D） Variant 35 若在某窗体模块中有如下事件过程 ： Privam Sub Command1_Click(Index As Integer) End Sub 则以下叙述中正确的是 _。 （ A）此事件过程与不带参数的事件过程没有区别 （ B）有 个名称为 Command1的窗体，单击此窗体则执行此事件过程 （ C）有一个名

19、称为 Command1的控件数组，数组中有多个不同类型控件 （ D）有 今名称为 Command1的控件数组，数组中有多个相同类型控件 36 按照 “先进先出 ”的原则组织数据的结构的是 _。 37 数据流图的类型有 _和事务型。 38 在窗体上画两个文本框，其名称分别为 Text1和 Text2，然后编写如下事件过程： Private Sub Form_ Lead() Show Text1.Text = “ “ Text2.Text = “ “ Text2.SetFocus End Sub Private Sub Text2_ KeyDown (KeyCode As Integer, Shi

20、ft As Integer) Text1.Text = Text1.Text + Chr (KeyCode - 4) End Sub 程序运行后，如果在 Text2文本框中输入 efghi，则 Text1文本框中的内容是_。 39 结构化程序设计包含 3种基本控制结构，其中 SCAN-ENDSCAN语句属于_结构。 40 数据库逻辑设计的主要工作是将 E-R图转换成指定 RDBMS中的【 】。 41 下面程序的运行结果是在窗体中显示的：运行后窗体上显示的是 _。 42 Private Sub Form_Activate() Forj=1 to 3 x=3 ForI=1 to 2 x=x+6 N

21、extI Nextj Print x End Sub 程序运行后，窗体上显示的结果为上 _。 43 当用 _方式打开文件时，如果对文件进行写操作，则写入的数据附加到原文件的后面。 44 在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1. Text=“VB程序设计 “ End Sub Private Sub Text1_Change() Picturel. Print “VB Programming“ End Sub 程序运行后，单击窗体，则在文本框中显示的内容是【 】，在图片框中显示的内容是【 】。 45 下面的程序是找

22、出两个正整数 a和 b，使得 a b、 a+ b=99、 a和 b的最大公约数是 3的倍数，并统计满足条件数对的个数。 Option Explicit Dim a As Integer, b As Integer, n As Integer, c As Integer Private Function Gcd (ByVal a As Integer, Byval b As Integer) As Integer do c=a Mod b: a=b=c Loop【 】 Gcd=a End Function Private Sub form_ Click() n=0 for a= 1 To 49

23、b=【 】 c= Gcd (a, b) if c Mod 3= 0 then 【 】 Print a, b, c End if Next a Print n End Sub 46 在窗体上画一个命令按钮 Command1，然后编写如下程序： Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 art(i)=i Next i x=InputBox(“请输入一个数字： “) If Val(x) 4 Then ReDim arr(4) arr(4)=x End If Me.Print(arr(4)-ar

24、r(3) End Sub 程序运行后，单击命令按钮，在输入对话框中输入 12，输出结果为【 】。 47 在一个窗体上有一个命令按钮， CmdMax。单击 CmdMax时，窗体上显示 “字体由小变大 ”，字号每次增加 2。请填空。 Private Sub Form_Load() Form1.Caption=“字体变化示范 ” CmdMax.Caption=“字体变大 ” End Sub Private Sub CmdMax_Click() 【 】 Form1.Print“字体由小变大 ” End Sub 48 语句 PopupMenu PMENU， 4 Or 2， PMENU3K中： 其中 PM

25、eNU表示【 】 49 以下程序段的输出结果是【 】。 num=0 Do While num =5 num=num+1 Loop Print num 50 对随机文件数据存取是以【 】为单位进行操作的。 VB 笔试模拟试卷 271答案与解析 1 【正确答案】 C 【试题解析】 对象的基本特点：标识唯一性、分类性、多态性、封装性和模块独立性。 2 【正确答案】 C 【试题解析】 对线性表进行顺序查找时，从表中的第一个元素开始，将给定的值与表中逐个元素的关键字进行比较，直到两者相符，查找到所要找的元素为止。在最坏情况下，要查找的元素是表的最后一个元素或查找失败，这两种情况都需要将这个元素与表中的所

26、有元素进行比较，因此比较次数为 n。 3 【正确答案】 C 4 【正确答案】 B 【试题解析】 将 E-R图转换成指定 RDBMS 中的关系模式是数据 库逻辑设计的主要工作。从 E-R图到关系模式的转换是比较直接的，实体和联系都可以表示成关系。 5 【正确答案】 D 【试题解析】 软件工程包括 3个要素，即方法、工具和过程。方法是完成软件工程项目的技术手段；工具支持软件的开发、管理和文档生成；过程支持软件开发的各个环节的控制、管理 6 【正确答案】 D 【试题解析】 物理设计阶段主要解决选择文件存储结构和确定文件存取方法的问题，包括：选择存储结构、确定存取方法、选择存取路径，确定数据的存放位置

27、。 7 【正确答案】 D 【试题解析 】 软件生命周期分为软件定义、软件开发及软件运行维护 3个阶段。本题中，详细设计、软件编码和软件测试都属于软件开发阶段；维护是软件生命周期的最后一个阶段，也是持续时间最长，花费代价最大的一个阶段。故选项 D正确。 8 【正确答案】 B 【试题解析】 选择，投影，连接是基本的关系运算。关联相当于逻辑连接、排序、索引、统计、更新、显示、打印、制表是一个应用系统所能支持的一系列功能，它们不是关系数据库管理系统能实现的专门关系运算。 9 【正确答案】 A 【试题解析】 由于数据的集成性使得数据可为多 个应用所共享，特别是在网络发达的今天，数据库与网络的结合扩大了数

28、据关系的应用范围。数据的共享自身又可极大地减少数据冗余性，不仅减少了不必要的存储空间，更为重要的是可以避免数据的不一致性。所谓数据的一致性是指在系统中同一数据的不同出现应保持相同的值，而数据的不一致性指的是同一个数据在系统的不同拷贝处有不同的值。 10 【正确答案】 D 【试题解析】 概念模型是现实世界到机器世界的一个中间层次，是人们对所涉及到的客观事物及其关系的理解，是对现实世界中的客观对象产生认识、抽象而得到的信息。 11 【 正确答案】 C 【试题解析】 滚动条控件有两个事件： Change事件在滚动框移动后发生； Scroll 事件在移动滚动框时发生，在单击滚动箭头或滚动条时不发生。

29、12 【正确答案】 D 13 【正确答案】 D 14 【正确答案】 A 15 【正确答案】 D 【试题解析】 每个菜单项都是一个控件，每个菜单项有且仅有一个 Click事件，菜单项的索引用来为用户建立的控件数组建立索引，可以不连续，也不一定从 1开始编号。 16 【正确答案】 B 【试题解析】 此题的考查点在 for循环，当最后一次执行完 Next的时候， i会越界。越界后是 len(s)+1，已经比 i的长度要长了。因此要对越界进行判断。 17 【正确答案】 A 【试题解析】 IFElse 语句 跟踪程序：在 IF语句中，因为 x=5 0，所以 Not X 0为假，执行 Else分支，即Y=

30、5+3=8 所以打印的结果应当为： X-Y=5-8=-3 Y-X=8-5=3。 18 【正确答案】 C 【试题解析】 LoadPicture()函数 在运行期间将图形文件装入窗体的 Picture属性、 Picture控件或 Image控件，如果窗体、图片框或图像控件中已有图形，则已有图形被新装入的图形覆盖。 例如： Picture1.Picture=LoadPicture(“图形文件名 “) 使用不带参数的 LoadPicture函数可以清除窗体、图片框及图像控件中的图形。例如： Picture1.picture=Loadpicture(“)或 Picture1.picture=Loadpi

31、cture() 19 【正确答案】 B 【试题解析】 Left(string,length)函数是字符串截取函数。功能是截取某字符串最左边的 “length”个字符，这里截取字符串为 “8765”。 Val(string)函数用于返回字符串中所含的数值，这里 “8765”返回的数值为 “8765”。 Mid(Str,p,n)函数是字符截取函数，功能是截取从第 p 个字符开始，向后取字符串的 n个 “Str”字符串中的字符。这里 Mid(A,4,2)为截取字符串 “54”。 “+”做字符串连接，这里将 “8765”和 “54”进行相连接运算。 20 【正确答案】 C 【试题解析】 本题考查使用

32、An-ay函数给数组元素赋值的应用。分析程序可知，是通过 For循环将数 组中的各个元素通过一定的公式进行运算。运算过程为：当i=5时， Arr(5)=5， S=5；当 i=4时， Arr(4)=4， S=45,当 i=3时， Arr(3)=3，S=345：当 i=2时， Arr(2)=2， S=2345；当 i=1时， Arr(1)=1， S=12345；当 i=0时，条件不满足退出循环，执行循环后面的语句 Print S因此，最后输出的值为“12345”。 21 【正确答案】 B 【试题解析】 Stretch 属性为 True时，图形要调整大小，以适应 Image控件的大小；当为 Fals

33、e时，表示 控件要调整大小以与图形相适应。 22 【正确答案】 D 【试题解析】 OptionButton(单选按钮 )的 Value属性应设置为 True或 False，而CheckBox(复选框 )的 Value属性应设置为 0、 1或 2(对应控件常数为vbUnchecked、 vbChecked 或 vbGraycd)。 23 【正确答案】 A 【试题解析】 AddItem的功能是向列表框添入一项数据。循环 100次，添入 100项。 24 【正确答案】 B 【试题解析】 本题的难点是 Static变量在程序中 的应用。 Static指定过程中的局部变量为 “静态 ”变量。在三次单击命

34、令按钮的计算过程中，局部变量 y的值每次都被 1赋值，结果为 6；而 “静态 ”变量 x的值在应用程序退出前，却一直保存在内存中，所以 “x=5+5+5=15”。 25 【正确答案】 D 【试题解析】 首先使用 Mid$函数取出带前导空白的 Basic，并使用 UCase将其转化为大写。然后使用 Rights函数取出带前导空白的 Programming。最后将三个字符串连接起来，结果就是 D。 26 【正确答案】 C 【试题解析】 KeyPress事件和 KeyDown 事件各参数的含义。 27 【正确答案】 B 【试题解析】 此程序的功能是对输入的整数在 fun 函数巾求出其每位数字的积，循

35、环结构的作用是对传来的数据进行位数的分解，分别得到个位、十位、百位等的数字，再将其累乘到变量 k中，并把 k的值作为函数的返回值，因此 234的 3位数字相乘的结果是 24。 28 【正确答案】 C 【试题解析】 在按键盘时，先触发的是 KeyDown 事件，再触发 KeyPress 事件。其中，当按字母键 “A”时， KeyDown 所得到的 KeyCode码 (KeyDown 事件的参数 )65与按字母键 “a”是相同的，而对 KeyPress 来说，字母键 “A”的 KeyAscii 为65，字母键 “a”的 KeyAscii 为 97。 29 【正确答案】 A 【试题解析】 MsgBo

36、x 函数格式为： MsgBox(Msg$， type%)， title$， helpfile， context) Msg$是一个字符串； type是一个整数值或符号常量； title是一个字符串，用来显示对话框的标题： helpfile是一个字符串变量或字符串表达式，用来表示帮助文件的名字 ； context是一个数值变量或表达式，用来表示相关帮助主题的帮助目录号。该题中信息框的标题是 “BBBB”。注意第 2项和第 3项参数之间的逗号不能省略。 30 【正确答案】 C 【试题解析】 在程序中， For循环执行了 3次：第 1次循环， i的值为 1，并赋值给 k，调用 sub1 过程，将 k

37、传地址传送给参数 n，在 sub1函数过程中，把 n 乘 2加 1赋值给 n， n 的值为 3，过程调用返回后， k的值为 3，将 k 加到 m中去， m的值为 3：同理第 2次循环， i的值为 2，过程调用并返回后，得到 k 的值为 5，加到 m中 ， m的值为 8；同理第 3次循环后， m的值为 15。循环结束时， i的值应为 4。 31 【正确答案】 C 【试题解析】 主调过程 Command1_Click 输出的是 Sec Proc(c， b， a)的返回值，调用过程 Sec Proc 时，主调过程分别把实参 c、 b、 a地址传给形参 x、 y、 z，此时在过程 Sec Proc中，

38、 Sec Proc=Fir Proc(a， c， b)+c。由此看出，程序段执行此语句时，将调用过程 Fir Proc。把实参 a、 c、 b 的地址分别传给形参 x、 y、 z，此时在过程 Fir Proc中， Fir Proc=2*x+y+3*z，所以 Fir Proc(a， c，b)=6+4+15=25， SecProc(a， c， b)=25+3=28。 32 【正确答案】 D 【试题解析】 RND函数产生一个小于 1，大于等于 0的随机数， INT 函数是求不大于参数的最大整数。选项 A的最大数是 1，选项 B的最大数是 5，选项 C的最小数是 0，只有选项 D能产生 1-6之间的整

39、数。 33 【正确答案】 D 【试题解析】 日期型数据是用来表示日期信息的，其格式为 mm/dd/yyyy 或者mm- dd-yyyy，它的取值范围是 1/1/100到 12/31/9999。任何可辨认的日期文本都可以赋值 给日期变量，日期文本必须以 “#”号括起来。 注意：字符串常量的书写格式。 34 【正确答案】 D 【试题解析】 在 Visual Basic中，系统提供了多种数据类型，有字符串类型、数值型、货币型、布尔型，日期型等，此外还有一种变体类型， Variant是一种特殊的数据类型， Variant变量中可以存放任何类型的数据，如数值、文本字符串、日期和时间等，向 Variant

40、变量赋值时不必进行任何转换，系统将自动进行必要的转换。如果 变量未经定义就直接使用，则该变量为 Variant类型。 35 【正确答案】 D 【试题解析】 控件数组是由一组相同类型的控件组成。它们共用一个控件名，具有相同的属性。当建立控件数组时，系统给每个元素赋一个惟一的索引号(Index)，通过属性窗口的 Index属性，可以知道该控件的下标是多少，第 1个下标是 0。控件数组适用于若干个控件执行的操作相似的场合，控件数组共享同样的事件过程。本题中的事件过程是通过 Index 确定用户按了哪个按钮。 36 【正确答案】 队列 【试题解析】 队列是一种特 殊的线性表，只允许在表的一端插入元素，

41、在表的另一端删除元素，插入元素的一端叫做 “队尾 ”，删除元素的一端叫做 “队头 ”，先插入的元素先被删除，是按先进先出的原则组织数据的。 37 【正确答案】 变换型 【试题解析】 典型的数据流类型有两种：变换型和事务型。 38 【正确答案】 ABCDE 39 【正确答案】 循环 40 【正确答案】 关系模式 41 【正确答案】 2 4 6 0.5 【试题解析】 “k =3 then a=2*k”的语句其作用已经覆盖了 “k =1 then a =2+k”和 “k =2 then a=2-k”的语句，所以当 k=1、 2、 3时， a分别为 “a=2*k=2、 4、6”。当 “k=4”时， “

42、a=2/4=0.5”。该题的难点就是关系运算符的应用。 42 【正确答案】 15 43 【正确答案】 追加 (或 Append) 【试题解析】 本题考查文件的打开方式。以追加的方式打开文件时，每次写入的记录存放在文件的末尾。 44 【正确答案】 VB程序设计 ,VB Programming 【试题解析】 程序运行后，如果单击命令按钮，将先触发窗体的 Click 事件，后触发文本框 Text1 的 Change事件，分别在文本框中显示 “Visual Basic程序设计 ”和在图片框中显示 “Vlsual Basic Programming”。 45 【正确答案】 until c=0或 whil

43、e c 0,99-a,n=n+1 【试题解析】 由求最大公约数的算法可知，当余数 c为零时， a为 a和 b 的最大公约数。因条件给定： “a+ b=99”，所以 “b=99-a”。 n 为累计数。 46 【正确答案】 12 【试题解析】 用 Redim语句重定义数组的维数时，原有维 数内的内容将被破坏。除非用 Redim Preserve来重新定义维数。 本题中由于输入值 x 4，动态数组在被重定义为包含 4个元素的数组后 (即 Redim arry(3)，此时 arry(3)=3)，重新被定义为包含 5个元素的数组，而重定义时并未用 Preserve关键字。故此时arry(3)=0(实际上

44、 arry(0)、 arry(1)、 arry(2)的值也都为 0，即 Integer类型变量的初始值 )。 47 【正确答案】 Form1.FontSize=Form1.FontSize+2 【试题解析】 决定字 体大小的是 FontSize属性，所以要改变字体的大小需要改变 FomSize的值。 emdMax按钮的作用是单击 cmdMax时，窗体上显示 “字体由小变大 ”，字号每次增加 2，所以第 1个空应填入的是 Furm1.Fon tSize=Form1.FontSize+2； cmdMin 按钮的作用是单击 cmdMin 时，窗体上显示“字体由大变小 ”，字号每次减小 2，所以第 2

45、个空填入的是 Form1.FontSize= Form1.FontSize=2。 48 【正确答案】 快捷菜单的顶级菜单名称 【试题解析】 PopupMenu 的其格式为：对象 PopupMenu 菜单名， Flags， X，Y， BoldCommand 49 【正确答案】 6 【试题解析】 只要指定的条件为 True，则会重复执行一系列的语句。本题中的循环只能当 num的值超过 5时才会终止，所以最终的 num的值为 6。 50 【正确答案】 一个记录 【试题解析】 从存储的角度看，顺序文件一般用来存放同类型或文本类型数据为宜。随机文件一般用来存放一组相关自定义类型的数据。 每组自定义类型数据由不同类型的基本类型数据组成。这样一组自定义的类型数据构成了一 个记录。一个记录用一个自定义变量名表示，称之为记录型变量。当向随机文件写入 (读取 )数据时，每次只可写入 (读取 )一个记录型变量，即写入 (读取 )一个记录。