试题

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

时间:2024-07-08 14:25:21 试题 我要投稿
  • 相关推荐

2013年3月全国计算机二级考试VB真题

  一、单选题。

2013年3月全国计算机二级考试VB真题

  (1)下列数据结构中,属于非线性结构的是

  (2)在下列链表中,能够从任意一个结点出发直接访问到所有结点的是

  (3)下列与栈结构有关联的是

  (4)下面对软件特点描述不正确的是

  (5)下面属于黑盒测试方法的是

  (6)下面不属于软件设计阶段任务的是

  (7)数据库管理系统是

  (8)在E-R图中,表示实体的图元是

  (9)有两个关系R和T 如下

  R T

  A B C A C

  a 1 2 a 2

  b 4 4 b 4

  c 2 3 c 3

  d 3 2 d 2

  则由关系R得到关系T的操作是

  (10)对图书进行编目时,图书有如下属性:ISBN书号,书名,作者,出版社,出版日期。能作为关键字的是

  (11)下列关于Visual Basic标准模块的描述中,错误的是

  (12)下列变量名中合法的是

  (13)表达式 66 \ 8 mod 5 & "avg" 的值是

  (14)下列能正确计算s=1+2+…… +100的程序段是

  (15)设有如下程序:

  Private Sub Form_Click()

  a = 10: b = 20

  x = a = b

  Print x

  End Sub

  程序运行后,单击窗体,输出结果为

  (16)在面向对象的程序设计中,对象可以执行的操作和可被对象识别的动作分别被称为

  (17)下列说法中,错误的是

  (18)设有如下程序:

  Private Sub Command1_Click()

  Dim i As Integer, j As Integer

  For i = 1 To 10

  i = i + j

  j = j + 1

  Next i

  End Sub

  程序运行后,单击命令按钮Command1,循环执行的次数为

  (19)设有如下程序:

  Private Sub Command1_Click()

  Dim m As Integer, n As Integer

  m = 1

  For n = 1 To 5

  m = m * n

  If m > 15 Then

  Exit For

  Else

  n = n + 1

  End If

  Next n

  Print m; n

  End Sub

  程序运行后,单击命令按钮Command1,输出结果为

  (20)设有如下程序:

  Private Sub Form_Click()

  Dim a, k As Integer

  Dim n As Integer, s As Integer

  a = Array(1, 1, 1, 2, 2, 2)

  For k = LBound(a) To UBound(a)

  n = n + k

  s = s + a(k)

  Next

  Print n; s

  End Sub

  程序运行后,如果单击窗体,则在窗体上输出的内容为:

  (21)窗体上有一个文本框,用于接收正整数。为保证输入数据的合法性  (即正整数),可以在该数据输入结束后准备继续其他操作时进行数据的合法性检查。为实现上述目的,应选用的事件是

  (22)设有如下程序:

  Private Sub Command1_Click()

  Dim a(10) As Integer

  Dim i As Integer, n As Integer

  n = 6

  For i = 1 To n

  a(i) = i * i

  Next i

  For i = 1 To n / 2

  temp = a(i)

  a(i) = a(n - i)

  a(n - i) = temp

  Next i

  For i = 1 To n

  Print a(i);

  Next

  End Sub

  程序运行后,单击命令按钮Command1,输出结果为


更多相关试题分享:

1.2013年3月全国计算机二级考试VB真题

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

3.2011年9月计算机二级考试VB真题

4.2006年9月全国计算机等级考试二级VB笔试真题

5.2012年上半年计算机二级考试VB真题(完整版)

6.2011下半年全国计算机二级VB考试真题

7.2006年上半年全国计算机等级考试二级VB笔试真题答案及解析

8.2006年上半年全国计算机等级考试二级VB笔试真题

9.2010年9月全国计算机二级VB笔试真题

