上海花千坊

试题

3月全国计算机等级考试二级VB笔试真题

时间:2024-12-05 10:59:37 试题 我要投稿
  • 相关推荐

3月全国计算机等级考试二级VB笔试真题

  在日复一日的学习、工作生活中,许多人都需要跟考试真题打交道,借助考试真题可以为主办方提供考生某方面的知识或技能状况的信息。那么一般好的考试真题都具备什么特点呢?以下是小编为大家整理的3月全国计算机等级考试二级VB笔试真题,欢迎阅读与收藏。

3月全国计算机等级考试二级VB笔试真题

  3月全国计算机等级考试二级VB笔试真题 1

  一、 选择题

  (1)下列叙述中正确的是(B)

  A)算法的效率只与问题的规模有关,而与数据的存储结构无关

  B)算法的时间复杂度是指执行算法所需要的计算工作量

  C)数据的逻辑结构与存储结构是一一对应的

  D)算法的时间复杂度与空间复杂度一定相关

  (2)在结构化程序设计中,模块划分的原则是(D)

  A)各模块应包括尽量多的功能

  B)各模块的规模应尽量大

  C)各模块之间的联系应尽量紧密

  D)模块内具有高内聚度、模块间具有低耦合度

  (3)下列叙述中正确的是(A)

  A)软件测试的主要目的是发现程序中的错误

  B)软件测试的主要目的是确定程序中错误的位置

  C)为了提高软件测试的效率,最好由程序编制者自己来完成软件的测试工作

  D)软件测试是证明软件没有错误

  (4) 下面选项中不属于面向对象程序设计特征的是(C)

  A)继承性

  B)多态性

  C)类比性

  D)封装性

  (5) 下列对队列的叙述正确的是(D)

  A)队列属于非线性表

  B)队列按“先进后出”原则组织数据

  C)队列在队尾删除数据

  D)队列按“先进先出”原则组织数据

  (6) 对下列二叉树(C)

  A

  B C

  D E F X

  Y Z

  进行前序遍历的结果为

  A)DYBEAFCZX

  B)YDEBFZXCA

  C)ABDYECFXZ

  D)ABCDEFXYZ

  (7)某二叉树中有n个度为2的结点,则该二叉树中的叶子结点数为(A)

  A)n+1

  B)n-1

  C)2n

  D)n/2

  (8)在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是(B)

  A)并

  B)交

  C)投影

  D)笛卡儿乘积

  (9)在E—R图中,用来表示实体之间联系的图形是(C)

  A)矩形

  B)椭圆形

  C)菱形

  D)平行四边形

  (10)下列叙述中错误的是(A)

  A)在数据库系统中,数据的物理结构必须与逻辑结构一致

  B)数据库技术的根本目标是解决数据共享问题

  C)数据库技术是指己有数据管理系统的基础上建立数据库

  D)数据库系统需要操作系统的支持

  (11)下面可以正确定义2个整形变量和1个字符串变量的语句的是(D)

  A)Dim n,m AS Interger,s AS String

  B)Dim a%,b$,c AS String

  C)Dim a AS Integer,b,c AS String

  D)Dim x%,y AS Integer,z AS String

  (12)下列表述中不能判断x是否为偶数的`是(D)

  A)x/2=Int(x/2)

  B)x Mod 2=0

  C)Fix(x/2)=x/2

  D)x\2=0

  13)设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是(B)

  A)窗体的Click事件过程的过程名是Myform_Click

  B)命令按钮的Click事件过程名是C1_Click

  C)命令按钮的Click事件过程的过程名是Command1_Click

  (14)设窗体上有1个滚动条,要求单击滚动条右端的◢按钮一次,滚动条移动一定的刻度值,决定此刻度的属性是(C)

  A)Max

  B)Min

  C)SmallChange

  D)LargeChang

  (15)1个二维数组可以存放1个矩形.在程序开始有语句Option Base 0,则下面定义的数组中正好可以存放1个4*3矩阵(即只有12个元素)的是(B)

  A)Dim a(-2 To 0,2) AS Integer

  B)Dim a(3,2) AS Ingeger

  C)Dim a(4,3)AS Ingeger

  D)Dim a(-1 To -4,-1 To -3)AS Ingeger

  (16)若设置了文本框的属性PasswordChar=”$”,则运行程序时向文本框中输入8个任意字符后,文本框中显示的是(A)

  A)8个”$”

  B)1个”$”

  C)8个”*”

  D)无任何内容

  (17)设在窗体上有1个名称为Combo1的组合框,含有5个项目,要删除最后一项,正确的语句是(B)

  A)Combo1.RemoveItem Combo1.Text

  B) Combo1.RemoveItem4

  C) Combo1.RemoveItem Combo1.ListCount

  D) Combo1.RemoveItem5

  (18)工程中有2个窗体,名称分别为Form1.Form2,Form1为启动窗体,该窗体上有命令按钮Command1,要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是(A)

  A)Private Sub Command1_Click( )  B) Private Sub Command1_Click( )

  Form2.Show          Form2.Visible

  End Sub            End Sub

  C) Private Sub Command1_Click( )   D)Private Sub Command1_Click( )

  Load Form2           Form2.Load

  End Sub            End Sub

  (19)若在某窗体模块中有如下事件过程(D)

  Private Sub Command1_Click(Index AS Integer)

  ……

  End Sub

  则以下叙述中正确的是

  A) 此事件过程与不带参数的事件过程没有区别

  B) 有1个名称为Command1的窗体,单击此窗体则执行此事件过程

  C) 有1个名称为Command1的空件数组,数组中有多个不同类型控件

  D) 有1个名称为Command1的空件数组,数组中有多个相同类型控件

  (20)以下循环语句中在任何情况下都至少执行一次循环体的是(C)

  A)Do While <条件> B)While <条件>

  循环体 循环体

  Loop Wend

  C)Do D)Do Until <条件>

  循环体 循环体

  Loop Until <条件> Loop

  (21)在窗体上有1个名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序总应使用的语句是(A)

  A)Cd1.Action=2

  B)Cd1.Action=1

  C)Cd1.ShowSave=Ture

  D)Cd1.ShowSave=0

  (22)下面关于菜单的叙述中错误的是(B)

  A)各级菜单中的所有菜单项的名称必须唯一

  B)同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同

  C)弹出式菜单也用菜单编辑器编辑

  (23)已知有下面的过程(D)

  Private Sub proc1(a As Integer,b As String,Optional x As Boolean)

  ……

  End Sub

  正确调用此过程的语句是

  A)Call procl(5)

  B)Call proc1 5,”abc”,False

  C)proc1(12,”abc”,True)

  D)proc1 5, “abc”

  (24)在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮,要求在程序执行时,每单击命令按钮一次,文本框向右移动一定距离。下面能够正确实现上述功能的程序是(C)

  A)Private Sub Command1_Click()   B) Private Sub Command1_Click()

  Text1.Left=100       T  ext1.Left= Text1.Left-100

  End Sub           End Sub

  C)Private Sub Command1_Click()   D) Private Sub Command1_Click()

  Text1.Move.Text.Left+100        Text1.Move.Text.Left

  End Sub            End Sub

  (25)某人创建了1个工程,其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是(A)

  A)在工程属性对话框中把“启动对象”设置为Form2

  B)在Form1的Load事件过程中加入语句 Load Form2

  C)在Form2的Load事件过程中加入语句Form2.Show

  D)在Form2的TabIndex属性设置为1,把Form1的TabIndex属性设置为2

  (26)窗体上有1个名称为Text1的文本框和1个名称为Command1的命令按钮。要求程序运行时,单击命令按钮,就可以把文本框中的内容写到文件out.txt中,每次写入的内容附加到文件原有内容之后。下面能够实现上述功能的程序是(C)

  A)Private Sub Command1_Click() B) Private Sub Command1_Click()

  Open “out.txt” For Inpit As#1 Open “out.txt” For Outpit As#1

  Print#1,Text1.Text         Print#1,Text1.Text

  Close#1            Close#1

  End Sub              End Sub

  C) Private Sub Command1_Click() D) Private Sub Command1_Click()

  Open “out.txt” For Append As#1 Open “out.txt” For Random As#1

  Print#1,Text1.Text            Print#1,Text1.Text

  Close#1                         Close#1

  End Sub                  End Sub

  (27)为计算1+3+5+……+99的值,某人编程如下

  k=1

  s=0

  While k<=99

  k=k+2 : s=s+k

  Wend

  Print s

  在调试时发现运行结果有错误,需要修改。下列错误原因和修改方案中正确的是(D)

  A)While …Wend循环语句错误,应改为For k=1 To 99 …Next k

  B)循环条件错误,应改为Whlie k<99

  C)循环前的赋值语句k=1错误,应改为k=0

  D)循环中两条赋值语句的顺序错误,应改为s=s+k : k=k+2

  (28)下面程序在调试时出现了死循环

  Private Sub Command1_Click()

  n=InputBox(“请输入一个整数”)

  Do

  If n Mod 2=0 Then

  n=n+1

  Else

  n=n+2

  Else If

  Loop Until n=1000

  End Sub

  下面关于死循环的叙述中正确的是(D)

  A)只有输入的n是偶数时才会出现死循环,否则不会

  B)只有输入的n是奇数时才会出现死循环,否则不会

  C)只有输入的n是大于1000的整数时才会出现死循环,否则不会

  D)输入任何整数都会出现死循环

  (29)在窗体上有1个名称为CommonDialog1的通用对话框和1个名称为Command1的命令按钮,以及其他一些控件。要求在程序运行时,单击Command1按钮,则显示打开文件对话框,并在选择或输入了1个文件名后,就可以打开该文件。以下是Command1_Click事件过程的两种算法

  算法1:

  Private Sub Command1_Click()

  CommonDialog1.ShowOpen

  Open CommonDialog1.FileName For Input As#1

  End Sub

  算法2:

  Private Sub Command1_Click()

  CommonDialog1.ShowOpen

  IfCommonDialog1.FileName<>””Then

  Open CommonDialog1.FileName For Input As#1

  End If

  End Sub

  下面关于这两种算法的叙述中正确的是(B)

  A) 显示打开文件对话框后若未选择或输入任何文件名,则算法2会出错,算法1不会

  B) 显示打开文件对话框后若未选择或输入任何文件名,则算法1会出错,算法2不会

  C) 两种算法的执行结果完全一样

  D) 算法1允许输入的文件名中含有空格,而算法2不允许

  (30)窗体上有1个名称为List的列表框,其中已经输入了若干个项目(如图所示):还有2个文本框,名称分别为Text1、Text2, 1个名称为  Command1的命令按钮,并有以下程序

  Private Sub Command1_Click()

  Dim str As String, s As String, k As Integer

  s=Text1

  Str=””

  For k=List1.ListCount-1 to 0 Step-1

  If InStr(List.List(k),s)>0 then

  str=str&List.List(k)&” ”

  End If

  Next k

  If str=””Then

  Text2=”没有匹配的项目”

  Else

  Text2=str

  End If

  End Sub

  程序运行时,在Text1中输入“京”,单击命令按钮,则在Text2中显示的内容是(C)

  A) 京

  B) 北京 南京

  C) 南京

  D) 没有匹配的项目

  (31)在窗体上画1一个名称为Command1的命令按钮,并编写以下程序

  Private Sub Command1_Click()

  Print fun(“ABCDEFG”)

  End Sub

  Function fun(st As String) As String

  stlen=Len(st)

  temp=””

  For k

  fun=temp

  End Function

  程序运行时,单击命令按钮,则窗体上显示的是(B)

  A)ABCDEFG

  B)AGBFCE

  C)GFEDCBA

  D)AGBFCED

  (32)在窗体上先后画2个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片(见图1),且将banana.DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖拽到Picture1中(见图2)。能实现此功能的事件过程是(C)

  A) Priate Sub Form_DragDrop(Source As Control,X As Single,Y As Single banana.Move Picture1.Left+X,Picture1.Top+Y)

  End Sub

  B)Private Sub banana _DragDrop(Source As Control,X As Single,Y As Single )

  Source.Move Picture1.Left+X.Picture1.Top+Y

  End Sub

  C) B)Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single )

  Source.Move Picture1.Left+X.Picture1.Top+Y

  End Sub

  D) B)Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single )

  banana.Move banana.Left+X, banana.Top+Y

  End Sub

  (33)在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程

  Option Base 1

  Pribate Sub Command1_Click()

  Dim a(5.5) As Integer

  For i=1 To 5

  a(I,j)*5\10

  Next j

  Next i

  S=0

  For i=1 To 5

  S=s+a(i,i)

  Next i

  Print s

  End Sub

  程序运行后,单击命令按钮,输出结果是(A)

  A) 15

  B)13

  C)11

  D)9

  

  (34)在窗体上从左到右有Text1、Text2两个文本框(见图),要求程序运行时,在Text1中输入1个分数后按回车键,则判断分数的合法性,若分数为0~100中的1个数,周围光标移到Text2中;否则光标不动,并弹出对话框显示“分数错”,下面程序中正确的是(D)

  A)Private Sub Text1__KeyPress(KeyAscii AS Integer)

  If KeyAscii=13 Then ‘回车符的ACSII码是13

  a=Val(Text1)

  If a>=0 or a<=100 Then

  Text2.SetFocus

  Else

  Text1. SetFocus ; MsgBox(“分数错”)

  End If

  End If

  End Sub

  B) Private Sub Text1__KeyPress(KeyAscii AS Integer)

  If KeyAscii=13 Then ‘回车符的ACSII码是13

  a=Val(Text1)

  If a>=0 And a<=100 Then

  Text1.SetFocus

  Else

  Text2. SetFocus ; MsgBox(“分数错”)

  End If

  End If

  End Sub

  C) Private Sub Text1__KeyPress(KeyAscii AS Integer)

  If KeyAscii=13 Then ‘回车符的ACSII码是13

  a=Val(Text1)

  If a<0 and="" a="">100 Then

  Text2.SetFocus

  Else

  Text1. SetFocus ; MsgBox(“分数错”)

  End If

  End If

  End Sub

  D) Private Sub Text1__KeyPress(KeyAscii AS Integer)

  If KeyAscii=13 Then ‘回车符的ACSII码是13

  a=Val(Text1)

  If a>=0 And a<=100 Then

  Text2.SetFocus

  Else

  Text1. SetFocus ; MsgBox(“分数错”)

  End If

  End If

  End Sub

  (35)在窗体上画2个命令按钮,名称分别为Command1、command2,并编写如下程序

  Const n=5,m=4

  Dim a(m,n)

  Private Sub Command1_Click()

  K=1

  For i=1 To m

  For j=1 To n

  a(i,j)=k

  k=k+1

  Next j

  Next i

  Private Sub Command2_Click()

  Summ=0

  For i=1 To m

  For j=1 To n

  If i=1 Or i=m Then

  Summ=summ+a(i,j)

  Else

  If j=I Or j=n Then

  Summ=summ+a(i,j)

  End If

  End If

  Next j

  Next i

  Print summ

  End Sub

  过程Command1_Click()的作用是二维数组a 中存放1个 m行n列的矩阵;过程Command2_Click()的作用是(A)

  A) 计算矩阵外围一圈元素的累加和

  B) 计算矩阵除外一圈以外的所有元素的累加和

  C) 计算矩阵第1列和最后一列元素的累加和

  D) 计算矩阵第1行和最后一行元素的累加和

  二、填空题(每空2分,共30分)请将每一个空的正确答案写在答题纸上[1]~[15]序号的横线上,答在试卷上,答在试卷上不得分,

  注意:以命令关键字填空的必须写完整

  (1) 在深度为7的满二叉树中,度为2的结点个数为___63_____。

  (2) 软件测试分为白箱(盒)测试和黑箱(盒)测试,等价类划分法属于__黑箱(或黑盒) 测试。

  (3) 在数据库系统中,实现各种数据管理功能的核心软件称为 数据库管理系统(DBMS)_____。

  (4) 软件生命周期可分为多个阶段,一般分为定义阶段、开发阶段和维护阶段。编码和测试属于 开发_____阶段。

  (5)在结构化分析使用的数据流图(DFD)中,利用 数据字典 对其中的图形元素进行确切解释。

  (6)1+ + + +…….n  最大的n。请填空

  Private Sub Command1__Click()

  Dim s ,m,n AS Integer

  m=Val(InputBox(“请输入一个大于100的整数”))

  n= 0

  s=0

  Do While s    N=n+1

  S=s+n*n

  Loop

  Print “满足不等式的最大n是 n-1

  End Sub

  (7)下面程序的功能是把文件file11.txt中重复字符去掉后(即若有多个字符相同,则只保留1个)写入文件file2.txt。请填空。

  Private Sub Command1__Click()

  Dim inchar AS String,temp AS String,outchar AS String

  Outchar=” ”

  Open=”file1.txt” For Input AS #1

  Open=”file2.txt” For Output AS #2

  n=LOF( 1 )

  inchar=Input$(n,1)

  For k=1 To n

  temp=Mid(inchar,k,1)

  If InStr(outchar,temp)= 0 Then

  outchar=outchar & temp

  End If

  Next k

  print #2, outchar

  close #2

  close #1

  End Sub

  (8)在窗体上先画1个名为Text1的文本框和平个名为Label1的标签,再画1个名为OP1的有4个单选按钮数组,其Index属性按季度顺序为0∽3(见图1)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击1个单选按钮,则Text1中显示相应季度的销售总额,并把相应的文字显示在标签上。图2是单击“第3季度”单选按钮产生的结果。请填空。

  Dim sales(12) As Long

  Private Sub Form__Load()

  open “sales.txt” For Input AS #1

  For k=1 To 12

  Input #1,sales(k)

  Next k

  Close #1

  End Sub

  Private Sub Op1_Click (Index, AS Integer)

  Dim sum AS Long ,k AS Ingeger,month AS Ingeger

  sum=0

  month=Index* 3

  For k=1 To 3

  month=month+1

  sum=sum+sales(month)

  Next k

  Label1.Caption=Opl(Index). Caption & “销售总额:”

  Text1=sum

  End Sub

  (9)某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False

  Function Prime(a As Integer)AS Boolean

  Dim k As Interger,isprime AS Boolean

  If a<2 Then

  isprime=False

  Else

  isprime=True

  k=2

  Do While k    If a Mod k=0 Then

  isprime=False

  ELSE

  k=k+1

  End IF

  LOOP

  End If

  prime=isprime

  End Function

  在测试时发现有1个非素数也被判断为素数,这个错判的数是 4

  3月全国计算机等级考试二级VB笔试真题 2

  填空题(每题2分,计20分)

  1.在Visual Basic中可以建立( )菜单和( )菜单。

  2.建立打开文件、颜色对话框所使用的方法分别为( )和( )。如果使用action属性,则应把该属性的'值分别设置为( )和( )。

  3.数学表达式 的VB算术表达式为( )。

  4.表达式Ucase(right(“abcdefgh”,5)的值是( )。

  5.以下程序的功能是:从键盘上输入学生的考试分数,统计并输出最高分数和最低分,当输入负数时结束输入,输出结果。请填空。

  Private Sub Form_click()

  Dim x As Single, amax As Single, amin As Single

  x = InputBox("enter a score")

  amax = x

  amin = x

  Do While x > 0

  If () Then

  amax = x

  End If

  If () Then

  amin = x

  End If

  x = InputBox("enter a score")

  Loop

  Print "max="; amax, "min="; amin

  End Sub

  【答案】

  1.下拉式弹出式

  2.Showopen showcolor 1 3

  3.Sqr(x)/(2*a)+3^2-3*x

  4.DEFGH

  5.amaxx

  3月全国计算机等级考试二级VB笔试真题 3

  1、VB是一种面向对象的程序设计语言,( )不是面向对象系统所包含的三要素。

  A.属性 B.变量 C.方法 D.事件

  2.不论何控件,共同具有的是( )属性。

  A.Caption B.Text C. Name D.ForeColor

  3. 程序代码如下:

  Command1.Caption=”确定”,则Command1、Caption、“确定”分别代表( )

  A.属性、对象、值 B.对象、值、属性

  C.对象、方法、属性 D.对象、属性、值

  4.下面( )是不合法的整型常数。

  A.278 B. &O278 C. &H278 D. 278%

  5.为了给x、y、z三个变量赋初值1,下面正确的赋值语句是( )。

  A.x=y=z=1 B.x=1,y=1,z=1

  C.x=1:y=1:z=1 D.xyz=1

  6.赋值语句:a=123+Mid(“123456”,3,2)执行后,变量a中的值是( )。

  A.”12334” B.12334 C.157 D.123

  7. 数学关系3≤x<10表示成正确的VB表达式为( )

  A、3<=x<10 B、3<=x AND x<10

  C、x>=3 OR x<10 D、3<=x AND <10

  8.产生[10,37]之间的随机整数的VB表达式( )

  A.Int(Rnd(1)*27)+10 B.Int(Rnd(1)*28)+10

  C.Int(Rnd(1)*27)+11 D.Int(Rnd(1)*28)+11

  9. 表达式16/4-2^5*8/4 MOD 52的值为( )。

  A.20 B.14 C.4 D.2

  10.对命令按钮的Picture属性装入.bmp图形文件后,命令按钮上并没有显示图形,原因是没有对( )属性设置为1。

  A.MousePictrue B.Style

  C.DownPicture D.DisabledPicture

  11.下列对象中不能作为容器的控件是( )。

  A.窗体 B. PictureBox控件

  C.Image控件 D. Frame控件

  12.下面程序段运行后,显示结果是( )。

  Dim x

  If x Then Print x Else Print x+1

  A.0 B.1 C.-1 D.显示出错信息

  13.循环语句For i= -3.5 To 5.5 Step -0.5的循环次数是( )。

  A.20 B.19 C.18 D.0

  14.如下数组声明语句Dim a(3,-2 to 2,5) As Long,则数组a包含元素的个数是( )。

  A.120 B.75 C.60 D.13

  15.决定组合框样式的属性是( )。

  A.List B.Text C.Style D.Caption

  16.滚动条的( )属性用于返回或设置滚动条的当前值。

  A.Value B.Max C.Min D.Data

  17.下面子过程语句说明合法的是( )。

  A.Function f1%(f1%) B.Function f1(ByVal n%)

  C.Sub f1(Byval n%( )) D.Sub f1(n%) As Integer

  18.在过程中定义的变量,若希望在离开该过程后,还能保存过程中局部变量的值,则应使用( )关键字的在过程中定义局部变量。

  A.Static B.Public C.Private D.Dim

  19.下列控件中没有Caption属性的是( )。

  A.框架 B.单选按钮 C.列表框 D.复选框

  20. 以下不属于键盘事件的是( )

  A.KeyDown B. KeyUp C. Unload D. KeyPress

  21.下列关于菜单的说法,错误的是( )。

  A.每个菜单项都是一个控件,与其它控件一样也有自己的属性和事件

  B.菜单项的快捷键不能任意设置

  C.在程序运行时,如果菜单项的Enabled属性为False,则该菜单项编程灰色,不能被用户选择

  D.除了Click事件之外,菜单项还能响应其它的事件,如DblClick

  22.下列关于通用对话框的叙述中,错误的是( )。

  A.通用对话框可以用来制作和显示“帮助”对话框

  B.CommonDialog1.ShowFont显示“字体”对话框

  C.在“打开”或“另存为”对话框中,用户选择的文件名可以经FileTitle属性返回

  D.在“打开”或“另存为”对话框中,用户选择的文件名及其路径可以经FileName属性返回

  23. 指令“Circle(1000,1000),500,-6,-3”将绘制( )。

  A.画圆 B.椭圆 C.扇形 D.圆弧

  24.假如列表框(List1)有四个数据项,把数据项“数据库原理”添加到列表框的最后,应使用( )语句。

  A.List1.AddItem “数据库原理”,List1.ListCount

  B.List1.AddItem “数据库原理”,List1.ListCount-1

  C.List1.AddItem 3,“数据库原理”

  D.List1.AddItem “数据库原理”,3

  25.VB提供了结构化程序设计的`三种基本结构,三种基本结构是( )。

  A.递归结构、选择结构、循环结构

  B.选择结构、过程结构、顺序结构

  C.过程结构、输入、输出结构、转向结构

  D.选择结构、循环结构、顺序结构

  26.在一个多窗体程序中,Form1是启动窗体,当程序运行后要想显示Form2窗体,正确的语句是( )。

  A.Show Form2 B.Form2.show C.Load Form2 D.Form2.Load

  27.要从磁盘上读入一个文件名为“c: 1.txt”的顺序文件,下列( )正确。

  A.f=”c: 1.txt” B.f=”c: 1.txt”

  Open “f” For Input As #1 Open f For Input As #1

  C.Open ”c: 1.txt”For output As #1 D.Open c: 1.txt For input As #1

  28.假定有如下事件过程:

  Private Sub Form_MouseDown(Button as Integer,Shift as Integer, X as Single,Y as Single)

  If Button=2 Then PopupMenu PopForm

  End Sub

  则以下描述中错误的是( )。

  A.该过程的功能是弹出一个菜单

  B.popForm是在菜单编辑器中定义的弹出式菜单的名称

  C.参数X、Y指明鼠标的当前位置

  D.Button=2表示按下的是鼠标左键

  29.Print #1,Str1$中的Print是( ).

  A.在窗台上显示的方法 B.文件的写语句

  C.子程序明 D.以上均不是

  BCDBC CBBCB CBDAC ABACC DACAD BBDBC

  3月全国计算机等级考试二级VB笔试真题 4

  填空题(每空1分,共20分)

  1.VB是一种面向 [ 1 ] 的可视化程序设计语言,采取了[ 2 ]的编程机制。

  2.算术表达式 |x+y|+35 写成VB表达式的形式为 [3 ] 。

  3.使文本框可以获得焦点的方法是 [ 4 ] 。

  4.Inputbox函数的返回值是 [5] 类型,Msgbox函数的返回值是 [6] 类型。

  5.在调用自定义函数时,参数的传递有 [ 7 ] 和 [ 8 ] 两种形式。

  6.在如下数组声明语句中 Dim s(4,4) As Integer,第一个数组元素的引用形式是 [9 ] 。

  7.如果要每隔0.5 s触发一个Timer事件,则Interval属性应设置为 [ 10 ] 。

  8.单选按钮和复选框都有Value属性,但二者该属性值的类型不一样,其中单选按钮该属性值类型为 [ 11 ] ,复选框该属性值类型为 [ 12 ] 。

  9.要在程序中显示通用对话框,要对CommonDialog控件的 [ 13 ] 属性赋以正确的值。

  10.VB提供了三种访问文件的`模式,按照访问模式可以把文件分为顺序文件、 [ 14 ] 和二进制文件。

  11.使用Line方法画矩形,必须在指令中使用关键字 [ 15 ] 。

  12.窗体上有一命令按钮,程序运行时,决定该按钮是否可用应设置的属性是 [ 16 ] ,决定该按钮是否显示应设置的属性是 [ 17 ] 。

  13.VB程序设计语言具有结构化程序设计的三种基本结构,即 [18 ]、 [19 ] 、[20 ] 。

  答案:

  [1]对象[2] 事件驱动[3]Abs(x+y)+3^5[4]SetFocus

  [5]字符型[6] 数值(整型)[7] 传值[8] 传址

  [9]S(0,0)[10]500ms[11] 逻辑型[12] 数值型(整型)

  [13]Action[14]随机文件[15]B[16]Enabled

  [17]Visible[18]顺序结构[19] 选择结构[20]循环结构

【3月全国计算机等级考试二级VB笔试真题】上海花千坊相关的文章:

2006年9月全国计算机等级考试二级VB笔试真题10-09

2006年上半年全国计算机等级考试二级VB笔试真题10-02

全国计算机等级考试二级VB笔试真题参考答案(完整版)11-26

全国计算机等级考试二级C++笔试真题10-11

全国计算机等级考试二级VFP笔试真题及答案11-26

全国计算机二级VB考试真题07-31

计算机等级考试二级ACCESS笔试真题10-06

2012年3月全国计算机等级考试二级VB考试真题11-10

2006年9月全国计算机等级考试二级VB笔试真题参考答案08-11