当前位置:首页 > Visual Basic
全国计算机等级考试二级VB模拟试题20
答案
一、选择题(每题2分,共计70分) |
| 1.在下面关于线性表的叙述中,选出正确的一项____。 A、采用链接存储的线性表,必须占用一片连续的存储单元 B、采用顺序存储的线性表,便于进行插入和删除操作 C、采用链接存储的线性表,不必占用一片连续的存储单元 D、链接和顺序存储的线性表,都便于进行插入和删除操作 |
| A B C D |
| 2.设计一个判断表达式中左右括号是否配对的算法,采用____数据结构最佳。 A、队列 B、堆栈 C、二叉树 D、链表 |
| A B C D |
| 3.循环链表主要优点是____。 A、不再需要头指针了 B、已知某个结点的位置后,能够容易找到它的直接前趋; C、在进行插入、删除运算时、能更好地保证链表不断开; D、从表中任一结点出发都能扫描到整个链表。 |
| A B C D |
| 4.二分查找法适用于存储结构为____且按关键字排好序的线性表。 A、顺序存储 B、链接存储 C、顺序存储或链接存储 D、索引存储 |
| A B C D |
| 5.下列关于结构化设计原则的描述,错误的是 A、在块和进程的非正常出口处往往需要调用GOTO语句,使用GOTO语句使程序执行效率 提高,但是滥用GOTO语句确实有害,应该避免使用GOTO语句。 B、程序设计时应该自顶向下,逐步求精。 C、程序设计时,应该将复杂问题进行模块化,就是将程序设计的总目标分解为若干个 分目标,再进一步分解为具体的小目标。 D、在进行程序设计时,应该尽量在一行书写一条语句,尽量做到效率第一,清晰第二。 |
| A B C D |
答案
| 6.在软件研制过程中,CASE是 A、指计算机辅助系统工程 B、指CAD和CAM技术发展动力 C、指正在实验室用的工具 D、指计算机辅助软件工程 |
| A B C D |
| 7.在软件结构化设计中,好的软件结构设计应该力求做到 A、顶层扇出较少,中间扇出较高,底层模块低扇入 B、顶层扇出较高,中间扇出较少,底层模块高扇入 C、顶层扇入较少,中间扇出较高,底层模块高扇入 D、顶层扇入较少,中间扇入较高,底层模块低扇入 |
| A B C D |
| 8.在以下所列的条目中,____是数据库管理员(DBA)的职责。 1、负责管理企业的数据库资源 2、收集和确定有关用户的需求 3、设计和实现数据库并按需要修改和转换数据 4、为用户提供资料和培训方面的帮助 A、1和2 B、2和3 C、1和4 D、都是 |
| A B C D |
| 9.在关系数据库中,视图(view)是三级模式中的 A、内模式 B、模式 C、存储模式 D、外模式 |
| A B C D |
| 10.将E-R图转换成关系模式时,实体与联系都可以表示成 A、属性 B、关系 C、键 D、域 |
| A B C D |
答案
| 11.如果要在菜单中添加一个分隔线,则应将其Caption属性设置为 A、= B、* C、& D、- |
| A B C D |
| 12.如果X的值小于或等于Y的平方,则打印“OK”,表示这个条件的单行格式If语句是____。 A、If x≤y^2 Then Print "Ok" B、If x≤y^2 Print "Ok" C、If x<=y^2 Then "Ok" D、If x<=y^2 Then Print "Ok" |
| A B C D |
| 13.要使一个标签透明且不具有边框,则应____ A、将其BackStyle属性设置为0,BorderStyle属性设置为0 B、将其BackStyle属性设置为0,BorderStyle属性设置为1 C、将其BackStyle属性设置为1,BorderStyle属性设置为0 D、将其BackStyle属性设置为1,BorderStyle属性设置为1 |
| A B C D |
| 14.以下关于菜单的叙述中,错误的是 A、在程序运行过程中可以增加或减少菜单项 B、如果把一个菜单项的Enabled属性设置为False,则可删除该菜单项 C、弹出式菜单在菜单编辑器中设计 D、利用控件数组可以实现菜单项的增加或减少 |
| A B C D |
| 15.能够改变窗体边框线类型的属性是____ A、fontStyle B、BorderStyle C、BackStyle D、Border |
| A B C D |
答案
| 16.执行“工程”菜单中的____命令,可以添加一个标准模块。 A、添加过程 B、通用过程 C、添加窗体 D、添加模块 |
| A B C D |
| 17.如果X的值小于或等于Y的平方,则打印"OK",表示这个条件的单行格式If语句是 A、If x<=y2 Then Print"OK" B、If x<=y^2 Print"OK" C、If x<=y^2 Then"OK" D、If x<=y^2 Then Print"OK" |
| A B C D |
| 18.表达式Val(".123E2CD")的值是____ A、123 B、12.3 C、0 D、123E2CD |
| A B C D |
| 19.表达式Str(Len("123"))+Str(77.7)的值为____。 注意:“∪”表示空格 A、377.7 B、∪3∪77.7 C、80.7 D、12377.7 |
| A B C D |
| 20.为了把焦点移到某个指定的控件,所使用的方法是____。 A、SetFocus B、Visible C、Refresh D、GetFocus |
| A B C D |
答案
| 21.目录列表框的Path属性的作用是 A、显示当前驱动器或指定驱动器上的路径 B、显示当前驱动器或指定驱动器上的某目录下的文件名 C、显示根目录下的文件名 D、只显示当前路径下的文件 |
| A B C D |
| 22.以下关于图片框控件的说法中,错误的是 A、可以通过Print方法在图片框中输出文本 B、清空图片框控件中图形的方法之一是加载一个空图形 C、图片框控件可以作为容器使用 D、用Stretch属性可以自动调整图片框中图形的大小 |
| A B C D |
| 23.要使一个文本框具有水平和垂直滚动条,则应先将其属性设置为True,然后再将ScrollBar属性设置为____ A、0 B、1 C、2 D、3 |
| A B C D |
| 24.以下说法正确的是____。 A、任何时候都可以使用“工具”菜单下的“菜单编辑器”命令打开菜单编辑器 B、只有当某个窗体为当前活动窗体时,才能打开菜单编辑器 C、只有当代码窗口为当前活动窗口时,才能打开菜单编辑器 D、任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器 |
| A B C D |
| 25.Abs(-8)+Len("ABCD")的值是_____。 A、12 B、14 C、8ABCD D、-8ABCD |
| A B C D |
答案
| 26.设窗体上有一个列表框控件List1,且其中有若干列表项,则以下能表示当前被选中的列表项内容的是 A、List1.list B、List1.listIndex C、List1.Intdex D、List1.Text |
| A B C D |
| 27.如果在C盘当前文件夹下已存在名为StuData.dat的顺序文件,那么执行语句Open"StuData. dat" For Append As #1之后将____。 A、删除文件中原有内容 B、保留文件中原有内容,可在文件尾添加新内容 C、保留文件中原有内容,在文件头开始添加新内容? D、以上均不对 |
| A B C D |
| 28.设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为a1,且取消其“可见”属性。运行时,以下____事件 过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。 A、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single,Y As Single) If Button=2 Then PopupMenu al,2 End Sub B、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single,Y As Single) PopupMenu a1,0 End Sub C、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single,Y AS Single) PopupMenu al End Sub D、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,_ X As Single,Y As Single) If (Button=vbLeftButton)Or(Button=vbRightButton)Then PopupMenu al End Sub |
| A B C D |
| 29.以下程序用于在带垂直滚动条的文本框Text1中输出2到100之间的全部素数。 Private Sub Command1_Click( ) Text1.Text="" For N=2 To 100 K=_____ I=2 Flag=0 Do While I<=K And Flag=0 If N Mod I=0 Then Flag=1 Else I=I+1 Loop If Flag=0 then Text1.Text=Text1.Text & Str(N) & Chr(13) & Chr(10) End If Next N End Sub A、Int(Sqr(N)) B、Sqr() C、Int(N) D、N |
| A B C D |
| 30.设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x;y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是 A、10 5 B、20 5 C、20 40 D、10 40 |
| A B C D |
答案
| 31.设有两个窗体,第一个窗体中有两个命令按钮,第一个命令按钮用来控制显示第二个窗体,第二个命令按钮用来结束程序运行(两个按钮名称分别为Command1和Command2)。则以下选项中,对这两个命令按钮编写的事件过程正确的是_____。 A、Private Sub Command1_Click() Form2.Show End Sub Private Sub Command2_Click() End End Sub B、Private Sub Command1_Click() Show End Sub Private Sub Command2_Click() End End Sub C、Private Sub Command1_Click() Show End Sub Private Sub Command2_Click() End End Sub D、Private Sub Command1_Click() Show.Form2 End Sub Private Sub Command2_Click() End End Sub |
| A B C D |
| 32.在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click() n=Val(Text1.Text) If n\2=n/2 Then f=f1(n) Else f=f2(n) End If Print f;n End Sub Public Function f1(ByRef x) x=x*x f1=x+x End Function Public Function f2(ByVal x) x=x*x f2=x+x+x End Function 程序运行后,在文本框中输入6,然后单击命令按钮,窗体上显示的是 A、72 36 B、108 36 C、72 6 D、108 6 |
| A B C D |
| 33.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print ____ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: 1 12 123 1234 则在下划线处应填入的内容为 A、Right(c1,i) B、Left(c1,i) C、Mid(c1,i,1) D、Mid(c1,i,i) |
| A B C D |
| 34.窗体中新建立一个命令按钮(COMMAND1),其事件代码如下: Private Sub Command1_Click() Dim a(4) As Integer, b(4) As Integer For K = 0 To 2 a(K + 1) = Val(InputBox("请输入数据")) b(3 - K) = a(K + 1) Next K Print b(K) End Sub 窗体运行后,单击命令按钮,依次输入1、3、5,执行结果为___。 A、0 B、1 C、3 D、5 |
| A B C D |
| 35.在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() for I=1 To 4 For J=0 To I Print Chr$(65+I); Next J Next I End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容为是 A、BB CCC DDDD EEEEE B、A BB CCC DDDD C、B CC DDD EEEE D、AA BBB CCCC DDDDD |
| A B C D |
答案
二、填空题(每空2分,共计30分) | |
| 1.在一个循环队列中,队首指针指向队首元素的____。 | |
| 输入答案,中间不含空格: | |
| 2.一组记录的排序码为(46,79,56,38,40,84),则利用堆排序的方法建立的初始堆为____。 | |
| 输入答案,中间不含空格: | |
| 3.软件的详细设计,也称为模块设计,它要求设计人员为每一个程序模块确定所使用的 算法、____、接口细节的输入、输出数据等。 | |
| 输入答案,中间不含空格: | |
| 4.数据库系统中实现各种数据管理功能的核心软件称为____。 | |
| 输入答案,中间不含空格: | |
| 5.一个关系数据库是若干个相互关联的表,对关系数据库的操作是通过______实现的; 用户或设计人员不必涉及数据库复杂的物理细节,这彻底实现了数据独立性。 | |
| 输入答案,中间不含空格: | |
答案
| 6.在对象的MouseDown和MouseUP事件过程中,参数Button的值为1、2、4时,其中4代表____按钮。 |
| 输入答案,中间不含空格: |
| 7.执行以下Command1的Click事件过程在窗体上显示____。 Option Base 0 Private Sub Command1_Click( ) Dim a a=Array("a","b","c","d","e","f","g") Print a(1);a(3);a(5) End Sub |
| 输入答案,中间不含空格: |
| 8.全局变量必须在____模块中定义,所用的语句为____。 |
| 输入答案,中间不含空格: |
| 9.上一题 第 2 空 |
| 输入答案,中间不含空格: |
| 10.表达式6^2 Mod 50\3^2的值是____。 |
| 输入答案,中间不含空格: |
答案
| 11.有如下事件过程: Private Sub Form_MouseDown(Button As Integer,Shift As Integer, _ x As Single,y As Single) IF Button=2 Then PopupMenu popformat END IF END Sub 如果运行程序时,按下鼠标右键,程序则____。 |
| 输入答案,中间不含空格: |
| 12.窗体上有一个命令按钮和一个文本框,命令按钮事件代码如下: Private Sub Command1_Click() X = 1 y = 1 Text1.Text = "" For I = 1 To 3 F = X + y X = y y = F Text1.Text = Text1.Text + Str(y) Next I End Sub 该程序运行后,文本框的内容是____。 |
| 输入答案,中间不含空格: |
| 13.在窗体中添加两个命令按钮,其名称(Name属性)分别为Command1和Command2,窗体加载时要求Command1不可用,Command2可用;单击Command2后,Command1可用。请在____处将程序补充完整。 Private Sub Command2_Click() ____ End Sub Privat Sub Form_Load() ____ End Sub |
| 输入答案,中间不含空格: |
| 14.上一题 第 2 空 |
| 输入答案,中间不含空格: |
| 15.表达式5*(7 MOD 3)*1/2的值是 ____. |
| 输入答案,中间不含空格: |