10.2016计算机二级考试《VB》真题练习

  (23)工程中包含Form1、Form2两个窗体,Form1是启动窗体,两个窗体上都有名称为 Label1的标签和名称为Command1的命令按钮,窗体外观分别如图1、图2所示:

  Form1的事件过程如下:

  Private Sub Command1_Click()

  Form2.Show

  End Sub

  Form2中的事件过程如下:

  Private Sub Command1_Click()

  Label1.Caption = Form1.Label1.Caption

  End Sub

  关于以下程序,下面叙述中错误的是

  (24)窗体上有一个名称为Dir1的目录列表框,一个名称为File1的文件列表框。当改变目录列表框的内容时,文件列表框的内容应该与之同步改变。为实现两控件同步操作,应该使用的事件过程是

  (25)列表框List1中没有数据项,现编制如下程序:

  Private Sub Command1_Click()

  For i = 1 To 6

  List1.AddItem i

  Next i

  For i = 5 To 3 Step -1

  List1.RemoveItem i

  Next i

  End Sub

  程序运行后,单击命令按钮Command1,则列表框List1中的数据项为

  (26)一个工程文件中含有窗体Form1、Form2和标准模块Model1。如果Form1的声明部分有语句Private x As Integer,且Model1中有语句Public y As Integer,则下列说法中,正确的是

  (27)下列关于文件及其操作的描述中,正确的是

  (28)下列操作说明中,错误的是

  (29)在窗体上画一个名称为CD1的通用对话框,并编写如下程序:

  Private Sub Command1_Click()

  CD1.Filter = "所有文件(*.*)|*.*|文本文件(*.txt)|*.txt|Word文档(*.doc)|*.doc"

  CD1.FilterIndex = 2

  CD1.Action = 2

  End Sub

  运行程序,并单击命令按钮Command1,下面描述中正确的是

  (30)下列关于Visual Basic菜单的叙述中,错误的是

  (31)下列关于Sub Main过程的.描述中,错误的是

  (32)设有如下程序:

  Private Sub Command1_Click()

  Dim i As Integer

  str1 = InputBox("输入一个字符串")

  str2 = ""

  i = 0

  Do While i < Len(str1) / 2

  str2 = str2 + Mid(str1, i + 1, 1)

  str2 = str2 + Mid(str1, Len(str1) - i, 1)

  i = i + 1

  Loop

  Print str2

  End Sub

  程序运行后,单击命令按钮Command1,在弹出的输入对话框中输入“abcdef”,则输出结果为

  (33)命令按钮Command1的单击事件过程如下:

  Private Sub Command1_Click()

  Dim x As String

  Dim y As String

  x = InputBox("输入字母", "输入")

  y = IIf((ucase9x) <> "A", "表达式1", "表达式2")

  Print y

  End Sub

  运行程序,单击命令按钮,在弹出的输入对话框中输入“ a”,则以下描述中正确的是

  (34)设有如下程序:

  Sub proc(x() As Integer)

  Static i As Integer

  Do

  x(i) = x(i) + x(i + 1)

  i = i + 1

  Loop While i < 2

  End Sub

  Private Sub Command1_Click()

  Dim a(5) As Integer, i As Integer

  For i = 0 To 4

  a(i) = i + 1

  Next i

  Call proc(a)

  Call proc(a)

  For i = 0 To 4

  Print a(i);

  Next i

  End Sub

  程序运行后,单击命令按钮Command1,输出结果为

  (35)以下程序将随机产生n个两位整数,并使用冒泡法将它们按递增顺序排序后输出。

  Option Base 1

  Private Sub Command1_Click()

  Dim a() As Integer

  Dim i As Integer, j As Integer

  Randomize

  n = InputBox("输入数据个数")

  ReDim a(n)

  For i = 1 To n

  a(i) = Int(Rnd * 90) + 10

  Next i

  For i = 1 To n - 1

  For j = 1 To n - i

  If a(j) < a(j - 1) Then

  temp = a(j): a(j) = a(j - 1): a(j - 1) = temp

  End If

  Next j

  Next i

  For i = 1 To n

  Print a(i);

  Next i  End Sub


更多相关试题分享:

1.2013年3月全国计算机二级考试VB真题

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

3.2011年9月计算机二级考试VB真题

4.2006年9月全国计算机等级考试二级VB笔试真题

5.2012年上半年计算机二级考试VB真题(完整版)

6.2011下半年全国计算机二级VB考试真题

7.2006年上半年全国计算机等级考试二级VB笔试真题答案及解析

8.2006年上半年全国计算机等级考试二级VB笔试真题

9.2010年9月全国计算机二级VB笔试真题

10.2016计算机二级考试《VB》真题练习

  二、填空题。

  (1)某二叉树有5个度为2的结点,则该二叉树中的叶子结点数为 。

  (2)设一个队列的初始状态为空。现将元素A,B,C,D,E,F,5,4,3,2,1依次入队,然后再依次退队,则元素退队的顺序为 。

  (3)对模块独立性度量的两个定性标准是耦合性与内聚性。描述模块间互相连接的紧密程度的'是 。

  (4)“软件系统”的系统结构图如下图所示:该系统的最大扇出数是 。

  (5)数据库设计包括概念设计、 和物理设计。

  (6)设有如下程序:

  Option Base 0

  Private Sub Command1_Click()

  Dim 或【arr】

  Dim i As Integer

  arr = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)

  For i = 0 To 3

  Print arr

  Next

  End Sub

  当运行程序,并单击命令按钮后,窗体上显示5 4 3 2。请填空,使程序能够完成此项功能。

  (7)在窗体上建立一个有4个元素、名称为Label1的标签数组,下标从0开始,各元素的Caption属性值依次为“等”、“级”、“考”、“试”;再画一个名称为Timer1的计时器控件,其 Interval属性设为1000.窗体如图所示。

  程序运行时,从左到右反复显示这4个字,但每次只显示1个。请填空,使程序实现上述功能。

  Dim i As Integer

  Private Sub Form_Load()

  For i = 0 To 3

  Label1(i).Visible = False

  Next

  End Sub

  Private Sub Timer1_Timer()

  If i 3 Then

  Label1(i).Visible = True

  If i = 0 Then

  Label1(3).Visible =

  Else

  Label1 .Visible = False

  End If

  i = i + 1

  Else

  i = 0

  End If

  End Sub

  (8)窗体上有一个名称为Combo1的组合框,其中已经添加了若干项目。程序运行时,单击Command1命令按钮,会把选中的项目从组合框中删除。请填空。

  Private Sub Command1_Click()

  Dim str As String

  Dim i As Integer

  str = RTrim( .Text)

  If str > "" Then

  For i = 0 To

  If Combo1.List(i) = str Then Combo1.RemoveItem

  Next i

  End If

  End Sub

  (9)设命令按钮的单击事件过程如下:

  Private Sub Command1_Click()

  Open "e:\file1.txt" For As #1

  Print #1, "Testing"

  Close #1

  Open "e:\file1.txt" For Append As #1

  #1, "ABCDEF"

  Close #1

  End Sub

  程序的功能是:建立一个名称为file1.txt的文件,写入字符串“Testing”,关闭文件后再次打开,再写入字符串“ABCDEF”。请填空使程序完整。


更多相关试题分享:

1.2013年3月全国计算机二级考试VB真题

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

3.2011年9月计算机二级考试VB真题

4.2006年9月全国计算机等级考试二级VB笔试真题

5.2012年上半年计算机二级考试VB真题(完整版)

6.2011下半年全国计算机二级VB考试真题

7.2006年上半年全国计算机等级考试二级VB笔试真题答案及解析

8.2006年上半年全国计算机等级考试二级VB笔试真题

9.2010年9月全国计算机二级VB笔试真题

10.2016计算机二级考试《VB》真题练习

【3月全国计算机二级考试VB真题】相关文章:

下半年全国计算机二级VB考试真题09-26

9月计算机二级考试VB真题10-11

全国计算机二级考试C++真题09-20

2005年上半年全国计算机二级VB笔试真题08-17

全国计算机二级MS Office考试真题及答案06-19

3月全国计算机等级考试二级VFP考试真题09-26

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

全国计算机二级考试《C语言》真题练习及答案09-20

全国英语等级考试二级真题及答案09-20

2015全国计算机二级VB考试复习技巧08-29