当前位置：文档之家› 2013计算机二级(VB)考试机试题库

2013计算机二级(VB)考试机试题库

2013年VB题库

第01套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp，窗体上已经有一个标签Label1，请添加一个单选

按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1、2，标题依次为"飞机"、

"火车"、"汽车"，再添加一个名称为Text1的文本框。窗体文件中已经给出了Op1的Click事件过

程，但不完整，要求去掉程序中的注释符，把程序中的?改为正确的内容，使得在程序运行时单

击"飞机"或"火车"单选按钮时，在Text1中显示"我坐飞机去"或"我坐火车去"，单击"汽车"单选按

钮时，在Text1中显示"我开汽车去"，如图所示。

注意：不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。

Private Sub Op1_Click(Index As Integer)

Dim a As String, b As String, c As String

a = "我坐"

b = "我开"

' Select Case ? ***** Index *****

Case 0

Text1.Text = a + Me.Op1(0).Caption + "去"

Case 1

' Text1.Text = ? + Me.Op1(1).Caption + "去" ***** a *****

Case 2

Text1.Text = b + Me.Op1(2).Caption + "去"

End Select

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp，Form1窗体中有一个文本框，名称为Text1；请在窗体上添加两个框架控件，名称分别为F1、F2，标题分别为"性别"、"身份"；在F1中添加两个单选按钮控件Op1、Op2，标题分别为"男"、"女"；在F2中添加两个单选按钮控件Op3、Op4，标题分别为"学生"、"教师"；再添加一个命令按钮，名称为C1，标题为"确定"。如图所示。请编写适当的事件过程，使得在运行时，在F1、F2中各选一个

单选按钮，然后单击"确定"按钮，就可以按照下表把结果显示在文本框中。

性别身份在文本框中显示的内容

男学生我是男学生

男教师我是男教师

女学生我是女学生

女教师我是女教师

最后把修改后的文件以原来的文件名存盘。

注意：考生不得修改窗体文件中已经存在的程序和Text1的属性，在结束程序运行之前，必须进行能够产生上表中一个结果的操作。必须用窗体右上角的关闭按钮结束程序，否则无成绩。

… ***** 请考生编写程序*****

If op1 and op3 then Text1.Text=”我是男学生”

If op1 and op4 then Text1.Text=”我是男教师”

If op2 and op3 then Text1.Text=”我是女学生”

If op2 and op4 then Text1.Text=”我是女教师”

*****第01套综合应用题

以下数列：1，1，2，3，5，8，13，21，…，的规律是从第3个数开始，每个数都是

其前面两个数之和。

在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件，如图所示。

请编写适当的事件过程完成如下功能：选中一个单选按钮后，单击"计算"按钮，则计算出上述数列的第n项的值，并在文本框中显示，n是选中的单选按钮后面的数值。(提示：因计算结果较大，应使用长整型变量。) 注意：不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一个单选按钮，并单击"计算"按钮获得一个结果；必须使用窗体右上角的关闭按钮结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。Private Sub Command1_Click()

… ***** 请考生编写程序*****

Dim a(35) As Long

If op1(0) then n=30

If op1(1) then n=33

If op1(2) then n=35

a(1) = 1

a(2) = 1

For i = 3 To n

a(i) = a(i - 1) + a(i - 2)

Text1.Text = a(n)

End Sub

第02套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp，窗体中有两个图片框，名称分别为P1、P2，其中的图片

内容分别是一架航天飞机和一朵云彩，一个命令按钮，名称为C1，标题为"发射"，还有一个计时器，名

称为Timer1。并给出了两个事件过程，但并不完整，要求：

①设置Timer1的属性，使其在初始状态下不计时；

②设置Timer1的属性，使其每隔0.1秒调用Timer事件过程一次。

③去掉程序中的注释符，把程序中的?改为正确的内容，使得在运行时单击"发射"按钮，则航天飞

机每隔0.1秒向上移动一次，当到达P2的下方时停止移动，如图所示。

注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

Private Sub C1_Click()

'Timer1.Enabled = ? ***** True *****

End Sub

Private Sub Timer1_Timer()

Static a%

a = a =+1

'If P1.Top > P2.Top ＋P2.? Then ***** Height *****

P1.Move P1.Left, P1.Top - 5 - a, P1.Width, P1.Height

Else

'Timer1.Enabled = ? ***** False *****

End If

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp，运行情况如图所示。程序的功能是计算下列表达式的值：

其中的N和x的值通过键盘分别输入到文本框Text1、Text2中。之后如果单击标题为"计算"、名称为Command1的命令按钮，则计算表达式的值z，并将计算结果显示在名称为Label1的标签中。

在给出的窗体文件中已经添加了全部控件和程序，但程序不完整。要求去掉程序中

的注释符，把程序中的?改为正确的内容。

注意：考生不得修改窗体文件中已经存在的程序。程序中不得使用^运算符，而应

使用函数xn进行幂运算。程序至少运行一次，按照下图输入数据，使x=10，N=5，单击"计算"按钮，计算z的值，并将结果显示在标签Label1中，否则没有成绩。最后，程序按原文件名存盘。

Private Function xn(a As Single, m As Integer)

Dim i As Integer

For i = 1 To m

'tmp = ? ***** tmp*a *****

'xn = ? ***** tmp *****

End Function

Private Sub Command1_Click()

Dim n As Integer

Dim i As Integer

Dim t As Single

Dim s, x As Single

n = Val(Text1.Text)

x = Val(Text2.Text)

z = 0

For i = 2 To n

t = x + i

'z = z +？ ***** xn(t,i) *****

'Label1.Caption = ? ***** z *****

Call SaveResult

End Sub

Private Sub SaveResult()

Open App.Path & "\out4.dat" For Output As #1

Print #1, Label1.Caption

Close #1

End Sub

*****第02套综合应用题

在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个

数据，统计这些数据中素数的个数，并找出所有素数中最小的素数(判断素数的函数已

给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。

程序不完整，请在指定的位置把程序补充完整。

注意：不得修改原有程序和控件的属性。在结束程序运行之前，必须至少正确运行

一次程序，将统计的结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。

Private arr(100) As Integer

Public Function prime(x As Integer)

k = Int(Sqr(x) + 5)

For i = 2 To k

If x Mod i = 0 Then

prime = False

Exit Function

End If

prime = True

End Function

Private Sub Command1_Click()

Open App.Path & "\in5.txt" For Input As #1

For i = 1 To 40

Input #1, arr(i)

End Sub

Private Sub Command2_Click()

… ***** 请考生编写程序 *****

Dim a As Integer Dim b As Integer a = 0 b = arr(1)

For i = 1 To 40

If prime(arr(i)) Then a = a + 1 Label3.Caption = a Next

For i = 1 To 40

If prime(arr(i)) And arr(i) <= b Then b = arr(i) Label4.Caption = b Next

'***** 考生编写程序结束 *****

Open App.Path & "\out5.txt" For Output As #1 Print #1, Label3.Caption, Label4.Caption Close #1 End Sub

*****第03套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp ，其功能是：

①单击"读数据"按钮，则将考生文件夹下in3.dat 文件中的100个0到999之间的整数读

入到数组a 中；

②单击"计算"按钮，则找出这100个整数中的所有水仙花数，并将它们的最大值与最小值分别显示在文本框Text1、Text2中。(注：当一个数的值等于该数中的各位数字的立方

和时，此数被称为水仙花数。如：

333

153153=++,所以153就是一个水仙花数) 在窗体文件中已经给出了全部控件(如图所示)和"读数据"命令按钮的事件过程以及判

断一个数是否为水仙花数的通用过程。要求编写"计算"命令按钮的事件过程。

注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行前，必须进行"计算"，并且必须通过单击窗体右上角的"关闭"按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

Dim a(100) As Integer

Private Sub Command1_Click() Dim k As Integer

Open App.Path & "\in3.dat" For Input As #1 For k = 1 To 100

Input #1, a(k) Next k Close #1 End Sub

Private Sub Command2_Click()

'***** 需考生编写的程序 ***** Dim i As Integer

Dim max As Integer, min As Integer max = -1 min = 1000

For i = 1 To 100

If isnarc(a(i)) Then

If max <= a(i) Then max = a(i)

If min >= a(i) Then min = a(i)

End If

Next i

Text1 = max

Text2 = min

End Sub

'以下Function 过程用于判断某数是否为水仙花数

Function isnarc(p As Integer)

x = Fix(p / 100)

y = Fix((p - x * 100) / 10)

z = p - x * 100 - y * 10

If p = x ^ 3 + y ^ 3 + z ^ 3 Then

isnarc = True

Else

isnarc = False

End If

End Function

Private Sub Form Unload(Cancel As Integer)

Open App.Path & "\out3.dat" For Output As #1

Print #1, Val(Text1.Text)

Print #1, Val(Text2.Text)

Close #1

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp。请在窗体上添加一个组合框，名称为cb1，并输入三个列表项："3"、

"7"、"11"(列表项的顺序不限，但必须是这3个数字)；添加一个名为Text1的文本框；再

添加一个标题为"计算"、名称为C1的命令按钮。如图所示。请编写适当的事件过程，使

得在程序运行时，在组合框中选定一个数字后，单击"计算"按钮，则计算5000以内能够

被该数整除的所有数之和，并放入Text1中。最后，按原文件名存盘。

提示：由于计算结果较大，应使用长整型变量。

注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须至少进行

一次计算。并且必须用窗体右上角的关闭按钮结束程序，否则无成绩。

Private Sub C1_Click()

'***** 需考生编写的程序 *****

Dim sum As Long

Dim n As Integer

Dim i As Integer

n = Val(Cb1.Text)

For i = n To 5000

If i Mod n = 0 Then

sum = sum + i

End If

Next i

Text1.Text = sum

End Sub

*****第03套综合应用题

在考生文件夹下有一个工程文件sjt5.vbp，其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3，以及部分程序代码。请完成以下工作：

①在属性窗口中修改Text3的适当属性，使其在运行时不显示，作为模拟的剪贴板使用。窗体如图所示；

②建立下拉式菜单，如下表所示:

标题名称

编辑Edit

剪切Cut

复制Copy

粘贴Paste

③窗体文件中给出了所有事件过程，但不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。以便实现如下功能：当光标所在的文件框中无内容时，"剪切"、"复制"不可用，否则可以把该文本框中的内容剪切或复制到Text3中；若Text3中无内容，则"粘贴"不能用，否则可以把Text3中的内容粘贴在光标所在的文本框中的内容之后。

注意：不能修改程序中的其他部分。各菜单项的标题名称必须正确。最后将修改后的文件按原文件名存盘。

Dim which As Integer

Private Sub copy_Click()

If which = 1 Then

Text3.Text = Text1.Text

ElseIf which = 2 Then

Text3.Text = Text2.Text

End If

End Sub

Private Sub cut_Click()

If which = 1 Then

Text3.Text = Text1.Text

Text1.Text = ""

ElseIf which = 2 Then

Text3.Text = Text2.Text

Text2.Text = ""

End If

End Sub

Private Sub edit_Click()

'If which = ? Then ***** 1 *****

If Text1.Text = "" Then

cut.Enabled = False

Copy.Enabled = False

Else

cut.Enabled = True

Copy.Enabled = True

End If

'ElseIf which = ? Then ***** 2 *****

If Text2.Text ="" Then

cut.Enabled = False

Copy.Enabled = False

Else

cut.Enabled = True

Copy.Enabled = True

End If

If Text3.Text = "" Then

Paste.Enabled = False

Else

Paste.Enabled = True

End If

End Sub

Private Sub paste_Click()

If which = 1 Then

' Text1.Text = ? ***** Text1.Text+Text3.Text *****

ElseIf which = 2 Then

' Text2.Text = ? ***** Text2.Text+Text3.Text *****

End If

End Sub

Private Sub Text1_GotFocus() '本过程的作用是：当焦点在Text1中时，which = 1

which = 1

End Sub

Private Sub Text2_GotFocus() '本过程的作用是：当焦点在Text2中时，which = 2

which = 2

End Sub

*****第04套简单应用题

（1）在名称为Form1的窗体上添加一个名称为Label1、标题为"添加项目："的标签；添加一

个名称为Text1的文本框，初始内容为空；添加一个名称为Combo1的下拉式组合框，并通过

属性窗口输入若干项目(不少于3个，内容任意)；再添加两个命令按钮，名称分别为

Command1、Command2，其标题分别为"添加"、"统计"。在程序运行时，向Text1中输入字

符，单击"添加"按钮后，则将Text1中的内容作为一个列表项被添加到组合框的列表中；单

击"统计"按钮，则在窗体空白处显示组合框中列表项的个数，如图所示。请编写两个命令按

钮的Click事件过程。

注意：程序中不得使用变量，也不能使用循环结构。存盘时必须存放在考生文件夹下，工程文件名保存为sjt3.vbp，窗体文件名保存为sjt3.frm。

'***** 需考生编写的程序*****

Private Sub Command1_Click()

Combo1.AddItem Text1

End Sub

Private Sub Command2_Click()

Print Combo1.ListCount

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp，其窗体如图所示。该程序用来对在上面的文

本框中输入的英文字母串(称为"明文")加密，加密结果(称为"密文")显示在下面的文本框中。

加密的方法为：选中一个单选按钮，单击"加密"按钮后，根据选中的单选按钮后面的数字n，

将"明文"中的每个字母改为它后面的第n个字母("z"后面的字母认为是"a"，"Z"后面的字母认

为是"A" )，如图所示。窗体中已经给出了所有控件和程序，但程序不完整，请去掉程序中

的注释符，把程序中的?改为正确的内容。

注意：不得修改程序中的其他部分和控件的属性。最后将修改后的文件按原文件名存盘。

Private Sub Command1_Click()

Dim n As Integer, k As Integer, m As Integer

Dim c As String, a As String

For k = 0 To 2

If Op1(k)．Value Then

'n = Val(Op1(k). ? ) ***** Caption *****

End If

Next k

m = Len(Text1.Text)

a = ""

'For k = 1 To ? ***** m *****

' c = Mid$(Text1.Text, ? , 1) ***** k *****

c = String(1, Asc(c) + n)

If c > "z" Or c > "Z" And c < "a" Then

c = String(1, Asc(c) - 26)

End If

'？= a + c ***** a *****

Next k

Text2.Text = a

End Sub

*****第04套综合应用题

在考生文件夹下有一个工程文件sjt5.vbp，窗体上有两个文本框，名称分别为Text1、Text2，都可以多行显示。还

有三个命令按钮，名称分别为C1、C2、C3，标题分别为"取数"、"排序"、"存盘"。"取数"按钮

的功能是将考生文件夹下的in5.dat文件中的50个整数读到数组中，并在Text1中显示出来；"排序

"按钮的功能是对这50个数按升序排序，并显示在Text2中；"存盘"按钮的功能是把排好序的50

个数存到考生目录下的out5.dat文件中。如图所示。在窗体中已经给出了全部控件和部分程序代

码，要求阅读程序并去掉程序中的注释符，把程序中的?改为正确的内容，并编写"排序"按钮的

Click事件过程，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。

最后将修改后的文件按原文件名存盘。

Dim a(50) As Integer

Private Sub C1_Click()

Dim k As Integer, ch As String

Open "in5.dat" For Input As #1

ch = ""

For k = 1 To 50

'Input #1, ? ***** a(k) *****

ch = ch + Str(a(k)) + " "

Next k

Close #1

'Text1.Text = ? ***** ch *****

End Sub

Private Sub C2_Click()

' ***** 需考生编写的程序*****

Dim t As Integer

Dim i As Integer

Dim j As Integer

Dim ch As String

ch = ""

For i = 50 To 2 Step -1

For j = 1 To 49

If a(j) > a(j + 1) Then

t = a(j + 1)

a(j + 1) = a(j)

a(j) = t

End If

Next j

Next i

For j = 1 To 50

ch = ch + Str(a(j)) + ""

Next j

Text2.Text = ch

End Sub

Private Sub C3_Click()

Open "out5.dat" For Output As #1

Print #1, Text2.Text

Close #1

End Sub

*****第05套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm)，在窗体上添加

一个名称为List1的列表框和一个名称为Text1的文本框，如图1所示。编写窗体的MouseDown

事件过程。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框中的

项目(内容任意，不少于三个)；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，

将其从列表框中删除。程序的运行情况如图2所示。这个程序不完整，请把它补充完整，并

能正确运行。

要求：去掉程序中的注释符，把程序中的?改为适当的内容，使其正确运行，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。

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

If Button = 1 Then

Text1.Text = InputBox("请输入要添加的项目")

'List1.AddItem ? ***** Text1.Text *****

End If

If Button = 2 Then

Text1.Text = InputBox("请输入要删除的项目")

'For i = 0 To ? ***** List1.ListCount-1 *****

'If List1.List(i) = ? Then ***** Text1.Text *****

'List1.RemoveItem ? ***** i *****

End If

Next i

End If

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm)，其功能是通过调用过程FindMin求数组的最小值。程序运行后，在四个文本框中各输入一个整数，然后单击命令按钮，即可求出数组的最小值，并在窗体上显

示出来(如图所示)。

要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但

不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

Option Base 1

Private Function FindMin(a() As Integer)

Dim Start As Integer

Dim Finish As Integer, i As Integer

'Start = ？(a) ***** LBound *****

'Finish = ？(a) ***** UBound *****

''Min =？(Start) ***** a *****

For i = Start To Finish

'If a(i) ? Min Then Min = ? ***** < ***** ***** a(i) *****

Next i

FindMin = Min

End Function

Private Sub Command1_Click()

Dim arr1

Dim arr2(4) As Integer

arr1 = Array(Val(Text1.Text), Val(Text2.Text), Val(Text3.Text), Val(Text4.Text))

For i = 1 To 4

arr2(i) = CInt(arr1(i))

Next i

'M = FindMin(？) ***** arr2 *****

Print "最小值是："；M

End Sub

*****第05套综合应用题

在窗体上建立三个菜单(名称分别为Read、Calc和Save，标题分别为"读入数据"、"计算并输出"和"存盘")，然后再添加一个文本框，名称为Text1，MultiLine属性设置为True，scrollBars属性设置为2(如图所示)。程序运行后，如果执行"读入数据"命令，则读入考生文件夹下datain1.txt文件中的100个整数，放入一个数组中，

数组的下界为1；如果单击"计算并输出"按钮，则把该数组中下标为偶数的元素在文本框

中显示出来，求出它们的和，并把所求得的和在窗体上显示出来；如果单击"存盘"按钮，

则把所求得的和存入考生文件夹下的dataout.txt文件中。

在考生文件夹下有一个工程文件sjt5.vbp，窗体文件中的ReadData过程可以把

datain1.txt文件中的100个整数读入Arr数组中；而WriteData过程可以把指定的整数值写到

考生文件夹下指定的文件中(整数值通过计算求得，文件名为dataout.txt)。

注意：考生不得修改窗体文件中已经存在的程序。存盘时，工程文件名仍保存为sjt5.vbp，窗体文件名仍保存为sjt5.frm。

' ***** 需考生编写的程序 *****

Dim sum As Integer

Private Sub Calc_Click()

Text1.Text = ""

For i = 2 To 100 Step 2

Text1.Text = Text1.Text & Arr(i) & Space(5)

sum = sum + Arr(i)

Next i

Print sum

End Sub

Private Sub Read_Click()

ReadData

End Sub

Private Sub Save_Click()

WriteData "dataout.txt", sum

End Sub

*****第06套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。其功能是产生30个0~1000的随机整

数，放入一个数组中，然后输出其中的最小值。程序运行后，单击命令按钮（名称为Command1，标题为“输出

最小值”），即可求出其最小值，并在窗体上显示出来（如图所示）。这个程序不完整，请把它补充完整，并能

正确运行。

要求：去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

Option Base 1

Private Sub Command1_Click( )

Dim arrN(30) as Integer

Dim Min as Integer

Randomize

For i=1 to 30

…arrN(i)=Int(Rnd * ?) *** 1000 ***

Next i

…?=arrN(1) *** Min ***

For i=2 to 30

…If ? Then *** Min>arrN(i) ***

Min=arrN(i)

End if

Next i

Print Min

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp，相应的窗体文件为sjt4.frm，在窗体上有一个命令按钮和一个文本框。程序运行后，单击命令按钮，即可计算出0~1000范围内不能被7整除的整数的个数，并在文本框中显示出来。在窗体的代码窗口中，已给出了部分程序，其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现，请编写该过程的代码。

要求：

请勿改动程序中的任何内容，只在Function Fun( )和End Function之间填入你编写的若干语句。最后把修改后的文件按原文件名存盘。

Sub SaveData( )

Open App.Path & “\” & “outtxt.txt” For Output As #1

Print #1, Text1.Text

Close #1

End sub

…*** Function Fun( ) 请考生编写的程序***

Dim s As Integer, i As Integer

For i = 0 To 1000

If i Mod 7 <> 0 Then

s = s + 1

End If

Next i

Fun = s

***End Function***

Private Sub Command1_click( )

D=Fun( )

Text1.Text=d

SaveData

End Sub

*****第06套综合应用题

在考生文件夹下有一个工程文件sjt5.vbp，请先装入该工程文件，然后完成以下操作：

在名称为Form1的窗体上画二个命令按钮，其名称分别为C1和C2，标题分别为“读入数据”和“计算”（如图所示）。程序运行后，如果单击“读入数据”按钮，则调用题目所提供的ReadData1和ReadData2过程读入datain1.txt 和datain2.txt文件中的各20个整数，分别放入Arr1和Arr2两个数组中；如果单击“计算”按钮，则把两个数组中对应下标的元素相减，其结果放入第三个数组中（即：第一个数组的第n个元素减去第二个数组的第n个元素，其结果作为第三个数组的第n个元素。这里的n为1、2、。。。。。、20），最后计算第三个数组各元素之和，把所求得的和在窗体上显示出来；并调用题目中给出的WriteData过程将所求得的和存入考生文件夹下的dataout.txt 文件中。

注意：考生不得修改窗体文件中已经存在的程序，且必须执行此程序一次，最后把修改后的文件以原来的文件名存盘。

Option Base 1

Dim Arr1(20) As Integer

Dim Arr2(20) As Integer

Sub ReadData1( )

Open App.Path & “\” & “datain1.txt” For Input as #1

For i=1 to 20

Input #1,Arr1(i)

Next i

Close #1

End Sub

Sub ReadData2( )

Open App.Path & “\” & “datain2.txt” For Input as #1

For i=1 to 20

Input #1,Arr2(i)

Next i

Close #1

End Sub

Sub WriteData(Filename As string, Num As Integer)

Open App.Path & “\” & Filename For Output As #1

Print #1,Num

Close #1

End sub

…***** 请考生编写的程序*****

Private Sub C1_Click()

Call ReadData1

Call ReadData2

End Sub

Private Sub C2_Click()

Dim Arr3(1 To 20) As Integer

Dim sum As Integer

sum = 0

For i = 1 To 20

Arr3(i) = Arr1(i) - Arr2(i)

sum = sum + Arr3(i)

Next i

Print "sum="; sum

WriteData "dataout.txt", sum

End Sub

*****第07套简单应用题

（1）在名称为Form1的窗体上添加一个名称为L1的标签，标题为"口令"；添加两个文本框，名称分别为Text1、Text2，初始内容为空；再添加三个命令按钮，名称分别为C1、C2、C3，标题分别为"显示口令"、"隐藏口令"、"复制口令"，在程序开始运行时，向Text1中输入的所有字符，都显示为"*"，单击"显示口令"按钮后，

在Text1中显示所有字符，再单击"隐藏口令"后，Text1中的字符不变，但显示的都是"?"，

单击"复制口令"后，把Text1中的实际内容复制到Text2中，如图所示。

要求：

①在属性窗口中，将窗体的标题改为"口令窗口"。

②建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使

用变量。

存盘时，工程文件名保存为sjt3.vbp，窗体文件名保存为sjt3.frm。

' ***** 需考生编写的程序*****

Private Sub C1_Click()

Text1.PasswordChar = ""

End Sub

Private Sub C2_Click()

Text1.PasswordChar = "?"

End Sub

Private Sub C3_Click()

Text2.Text = Text1.Text

End Sub

（2）在名称为Form1的窗体上添加一个名称为P1的图片框，并利用属性窗口把考生文件夹中的图标文件Open.ico放到

图片框中；再添加一个通用对话框控件，名称为CD1，利用属性窗口设置相应

属性，即打开对话框时：标题为"打开文件"，文件类型为"Word文档"，初始文

件夹为C盘根文件夹。再编写适当的事件过程，使得程序在运行时，单击P1图片

框，可以打开上述对话框。程序运行后的窗体如图所示。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt4.vbp，窗体

文件名保存为sjt4.frm。程序中不得使用任何变量。

' ***** 需考生编写的程序*****

Private Sub P1_Click()

CD1.ShowOpen

End Sub

*****第07套综合应用题

（1）在考生文件夹下有一个工程文件sjt5.vbp，窗体上有两个命令按钮，标题分别是"读数据"和"统计"，请添加一个名称为Label1、标题为"回文的个数为"的标签和一个名称为Text1，初始内容为空的文本框，如图所示。

程序功能如下：

①单击"读数据"按钮，则将考生文件夹下in5.dat文件的内容读到变量s中；

②单击"统计"按钮，则统计in5.dat文件(该文件中仅含由空格间隔开的字母串)中回文的个数，并

将统计的回文个数显示在Text1文本框内。(所谓回文是指顺读与倒读都一样的字符串，如"recycer")"

读数据"和"统计"按钮的Click事件过程已经给出，请完善foundhuiwen过程的功能，实现上述程序功

能。

注意：考生不得修改窗体文件中已存在的控件和程序，在结束程序运行之前，必须先进行统计，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

Function foundhuiwen(p As String)

' ***** 需考生编写的程序*****

If StrReverse(p) = p Then foundhuiwen = True

End Function

*****第08套基本操作题

（1）在名称为Form1标题为“选题”的窗体上画一个复选框数组，名称为CH1，共有四个复选框，按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”，其中“语文”、“计算机”复选框在选中状态下，运行时的窗体如图所示。请画控件并设置相应属性。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

（2）在名称为Form1的窗体上画一个名称为HS1的水平滚动条，其刻度值范围为1~100；画一个命令按钮，名称为C1，标题为“移动滚动框”。请编写适当的事件过程，使得在运行时，每单击命令按钮一次（假定单击次数少于10次），滚动框向右移动10个刻度。运行时的窗体如图所示。要求程序中不得使用变量，事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

*****第08套简单应用题

（1）在名称为Form1的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为‘加粗’、‘斜体’、‘下划线’，名称分别为M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击文本框时，弹出此菜单，选中一个菜单项后，则进行菜单标题所描述的操作，如图所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。

Text1.fontBold=true

M2_click( )

Text1.fontItalic=true

M3_click( )

Text1.fontUnderline=true

Text1_MouseDown( )

If button=2 then Popupmenu format

（2）在考生文件夹下有一个工程文件sjt4.vbp，含有Form1和Form2两个窗体，Form1为启动窗体。两个窗体上的控件如图1所示。程序运行后，在Form1窗体的文本框中输入有关信息（‘密码’框中显示‘*’字符），然后单击‘提交’按钮则弹出‘确认’对话框（即Form2窗体），并在对话框中显示输入的信息，如图2所示。单击‘确认’按钮则程序结束，单击‘重输’按钮，则对话框消失，回到Form1窗体。在给出的窗体文件中已经给出了程序，但不完整。要求：1）把Form1的标题改为‘注册’，把Form2的标题改为‘确认’；

2）设置适当的属性，使Form2标题栏上的所有按钮消失（如图2所示）；

3）去掉程序中的注释符，把程序中的？改为正确的内容。

注意：不能修改程序中的其他部分，标题等属性的修改只能在属性窗口中的进行。最后把修改后的文件按原文件名存盘。

Private Sub C1_Click()

Dim k As Integer

' Form2. ? ***** show *****

Form2.Print Form1.L1.Caption; Form1.Text1

Form2.Print Form1.L2.Caption; Form1.Text2

Form2.Print Form1.L3.Caption; Form1.Text3

' Form2.Print Form1.Frame1. ? ; "："; *****caption*****

For k = 0 To 1

' If Form1.Op1( ? ).Value Then ***** k *****

Form2.Print Form1.Op1(k).Caption

End If

Next k

End Sub

Private Sub Form_Load()

' Text2. ? = "*" ***** passwordchar *****

End Sub

*****第08套综合应用题

在考生目录下有一个工程文件sjt5.vbp，其窗体上有两个标签L1和L2，标题分别为‘口令’和‘允许次数’；一个命令按钮C1，标题为‘确定’；两个文本框名称分别为Text1和Text2。其中Text1用来输入口令（输入时，显示‘*’），无初始内容；Text2的初始内容为3。并给出了C1的事件过程，但不完整，要求去掉程序中的注释符，把程序中的？改为正确的内容，使得在运行时，在Text1中输入口令后，单击‘确定’，如果输入的是‘123456’则在Text1中显示‘口令正确’；如果输入其他内容，单击‘确定’后，弹出如图所示的错误提示对话框，并且Text2中的数字减1.最多可输入3次口令，若3次都输入错误，则禁止再次

输入。

Private Sub C1_Click()

' If ? = "123456" Then ***** text1.text *****

Text1.Text = "口令正确"

' Text1.? = "" ***** passwordchar *****

Else

Text2.Text = Text2.Text - 1

' If Text2.Text > ? Then ***** 0 *****

MsgBox "第" & (3 - Text2.Text) & "次口令错误，请重新输入"

Else

MsgBox "3次输入错误，请退出"

' Text1.Enabled = ? ***** false *****

End If

End Sub

*****第09套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp，在程序运行时，单击“输入整数”按钮，可以从键盘输入一个整数，并在窗体上显示此整数的所有不同因子和因子个数。图1是输入53后的结果，图2是输入100后的结果。已经给出了全部控件和程序，但程序不完整。

要求：请去掉程序中的注释符，把程序中的？改为正确的内容。不能修改程序中的其他部分，也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。

Private Sub Command1_Click( )

Dim n As Integer

Cls

‘? =InputBox（“请输入一个整数”）***** n *****

Print “因子数＝”；fun(n)

End Sub

Function fun(m As Integer)

Dim s As Integer

S=0

For k=1 to Abs(m) / 2

‘If m Mod k=? Then ***** 0 *****

s=s+1

Print k

End If

Next k

‘？***** fun=s *****

End Function

（2）在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时，选中List1中若干个列表项（如图1所示），单击“选中”按钮则把选中的项目移到List2中，单击“显示”，则在Text1文本框中显示这些城市的城市（如图2所示）。已经给出了所有控件和程序，但程序不完整。

要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。

Private Sub Command1_Click( )

Dim k%

‘For k=List1.ListCount -1 to 0 ***** step -1 *****

If List1.Selecte(k)=True Then

‘List2.AddItem ? ***** List1.List(k) *****

‘List1.RemoveItem ? ***** k *****

End If

Next k

End Sub

Private Sub Command2_Click( )

Dim k%

Text1=“已经选中的城市有：“

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

‘Text1=? & ““ & List2.List(k) ***** Text1.Text *****

Next k

End Sub

*****第09套综合应用题

在考生文件夹下有一个工程文件sjt5.vbp，其窗体中有一个实心圆。程序运行时，当用鼠标左键单击窗体任何空白位置时，实心圆则向单击位置直线移动；若用鼠标右键单击窗体，则实心圆停止移动。窗体文件中已经给出了全部控件，但程序不完整。

要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其能正确运行，不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

Dim x0 As Integer, y0 As Integer , a As Single , radius As Integer

radius=Shape1.Width / 2 ‘圆的半径

If Button=LEFT_BUTTON Then

x0=shape1.left + radius ‘圆心的x坐标

y0=shape1.top + radius ‘圆心的y坐标

If x=x0 Then

Stepy=Sgn(y-y0) * 50

‘Stepx=? ***** 0 *****

Else

a=(y-y0) / (x-x0) ‘斜率

stepx=sgn(x-x0) * 50

‘?=a * stepx ***** stepy *****

If abs(stepy) > abs(stepx) Then

Stepy=sgn(y-y0) * 50

Stepx=stepy / a

End if

End If

‘?=True ***** Timer1.Enabled *****

Else

‘?=False ***** Timer1.Enabled *****

End if

End Sub

Private Sub Timer1_Timer( )

‘Shape1.Move Shape1.Left + stepx , Shape1.Top + ? ***** stepy *****

End Sub

*****第10套简单应用题

（1）考生文件夹中有工程文件sjt3.vbp。窗体上有名称为Label1、标题为“标签控件”的标签；有一个名称为

Command1、标题为“命令按钮”的命令按钮。单击上述两控件中任一控件，则在标签Label2中显示所单击控件的

标题内容（标题内容前有“单击”二字），下图是单击命令按钮后的窗体外观。请去掉程序中的注释符，把程序中

的？改为正确的内容。

注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。

Private Sub Command1_Click()

'Call ShowName(？) ***** Command1 *****

End Sub

Private Sub Label1_Click()

'Call ShowName(？) ***** Label1 *****

End Sub

'Private Sub ShowName(c As ？) ***** Control *****

If TypeOf c Is CommandButton Then

Label2.Caption = "单击" & Command1.Caption

End If

If TypeOf c Is Label Then

'？= "单击" & Label1.Caption ***** Label2.Caption *****

End If

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp。其窗体上有一个由八个图片框控件组成的控件数组、

两个命令按钮及一个计时器控件，如图1所示。程序功能：

将计时器控件设置为每隔0.5秒触发一次。运行程序时，只显示下标为0的图片框控件数组元素，其

它图片框均不显示。单击“开始”按钮，数组中的每个图片框自左至右依次显示，时间间隔为0.5秒，

产生月亮从左向右移动的效果，如图2所示。月亮移到右端后再从左端重新开始。单击“停止”按钮，

月亮停止移动。

要求：去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程

序中的其他部分。最后把修改后的文件按原文件名存盘。

Private Sub Form_Load()

Picture1(0)．Left = 0

Picture1(0)．Top = 100

For k = 1 To 7

'Picture1(k)．Visible = ？ ***** False *****

End Sub

Private Sub Command1_Click()

'Timer1.Enabled = ？ ***** True *****

End Sub

Private Sub Command2_Click()

Timer1.Enabled = False

End Sub

Private Sub Timer1_Timer()

Static i As Integer

Picture1(i)．Visible = False

i = i + 1

'If i = ? Then ***** 8 *****

'i =？ ***** 0 *****

End If

Picture1(i)．Visible = True

End Sub

*****第10套综合应用题

考生文件夹下有一个工程文件sjt5.vbp。运行程序后，从文件中读出数据，放入5X5的二维数组a中。请编写程序，找出a数组中每行的最大值及该值在行中的次序（即列下标），并将所找到的结果分别保存到一维数组b、c中（a第一行的最大值保存在b(1)中，最大值的列次序保存在c(1)中）。

注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，命令按钮的事件过程必须至少执行一次。

Dim a(5, 5) As Integer

Dim b(5) As Integer

Dim c(5) As Integer

Private Sub Command1_Click()

N = 5

For i = 1 To N

'＝＝＝＝＝＝＝＝考生编写程序开始＝＝＝＝＝

Max = a(i, 1)

For j = 1 To 5

If Max < a(i, j) Then

Max = a(i, j)

End If

b(i) = Max

If Max = a(i, j) Then c(i) = j

Next j

'＝＝＝＝＝＝＝＝考生编写程序结束＝＝＝＝＝

Next i

Save

End Sub

*****第11套简单应用题

（1）在考生目录下有一个工程文件sjt3.vbp。程序的功能是：通过键盘向文本框中输入数字，如果输入的是非数字字符，则提示输入错误，且文本框中不显示输入的字符。单击名称为Command1、标题为“添加”的命令按钮，则将文本框中的数字添加到名称为Combo1的组合框中。在给出的窗体文件中已经添加了全部控件，但程序不完整。要求去掉程序中的注释符，把程序中的？改为正确的内容。

注意：

不能修改程序中的其他部分和其他控件的属性。最后把修改后的文件按原文件名存盘。

Private Sub Command1_Click( )

‘Combo1.? *** AddItem Text1.Text ***

Text1.text=””

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

‘If KeyAscii > 57 Or KeyAscii < ? Then *** 48 ***

MsgBox “请输入数字！”

‘KeyAscii=? *** 0 ***

End if

End Sub

（2）在考生目录下有一个工程文件sjt4.vbp。该程序的功能是计算M！+（M+1）！+（M+2）！+。。。+N！之和。窗体上有名称分别为Text1、Text2的两个文本框，用于接收输入的M和N（要求M

在给出的窗体文件中已经有了全部控件，但程序不完整，要求去掉程序中的注释符，把程序中的？改为正确的内容。

注意：

不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

Private Sub Command1_Click( )

Dim m as integer

Dim n as integer

Dim s as Long

Dim i as Integer

M=val(Text1.text)

N =val(text2.text)

S=0

‘For i=? to n *** m ***

‘t=? *** f(i) ***

‘s=s+? *** t ***

lblResult.Cation=s

End Sub

Private Function f(ByRef x as integer) As Long

Dim t as Long

t=1

For i=1 to x

‘t=? *** t*i ***

…f=? *** t ***

End Function

*****第11套综合应用题

在考生目录下有一个工程文件sjt5.vbp，用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是：a^2+b^2=c^2。例如，3、4、5就是一个满足条件的整数组合（注意：a，b，c分别为4，3，5与分别为3，4，5被视为同一个组合，不应该重复计算）。编写程序，统计三个数均为60以内满足上述关系的整数组合的个数，并显示在标签Label1中。

注意：不得修改原有程序的控件的属性。在结束程序运行之前，必须至少正确运行一次程序，将统计的结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。

Private Sub Command1_Click( )

‘***** 考生编写程序开始*****

Dim i As Integer

Dim j As Integer

Dim k As Integer

For i = 1 To 60

For j = 1 To 60

For k = 1 To 60

If i ^ 2 = j ^ 2 + k ^ 2 Then

m = m + 1

End If

Next k

Next j

Next i

Label1.Caption = m / 2

‘***** 程序结束*****

Save Label1

End Sub

Public Sub Save(l As Control)

Open App.Path & “\out5.txt” For Output As #1

Print #1, l.Caption

Close #1

End Sub

*****第12套简单应用题

（1）在考生文件夹下有一个工程文件sjt3.vbp，包含了所有控件和部分程序。程序运行时，在

文本框中每输入一个字符，则立即判断：若是小写字母，则将它的大写形式显示在标签Label1

中；若是大写字母，则把它的小写形式显示在Label1中，若是其他字符，则将该字符直接显示

在Label1中。输入的字母总数则显示在标签Label2中，如图所示。

要求：去掉程序中的注释符，把程序中的?改为正确的内容。

注意：不得修改已经存在的程序，最后将修改后的文件按原文件名存盘。

Dim n As Integer

Private Sub Text1_Change()

Dim ch As String

'ch = Right$( ? ) ***** Text1,1 *****

If ch >= "A" And ch <= "Z" Then

Label1.Caption = LCase(ch)

n = n + 1

ElseIf ch >= "a" And ch <= "z" Then

Label1.Caption = UCase(ch)

n = n + 1

Else

'Label1.Caption = ? ***** ch *****

End If

'Label2.Caption = ? ***** n *****

End Sub

（2）在考生文件夹下有一个工程文件sjt4.vbp。窗体中有一个图片框，图片框中有一个蓝色圆，名称为Shape1，如图所示。

当程序运行时，单击"开始"按钮，圆半径逐渐变大(圆心位置不变)，当圆充满图片框时则

变为红色，并开始逐渐缩小，当缩小到初始大小时又变为蓝色，并再次逐渐变大，如此往复。

单击"停止"按钮，则停止变化。文件中已经给出了所有控件和程序，但程序不完整，请去掉

程序中的注释符，把程序中的?改为正确的内容。

提示：程序中的符号常量b lue_color表示蓝色的值，red_color表示红色的值。

注意：不能修改程序的其他部分和各控件的属性。最后将修改后的文件按原文件名存盘。

Dim left0 As Integer

Const blue color =&HFF0000, red color = &HFF&

Private Sub Command1_Click()

'Timer1.Enabled = ? ***** True *****

End Sub

Private Sub Command2_Click()

Timer1.Enabled = False

End Sub

Private Sub Form_Load()

left0 = Shape1.Left

End Sub

Private Sub Timer1_Timer()

If Shape1.FillColor = blue color Then

If Shape1.Left > 0 Then

Shape1.Height = Shape1.Height + 100

Shape1.Width = Shape1.Width + 100

Shape1.Left = Shape1.Left - 50

Shape1.Top = Shape1.Top - 50

Else

'Shape1.FillColor = ? ***** red_color *****

End If

If Shape1.FillColor = red color Then

If Shape1.Left < left0 Then

Shape1.Height = Shape1.Height - 100

Shape1.Width = Shape1.Width - 100

'？= Shape1.Left + 50 ***** Shape1.Left *****

'？= Shape1.Top + 50 ***** Shape1.top *****

Else

'Shape1.FillColor = ? ***** blue_color *****

End If

End Sub

*****第12套综合应用题

在考生文件夹下有一个工程文件sjt5.vbp，包含了所有控件和部分程序。当程序运行时，单击"打开文件"按钮，则

弹出"打开"对话框，默认目录为考生目录，默认文件类型为"文本文件"。选中in5.txt文件(如

图1所示)，单击"打开"按钮，则把文件中的内容读入并显示在文本框(Text1)中；单击"修

改内容"按钮，则将Text1中的大写字母"E"、"N"、"T"改为小写，把小写字母"e"、"n"、

"t"改为大写；单击"保存文件"按钮，则弹出"另存为"对话框，默认文件类型为"文本文

件"，默认文件夹为考生文件夹，默认文件为"out5.txt"(如图2所示)，单击"保存"按钮，

全国计算机等级考试二级VB笔试试题及答案

2009年9月全国计算机等级考试二级VB笔试试题及答案一、选择题（每小题2分，共70分）一、选择题 1．下列数据结构中，属于非线性结构的是（）。 A. 循环队列 B.带链队列 C.二叉树 D.带链栈答案C Array解析树均是非线性结构 2. 下列数据结构中,能够按照”先进后出”原则存取数据的是（）。 A. 循环队列 B.栈 C.队列 D.二叉树答案B 解析:栈是先进后出或后进先出的线性表 3. 对于循环队列,下列叙述中正确的是（）。 A.队头指针是固定不变的 B.队头指针一定大于队尾指针 C.队头指针一定小于队尾指针 D.队头指针可以大于队尾指针，也可以小于队尾指针答案D 解析:如果队头指针大于队尾指针说明队列已经循环存放数据了,如果队头指针小于队尾指针说明没有进行循环存放 4. 算法的空间复杂度是指（）。 A.算法在执行过程中所需要的计算机存储空间 B.算法所处理的数据量

C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的临时工作单元数答案A 解析:算法的空间复杂度是指执行算法所需要的内存空间,包括算法程序所占空间,输入的初始数据所占空间和执行过程中所需要的额外空间. 5. 软件设计中划分模块的一个准则是（）。 A. 低内聚低耦合 B. 高内聚低耦合 C. 低内聚高耦合 D. 高内聚高耦合答案B 解析:模块内部各元素之间的联系要紧密,高内聚,模块间的连接的紧密程度要低,低耦合,这样可以提高模块的独立性. 6.下列选项中不属于结构化程序设计原则的是（）。 A.可封装 B.自顶向下 C.模块化 D.逐步求精答案A 7.软件详细设计产生的图如下该图是( ). A.N-S图 B. PAD图 C. 程序流程图 D.E-R图答案C 8.数据库管理系统是（）。

江苏省计算机二级VB考试真题及参考答案

2007年秋季vb考试真题 1．下面关于比特的叙述中，错误的是( 1 ) A．比特是组成数字信息的最小单位 B．比特只有“0”和“1”两个符号 C．比特既可以表示数值和文字，也可以表示图像和声音 D. 比特”1”总是大于比特“0” 2．在下列有关集成电路的叙述中，错误的是( 2 ) A．现代集成电路使用的半导体材料主要是硅 B．大觑模集成电路一般以功能部件、子系统为集成对象 C．我国第2代居民身份证中包含有IC芯片 D? 目前超大规模集成电路中晶体管的基本线条已小到l纳米左右 3．在下列有关通信技术的叙述中，错误的是( 3 ) A.通信的基本任务是传递信息，因而至少需由信源、信宿和信道组成 B.通信可分为模拟通信和数字通信，计算机网络属于模拟通信 C.在通信系统中，采用多路复用技术的目的主要是提高传输线路的利用率 D?学校的计算机机房一般采用5类无屏蔽双绞线作为局域网的传输介质 4.下面是关于PC机主存储器的一些叙述，其中正确的是( 4 ) A.主存储器是一种动态随机存取存储器(RAM) B.主存储器的基本编址单位是字(即32个二进位) C.目前市场上销售的PC机，其内存容量可达数十GB D.所有PC机的内存条都是通用的：可以互换 5．现行PC机中，IDE(或SATA)接口标准主要用于( 5 ) A．打印机与主机的连接C．声卡与主机的连接 B．显示器与主机的连接D．硬盘与主机的连接 6. 下列有关PC机的CPU、内存和主板的叙述中，正确的是( 6 ) 。 A．大多数Pc机只存一块CPu芯片，即使是“双核”CPU也是一块芯片 B．所有Pentium系列微机的内存条相同，仅有速度和容量大小之分 C．主板上芯片组的作用是提供存储器控制功能，I/O控制与芯片组无关 D．主板上CMOS芯片用于存储CMOS设置程序和一些软硬件设置信息 7.下列有关目前Pc机辅助存储器的叙述中，错误的是( 7 ) A．硬盘的容量越来越大，这是因为硬盘中磁盘碟片的数目越来越多 B．硬盘的内部传输速率一般小于外部传输速率 c．优盘采用Flash存储器技术，属于半导体存储器 D．目前常见COMBO光驱是一种将CD-RW和DVD-ROM组合在一起的光驱 8.下面有关Windows操作系统，(95以后版本)的叙述中，错误的是( 8 ) 。A．Windows操作系统支持系统中多个任务的并发执行 B．利用Whldows附件“系统工具”中的“系统信息”可以查看内存的工作情况 C．系统规定文件名最多由128个字符组成 D．Vista是Microsoft公司推出的Windows XP操作系统的后继版本 9.算法设计是编写程序的基础。下列关于算法的叙述中，正确的是( 9 ) 。 A．算法必须产生正确的结果C．算法可以没有输出 B．算法必须具有确定性D．算法的表示必须使计算机能理解 10．因特网使用TCP／IP协议实现全球范围的计算机网络互连，连接在因特网上的每一台主机

计算机二级VB考试试题

站长提醒广大考生：下面的138道题目，在二级考试中命中率极高。一、选择题 (1) 下面叙述正确的是(C) A. 算法的执行效率与数据的存储结构无关 B. 算法的空间复杂度是指算法程序中指令（或语句）的条数 C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止 D. 以上三种描述都不对 (2) 以下数据结构中不属于线性数据结构的是(C) A. 队列 B. 线性表 C. 二叉树 D. 栈 (3) 在一棵二叉树上第5层的结点数最多是(B) 注：由公式2k-1得 A. 8 B. 16 C. 32 D. 15 (4) 下面描述中，符合结构化程序设计风格的是(A) A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑 B. 模块只有一个入口，可以有多个出口 C. 注重提高程序的执行效率 D. 不使用goto语句 (5) 下面概念中，不属于面向对象方法的是(D) 注：P55-58 A. 对象 B. 继承 C. 类 D. 过程调用 (6) 在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是(B) A. 可行性分析 B. 需求分析 C. 详细设计 D. 程序编码 (7) 在软件开发中，下面任务不属于设计阶段的是(D) A. 数据结构设计 B. 给出系统模块结构 C. 定义模块算法 D. 定义需求并建立系统模型 (8) 数据库系统的核心是(B) A. 数据模型 B. 数据库管理系统 C. 软件工具 D. 数据库 (9) 下列叙述中正确的是(C) A.数据库是一个独立的系统，不需要操作系统的支持 B.数据库设计是指设计数据库管理系统 C.数据库技术的根本目标是要解决数据共享的问题 D.数据库系统中，数据的物理结构必须与逻辑结构一致 (10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108

全国计算机等级考试二级笔试试卷VB语言程序设计

2011年9月全国计算机等级考试二级笔试试卷VB语言程序设计一、选择题 1、下列叙述中正确的是 A、算法就是程序 B、设计算法时只需要考虑数据结构的设计 C、设计算法时只需要考虑结果的可靠性 D、以上三种说法都不对 2、下列关于线性链表的叙述中，正确的是 A、各数据结点存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致 B、各数据结点的存储顺序可以不一致，但它们的存储空间必须连续 C、进行插入与删除时，不需要移动表中的元素 D、以上三种说法都不对 3、下列关于二叉树的叙述中，正确的是 A、叶子结点总是比度为2的结点少一个 B、叶子结点总是比度为2的结点多一个 C、叶子结点数是度为2的结点数的两倍 D、度为2的结点数是度为1的结点数的两倍 4、软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。 A、学生成绩管理系统 B、C语言编译程序 C、UNIX操作系统D 5 该系统总体结构图的深度是 A、7 B、6 C、3 D、2 6、程序调试的任务是 A、设计测试用例 B、验证程序的正确性 C、发现程序中的错误 D、诊断和改正程序的错误 7、下列关于数据库设计的叙述中，正确的是 A、在需求分析阶段建立数据字典 B、在概念设计阶段建立数据字典 C、在逻辑设计阶段建立数据字典 D、在物理设计阶段建立数据字典 8、数据库系统的三级模式不包括 A、概念模式 B、内模式 C、外模式 D、数据模式 9、有三个关系R、S和T如下： R S 则由关系R和S得到关系T的操作是 A、自然连接 B、差 C、交 D、并 10、下列选项中属于面向对象设计方法主要特征的是 A、继承 B、自顶向下 C、模块化 D、逐步求精 11、以下描述中错误的是 A、窗体的标题通过其Caption属性设置

zlegfa考试中心安徽省计算机二级VB笔试权威模拟试题及复习资料

-+ 懒惰是很奇怪的东西，它使你以为那是安逸，是休息，是福气；但实际上它所给你的是无聊，是倦怠，是消沉;它剥夺你对前途的希望，割断你和别人之间的友情，使你心胸日渐狭窄，对人生也越来越怀疑。 —罗兰全国高等学校（安徽考区）计算机水平考试试卷B （二级Visual Basic 语言）一、单项选择题（每题1分，共40分） 1．计算机硬件系统中最核心的部件是 C 。 A）内存储器B）输入/输出设备C）CPU D）硬盘 2．计算机最早的应用领域是 A 。 A）科学计算B）图形处理C）过程控制D）人工智能3．下列属于文字处理软件的是 B 。 A）Windows B）Word C）PowerPoint D）Excel 4．在计算机系统内部，所有数据都是采用 D 表示。 A）十六进制B）十进制C）八进制D）二进制 5．在Windows系统中，下面文件命名合法的是 B 。 A）A*.DOC B）AB.DOC C）A?.DOC D）A>.DOC 6．计算机可以播放DVD等音像制品, 主要运用的是 A 技术。 A）多媒体B）人工智能C）数据库D）数据挖掘7．将文件从FTP服务器传输到本地计算机的过程称为 D 。 A）上传B）浏览C）查找D）下载 8．下列IP地址中，错误的是 C 。 A）219.231.10.155 B）192.168.5.1 C）219.260.20.12 D）192.10.6.7 9．下列关于计算机病毒的叙述中，正确的是 C 。 A）加密文件不会感染计算机病毒 B）系统软件不会感染计算机病毒 C）有防火墙的计算机系统也会感染病毒 D）压缩的文件不会感染计算机病毒

全国计算机等级考试二级VB语言笔试试题与答案

2005年9月全国计算机等级考试二级笔试试卷公共基础知识和Visual Basic 语言程序设计 (考试时间90 分钟，满分100 分) 一、选择题 (每小题 2 分,共 70 分 ) 下列各题A) 、 B) 、C)、 D) 四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）下列叙述中正确的是 A ．程序设计就是编制程序 C．程序经调试改错后还应进行再测试C。 B．程序的测试必须由程序员自己去完成 D．程序经调试改错后不必进行再测试（2）下列数据结构中，能用二分法进行查找的是A ．顺序存储的有序线性表 B ．线性链表 A C．二叉链表。 D．有序线性链表（3）下列关于栈的描述正确的是C。 A．在栈中只能插入元素而不能删除元素 B．在栈中只能删除元素而不能插入元素 C．栈是特殊的线性表，只能在一端插入或删除元素 D．栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素（4）下列叙述中正确的是D。 A．一个逻辑数据结构只能有一种存储结构 B．数据的逻辑结构属于线性结构，存储结构属于非线性结构 C．一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率 D．一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率（5）下列描述中正确的是C。 A．软件工程只是解决软件项目的管理问题 B．软件工程主要解决软件产品的生产率问题 C．软件工程的主要思想是强调在软件开发过程中需要应用工程化原则 D．软件工程只是解决软件开发中的技术问题（6）在软件设计中，不属于过程设计工具的是D。 A ． PDL( 过程设计语言 ) B ．PAD 图C． N-S 图 D． DFD 图（7）下列叙述中正确的是A。 A ．软件交付使用后还需要进行维护B．软件一旦交付使用就不需要再进行维护C．软件交付使用后其生命周期就结束D．软件维护是指修复程序中被破坏的指令（8）数据库设计的根本目标是要解决A。 A ．数据共享问题B．数据安全问题C．大量数据存储问题 D ．简化数据维护

计算机二级考试VB一般程序设计习题

般程序设计习题 '〖第1题〗:(事件)单击窗体。 '(响应)求100以内偶数的和，并将结果输出在窗体上。 '将结果存入变量SUM中 '答案：DimiAsInteger Fori=ITolOO lfiMod2=0Then sum=sum+i EndIf Next Printsum '〖第2题〗:(事件)双击窗体。 '(响应)求s=1+1X 2+1 X 2X 3+…+1X 2 X 3X …X 10, '并将结果存到变量S中答案：DimijAsInteger DimkAsLong k=1 s=0 Fori=1To10 Forj=1Toi k=k*j Next s=s+k k=1 Next Print(CStr(s)) '〖第3题〗:(事件)单击窗体。 '(响应)求1+2+3+……+100的值，并把结果输出在窗体上。'结果存入变量SUM中o '答案：DimiAsInteger Fori=1To100 sum=sum+i Next Printsum '〖第4题〗：判断一个数是否是素数。 '答案：DimiAsInteger Prime=True Fori=2ToInt(Sqr(m)) lfmModi=0ThenPrime=False:ExitFor Nexti '〖第5题〗:(事件)单击窗体。 '(响应)求1-1/2+1/3-1/4+ ……+1/99-1/100 的值。 '将结果存入变量J中。 DimiAsInteger Fori=1To100 IfiMod2=1Then j=j+1/i ElseIfiMod2=0Then j=j-1/i EndIf Next Printj ”〖第6题〗:(事件)单击窗体。 '(响应)求200~300之间既能被3整除又能被7整除的数 '并求出所有数之和存入变量SUM中 '答案：DimiAsInteger Fori=2 0仃o300 If((iMod3)=0)And((iMod7)=0)Then Print(CStr(i)) sum=sum+i

计算机二级考试VB基础题

一、选择题 1.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（）。 A.工程资源管理器窗口 B.工具箱窗口 C.代码窗口 D.属性窗口 2.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）。 A.单选按钮 B.图片框 C.通用对话框 D.文本框 3.VB的启动有多种方法，下面不能启动VB的是（）。 A.使用“开始”菜单中的“程序”命令 B.使用“开始”菜单中的“运行”命令，在弹出的对话框中输入VB启动文件名 C.使用“我的电脑”，在VB所在硬盘驱动器中找到相应的VB文件夹 D.先打开VB的“文件”菜单，再按Alt+Q组合键 4.VB的工程资源管理器可管理多种类型的文件，下面叙述不正确的是（）。 A.窗体文件的扩展名为.frm，每个窗体对应一个窗体文件 B.标准模块是一个纯代码性质的文件，它不属于任何一个窗体 C.用户通过类模块来定义自已的类，每个类都用一个文件来保存，其扩展名为.bas D.资源文件是一种纯文本文件，可以用简单的文字编辑器来编辑 5.通过（）窗口可以在设计时直观地调整窗体在屏幕上的位置。 A.代码窗口 B.窗体布局窗口 C.窗体设计窗口 D.属性窗口 6.下列不能打开属性窗口的操作是（）。 A.按F4键 B.执行“视图”菜单中的“属性窗口”命令 C.按Ctrl+T D.单击工具栏上的“属性窗口”图标 7.Visual Basic6.0默认的工具栏是（）工具栏。 A.文件 B.数据库 C.格式 D.标准 8.下列可以打开文件对话框的操作是（）。 A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G 9.以下不能在“工程资源管理器”窗口中列出的文件类型是（）。 A..bas B..res C..frm D..ocx 10.以下不属于Visual Basic系统的文件类型是（）。 A..frm B..bat C..vbg D..vbp 11.如果要向工具箱中加入控件的部件，可以利用“工程”菜单中的（）命令。 A.引用 B.部件 C.工程属性 D.加窗体 12.以下关于窗体描述正确的是（）。 A.只有用于启动的窗体可以有菜单 B.窗体事件和其中所有控件事件的代码都放在窗体文件中 C.窗体的名字和存盘的窗体文件名必须相同 D.开始运行时窗体的位置只能是设计阶段时显示的位置 13.VB中控件主要分为3类，下面哪一种不是VB中的控件类（）。 A.标准控件 B.ActiveX C.可插入控件 D.外部控件 14.以下叙述中错误的是（）。 A.双击鼠标可以触发DblClick事件 B.窗体或控件的事件的名称可以由编程人员确定 C.移动鼠标时，会触发MouseMove事件 D.控件的名称可以由编程人员设定

计算机等级考试二级_VB笔试真题及答案

2006年9月二级VisualBasic程序设计笔试试卷及答案一、单项选择 (1)下列选项中不符合良好程序设计风格的是_____ 。 A) )源程序要文档化B)数据说明的次序要规范化 C) )避免滥用goto 语句D)模块设计要保证高耦合、高内聚 (2)从工程管理角度，软件设计一般分为两步完成，它们是_____ 。 A) )概要设计与详细设计B)数据设计与接口设计 C) )软件结构设计与数据设计D)过程设计与数据设计 (3)下列选项中不属于软件生命周期开发阶段任务的是_____ 。 A) )软件测试B)概要设计C)软件维护D)详细设计 (4)在数据库系统中，用户所见的数据模式为_____ 。 A) )概念模式B)外模式C)内模式D)物理模式 (5)数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和_____ 。 A) )编码设计B)测试阶段C)运行阶段D)物理设计 (6)设有如下三个关系表：下列操作中正确的是_____ 。 (7)下列叙述中正确的是_____ 。 A) )一个算法的空间复杂度大，则其空间复杂度也必定大 B) )一个算法的空间复杂度大，则其时间复杂度必定小 C) )一个算法的时间复杂度大，则其空间复杂度必定小 D) )上述三种说法都不对 (8)在长度为64 的有序线性表中进行顺序查找，最坏情况下需要比较的次数为_____ 。 A) ) 63 B) 64 C) 6 D) 7 (9)数据库技术的根本目标是要解决数据的_____ 。 A) )存储问题B)共享问题C)安全问题D)保护问题 (10)对下列二叉树：进行中序遍历的结果是_____ 。 A) ) ACBDFEG B) ACBDFGE C) ABDCGEF D) FCADBEG (11)以下叙述中正确的是_____ 。

2012江苏省计算机二级VB试题库及答案

江苏省高等学校非计算机专业学生计算机基础及应用能力等级考试试卷二级Visual Basic全真模拟试卷一（本试卷包括计算机基础知识部分和程序设计部分，考试时间共120分钟）说明： 1．本试卷满分为60分，分选择题和填空题，试卷不分A、B类型。 2．选择题用答题卡答题。每一项有A、B、C、D四个可供选择的答案，请选择其中一个你认为正确的答案，用HB铅笔涂写在答题卡的相应答题号内。每选对一项得1分，不选或选错不得分。 3．填空题用答题纸答题。请将答案填写在答题纸的相应答题号内，每个答案只占一行,不得换行。每填对一个答案得1分，不填或填错不得分。 4．请认真填写并仔细核对答题卡和答题纸上的学校名称、准考证号和姓名是否填写正确。第一部分计算机基础知识 1．在下列关于信息系统的叙述中，错误的是 1 。 A．广播/电视是一种双向的、点到多点的信息交互系统 B．网络聊天是一种双向的、以信息交互为主要目的的系统 C．电话是一种双向的、点对点的、以信息交互为主要目的的系统 D．Internet是一种跨越全球的多功能信息系统 2．下面关于集成电路（IC）的叙述中正确的是 2 。 A．集成电路是20世纪60年代出现的 B．按用途可分为通用和专用两大类，微处理器和存储器芯片都属于专用集成电路 C．现代微电子技术已经用砷化镓取代了硅 D．集成电路的工作速度与组成逻辑门电路的晶体管尺寸有密切关系3．交换技术是指使用交换设备实现多对终端设备之间的互连，以满足多用户通信的需要，下面对于交换技术的说法中，正确的是 3 。 A．交换技术只有电路交换和分组交换两种类型 B．分组交换方式的线路利用率很低 C．电路交换采用存储转发方式传输数据 D．目前广域网中普遍采用的交换技术是分组交换 4．计算机中的数值信息分成整数和实数（浮点数）。实数之所以能表示很大或很小的数，是由于使用了4。 A．阶码B．反码C．补码D．BCD码5．下列存储器中，速度最快的是5。 A．内存B．寄存器B．外存D．高速缓存6．下列关于USB接口的叙述中，错误的是6。 A．利用“USB集线器”，一个USB接口能连接多个设备 B．USB的中文含义是通用串行总线

全国计算机等级考试VB二级上机题库,有答案

VB上机试题全国计算机等级考试二级VB上机题库(第一套) 一、基本操作题（2小题，每小题15分，共计30分） 1．在名称为Form1的窗体上画一个文本框，其名称为T1,宽度和高度分别为1400和400；在画两个按钮，其名称分别为C1和C2，标题分别为“显示”和“扩大”，编写适当的事件过程。程序运行后，如果单击C1命令按钮，则在文本框中显示“等级考试”，如图1所示，如果单击C2命令按钮，则使文本框在高、宽方向上各增加一倍，文本框中的字体大小扩大到原来的3倍，如图2所示。注意：要求程序中不得使用变量。存盘时必须放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。图1 图2 解析：（大家请注意，以下分析加入我个人的理解和方法，都已通过上机验证，有的题方法不止一种，大家可以和我互相交流，我的邮箱：hero_chenxi@https://www.doczj.com/doc/4c14968384.html,，QQ:313691262，也可从论坛讨论https://www.doczj.com/doc/4c14968384.html,）这道题没什么难度，主要考你窗体、按钮及文本框的基本属性，所以大家一定要熟练掌握常用控件的基本属性。打开VB(不用我说了吧)，新建一个工程（标准的EXE），单击控件面板的“TextBox”控件（也可双击，直接在窗体建立），在属性面板中将“名称”修改为T1，“Width”修改为1400，“Height”修改为400。然后单击控件面板的“CommanButton”添加两个命令按钮，在属性面板中将“名称”分别修改为C1和C2，“Caption”分别修改为显示和扩大。接下来双击显示按钮，进入代码编写窗口，键入：（按钮的Click事件）T1.text=”等级考试” 双击扩大按钮，键入：（按钮的Click事件） T1.width=T1.width+1400 T1.Height=T1.Height+400 T1.fontsize=T1.fontsize*3 最后单击保存按钮，工程命名为sjt1.vbp,窗体命名为sjt1.frm。总结：这道题只要错一点就没有分，主要考大家仔细认真及属性设置的熟练程度，大家一定了解Caption、Text等属性在不同控件含义是不同，有的控件有这个属性，而那个控件没有，名称属性是不能在运行期间改变的等等。以上限于时间原

计算机二级VB题库

计算机二级《V B》选择题题库及答案2017选择题 (1)下列符号常量的声明中不合法的是 = =5+8 ="25" =”OK” 【答案】C 【解析】定义符号常量的一般格式：Const常量名[As数据类型]=表达式，“常量名”参数就是给常量命名。“数据类型”表示常量的数据类型，一般可以省略，这时由后面的“表达式”参数来指明常量的数据类型。表达式可以是数值型常量、字符型常量、布尔型常量和日期型常量。 (2)以下合法的VB变量名是 #b 【答案】D 【解析】VB中变量的命名规则为：①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB的保留字。-X不能以一下划线开头，不合法;2y不能以数字开头，不合法;a#b中有#，不合法;D选项符合命名规则，故D.选项正确。 (3)为把圆周率的近似值存放在变量pi中，应该把变量pi定义为 (7)AsInteger

【答案】C 【解析】单精度Single或双精度Double型的变量能够保存浮点型小数，整型 Integer和长整型Long的变量只能保存整型数据。本题中圆周率为，小数，可定义一个Single或Double型变量来保存。故选C.。 (4)下列符号常量的声明中不合法的是： =5+8 =“25” =“OK” 【答案】c 【解析】定义符号常量的一般格式：Const常量名[As数据类型]=表达式，“常量名”参数就是给常量命名。“数据类型”表示常量的数据类型，一般可以省略，这时由后面的“表达式”参数来指明常量的数据类型。表达式可以是数值型常量、字符型常量、布尔型常量和日期型常量。 (5)对于语句DimVarl#，Var2AsInteger，下列说法中正确的是 #和Var2都被定义为整型变量被定义为双精度型变量，Var2被定义为整型变量被定义为长整型变量，Var2被定义为整型变量 #被定义为变体变量，Var2被定义为整型变量【答案】B 【解析】定义变量时.可在定义变量时指定其类型，也可用类型说明符定义变量。在语句DimVarl#，中，Varl采用类型说明符定义变量，#是双精度型的类型说明符，其类型名为Double，Varl是双精度变量。Var2在定义变量时指定的类型，为整型变量。故选项 B正确，A、C和D项错误。

2020年计算机二级VB考前模拟试题

2020年计算机二级VB考前模拟试题 1.下列关于栈的叙述准确的是(D) A)栈是非线性结构 B)栈是一种树状结构 C)栈具有先进先出的特征 D)栈具有后进先出的特征 2.若某二叉树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是(D) A)bdgcefha B)gdbecfha C)bdgaechf D)gdbehfca 3.根据数据结构中各数据元素之间前后件关系的复杂水准，一般将数据结构分成(C) A)动态结构和静态结构 B)紧凑结构和非紧凑结构 C)线性结构和非线性结构 D)内部结构和外部结构 4.下面对对象概念描述错误的是(A) A)任何对象都必须有继承性 B)对象是属性和方法的封装体

C)对象间的通讯靠消息传递 D)操作是对象的动态属性 5.软件开发的结构化生命周期方法将软件生命周期划分成(A) A)定义、开发、运行维护 B)设计阶段、编程阶段、测试阶段 C)总体设计、详细设计、编程调试 D)需求分析、功能定义、系统设计 6.下列工具中为需求分析常用工具的是(D) A)PAD B)PFD C)N-S D)DFD 7.开发大型软件时，产生困难的根本原因是(A) A)大系统的复杂性 B)人员知识不足 C)客观世界千变万化 D)时间紧、任务重 8.下述关于数据库系统的叙述中准确的是(A) A)数据库系统减少了数据冗余 B)数据库系统避免了一切冗余 C)数据库系统中数据的一致性是指数据类型一致

D)数据库系统比文件系统能管理更多的数据 9.单个用户使用的数据视图的描述称为(A) A)外模式 B)概念模式 C)内模式 D)存储模式 10.关系数据库管理系统能实现的专门关系运算包括(B) A)排序、索引、统计 B)选择、投影、连接 C)关联、更新、排序 D)显示、打印、制表 11.与传统的程序设计语言相比，Visual Basic 最突出的特点是 (C) A)结构化程序设计 B)程序开发环境 C)事件驱动编程机制 D)程序调试技术 12.在Visual Basic 中，下列优先级的运算符是(A) A)* B)\ C)<

2010年9月计算机二级VB笔试试题及答案

2010年9月全国计算机二级VB笔试试题一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的，请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）下列叙述中正确的是______。 A）线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的 B）线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C）线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构 D）上述三种说法都不对（2）下列叙述中正确的是______。 A）在栈中，栈中元素随栈底指针与栈顶指针的变化而动态变化 B）在栈中，栈顶指针不变，栈中元素随栈底指针的变化而动态变化 C）在栈中，栈底指针不变，栈中元素随栈顶指针的变化而动态变化 D）上述三种说法都不对（3）软件测试的目的是______。 A）评估软件可靠性B）发现并改正程序中的错误 C）改正程序中的错误D）发现程序中的错误（4）下面描述中，不属于软件危机表现的是______。 A）软件过程不规范B）软件开发生产率低 C）软件质量难以控制D）软件成本不断提高（5）软件生命周期是指______。 A）软件产品从提出、实现、使用维护到停止使用退役的过程 B）软件从需求分析、设计、实现到测试完成的过程 C）软件的开发过程 D）软件的运行维护过程（6）面向对象方法中，继承是指______。 A）一组对象所具有的相似性质B）一个对象具有另一个对象的性质 C）各对象之间的共同性质D）类之间共享属性和操作的机制（7）层次型、网状型和关系型数据库划分原则是______。 A）记录长度B）文件的大小 C）联系的复杂程度D）数据之间的联系方式（8）一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员、与实体计算机之间的联系是______。 A）一对一B）一对多C）多对多D）多对一（9）数据库设计中反映用户对数据要求的模式是______。 A）内模式B）概念模式C）外模式D）设计模式（10）有三个关系R、S和T如下：

2010年3月计算机等级考试二级_VB笔试真题及答案

2010年3月全国计算机等级考试二级VB笔试试卷一、选择题（每题2分，共70分）（1）下列叙述中正确的是( ) A)对长度为n的有序链表进行查找，最坏情况下需要比较次数为n B)对长度为n的有序链表进行对分查找，最坏情况下需要比较次数为（n/2） C)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数（log2n） D)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数（nlog2n）（2）算法的时间复杂是指( ) A)算法的执行时间 B)算法所处理的数据量 C)算法程序中的语句或指令条数 D)算法在执行过程中所需要的基本运算次数（3）软件按功能可以分为：应用软件、系统软件和支持软件（或工具软件），下面属于系统软件的是( ) A)编辑软件 B)操作系统 C)教务管理系统 D）浏览器（4）软件（程序）调试的任务是( ) A)诊断和改正程序中的错误 B)进肯能多的发现程序中的错误 C)发现并改正程序中的所有错误 D)确定程序中错误的性质（5）数据流程图（DFD图）是( ) A)软件概要设计的工具 B)软件详细设计的工具 C)机构化方法的需求分析工具 D)面向对象方法的需求分析工具（6）软件生命周期可以分为定义阶段，开发阶段和维护阶段。详细设计属于( ) A)定义阶段 B)开发阶段 C)维护阶段 D)上述三个阶段（7）数据库管理系统中负责数据模式定义的语言是 A）数据定义语言 B）数据管理语言 C）数据操纵语言 D）数据控制语言（8）在学生管理的关系数据库中，存取一个学生信息的数据单位是 A）文件 B）数据库 C）字段 D）记录（9）数据库设计中，用E-R图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的 A）需求分析阶段 B）逻辑设计阶段 C）概念设计阶段 D）物理设计阶段（10）有两个关系R和T如下：

江苏省计算机二级VB考试真题和答案

2007年春江苏省高等学校非计算机专业学生计算机基础知识和应用能力等级考试二级试卷试卷语种：Visual Basic 第一部分计算机基础知识 1．微电子技术是信息技术领域的关键技术，它以集成电路（IC）为核心。在下列有关叙述中，错误的是。 A．A．目前IC芯片（如CPU芯片）的集成度可达数千万个电子元件 B．B．Moore定律指出，单块IC的集成度平均每半年翻一番 C．C．从原料熔练到最终产品包装，IC的制造工序繁多，工艺复杂，技术难度非常高 D．D．非接触式IC卡采用电磁感应方式无线传输数据，所以又称为射频卡或感应卡 2．在下列有关通信中使用的传输介质的叙述中，错误的是。 A．A．计算机局域网中大多使用无屏蔽双绞线，其无中继有效传输距离大约100m B．B．同轴电缆可用于传输电视信号 C．C．光纤价格高，一般不在校园网和企业网中使用 D．D．微波的波长很短，适合于长距离、大容量无线通信 3．二进制数（1010） 2与十六进制数（B2） 16 相加，结果为。 A．(273) 8B.(274) 8 C.(314) 8 D.(313) 8 4.设有一段文本由基本ASCII字符和GB2312字符集中的汉字组成，其代码为B0 A1 57 69 6E D6 D0 CE C4 B0 E6，则在这段文本中含有。 A．1个汉字和9个西文字符 C.3个汉字和5个西文字符 B.2个汉字和7个西文字符 D.4个汉字和3个西文字符 5.在下列有关CPU的叙述中,错误的是 . A. A.CPU的主要组成部分有运算器、控制器和寄存器组 B. B.CPU的主要功能是执行指令，不同类型CPU的指令系统通常有所不同 C. C.为了加快运算速度，CPU中可包含多个算术逻辑部件（ALU） D. D.目前PC机所有的CPU芯片均为Intel公司的产品 6．PC机在加电启动过程中会运行POST程序、引导程序、系统自举程序等。若在启动过程中，用户按某一热键（通常是Del键）则可以启动CMOS设置程序。这些程序运行的顺序是。 A．A．POST程序->CMOS设置程序->系统自举程序->引导程序 B．B．POST程序->引导程序->系统自举程序->CMOS设置程序 C．C．CMOS设置程序->系统自举程序->引导程序->POST程序 D．D．POST程序->CMOS设置程序->引导程序->系统自举程序 7.目前PC机一般都有USB和FirWire接口,用于连接各种外部设备.在下列关于这两种接口的叙述中,错误的是 . A. https://www.doczj.com/doc/4c14968384.html,B是一种串行接口,可以连接键盘、鼠标器、优盘、数码相机等多种设备

全国计算机二级VB试题

下面的138道题目，在二级考试中命中率极高。一、选择题 (1) 下面叙述正确的是(C) A. 算法的执行效率与数据的存储结构无关 B. 算法的空间复杂度是指算法程序中指令（或语句）的条数 C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止 D. 以上三种描述都不对 (2) 以下数据结构中不属于线性数据结构的是(C) A. 队列 B. 线性表 C. 二叉树 D. 栈 (3) 在一棵二叉树上第5层的结点数最多是(B) 注：由公式2k-1得 A. 8 B. 16 C. 32 D. 15 (4) 下面描述中，符合结构化程序设计风格的是(A) A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑 B. 模块只有一个入口，可以有多个出口 C. 注重提高程序的执行效率 D. 不使用 goto语句 (5) 下面概念中，不属于面向对象方法的是 (D) 注：P55-58 A. 对象 B. 继承 C. 类 D. 过程调用 (6) 在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是(B) A. 可行性分析 B. 需求分析 C. 详细设计 D. 程序编码 (7) 在软件开发中，下面任务不属于设计阶段的是(D) A. 数据结构设计 B. 给出系统模块结构 C. 定义模块算法 D. 定义需求并建立系统模型 (8) 数据库系统的核心是(B) A. 数据模型 B. 数据库管理系统 C. 软件工具 D. 数据库 (9) 下列叙述中正确的是(C) A.数据库是一个独立的系统，不需要操作系统的支持 B.数据库设计是指设计数据库管理系统 C.数据库技术的根本目标是要解决数据共享的问题 D.数据库系统中，数据的物理结构必须与逻辑结构一致 (10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注： P108 A. 内模式 B. 外模式 C. 概念模式 D. 逻辑模式 (11) 算法的时间复杂度是指(C) A. 执行算法程序所需要的时间 B. 算法程序的长度 C. 算法执行过程中所需要的基本运算次数 D. 算法程序中的指令条数 (12) 算法的空间复杂度是指(D) A. 算法程序的长度 B. 算法程序中的指令条数 C. 算法程序所占的存储空间 D. 算法执行过程中所需要的存储空间 (13) 设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B) 注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出 A. 349 B. 350 C. 255 D. 351 (14) 结构化程序设计主要强调的是(B) A.程序的规模 B.程序的易读性 C.程序的执行效率 D.程序的可移植性 (15) 在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功

2016计算机二级vb考试题及答案

2016计算机二级vb考试题及答案计算机二级vb的学习内容：按照新大纲，需要学习的内容有：VB基本概念、集成开发环境、可视化编程方法、基本输入输出、常用控件功能及使用、VB控制结构语句等。以下是计算机二级vb的考试模拟试题，希望对大家的复习有所帮助! 单选题 1、 A.n As Integer j As Integer B.n As Integer Static j As Integer C.ByVal n As Integer J As Integer D.ByVal n As Integer Static j As Integer 2、下列各种窗体事件中，不能由用户触发的事件是( )。 A.Load事件和Unload事件

B.Click事件和Unload事件 C.Click事件和DblClick事件 D.Load事件和Initialize事件 3、 A.4321 B.12 C.34 D.1234 4、在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为ComTest1。设窗体Form1标题为"MyForm1".双击控件数组中的第3个按钮，打开代码编辑器，编写如下代码： Privae Sub ComTest 1_Click(Index As Integer) Form1.Caption="MyForm2"

End Sub 运行时，单击按钮数组中的第1个按钮，则窗体标题显示为( )。 A.Form1 https://www.doczj.com/doc/4c14968384.html,Test1 C.MyForm1 D.MyForm2 5、下列操作中不能向工程中添加窗体的是( )。2016计算机二级vb考试题及答案2016计算机二级vb考试题及答案。 A.执行"工程"菜单中的"添加窗体"命令 B.单击工具栏上的"添加窗体"按钮 C.右击窗体，在弹出的菜单中选择"添加窗体"命令

计算机等级考试二级VB模拟试题四及答案解析

或者你才在上一个洞吞了柏忌，下一个洞你就为抓了老鹰而兴奋不已。计算机等级考试二级VB模拟试题四及答案解析一、选择题 (1)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private SubCommand1_Click() Move 500,500 End Sub 程序运行后，单击命令按钮，执行的操作为 A)命令按钮移动到距窗体左边界、上边界各500的位置 B)窗体移动到距屏幕左边界、上边界各500的位置 C)命令按钮向左、上方向各移动500 D)窗体向左、上方向各移动500 正确答案: B (2)在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是 A)TabStop B)Enabled C)Visible D)TabIndex 正确答案: D (3)以下定义数组或给数组元素赋值的语句中，正确的是 A)Dim a As Variant a=Array(1,2,3,4,5) B)Dima(10)As Integer a=Array(1,2,3,4,5) C)Dim a%(10) a(1)="ABCDE" D)Dim a(3),b(3)As Integer a(0)=0 a(1)=1 a(2)=2 b=a 正确答案: A (4)在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为 A)For i=0 ToList1.ListCount-1 …… Next B)For i=0 To List1.Count-1 只有凭借毅力，坚持到底，才有可能成为最后的赢家。这些磨练与考验使成长中的青少年受益匪浅。在种种历练之后，他们可以学会如何独立处理问题；如何调节情绪与心境，直面挫折，抵御压力；如何保持积极进取的心态去应对每一次挑战。往往有着超越年龄的成熟与自

文档之家

2013计算机二级(VB)考试机试题库

全国计算机等级考试二级VB笔试试题及答案

江苏省计算机二级VB考试真题及参考答案

计算机二级VB考试试题

最新[考试中心]安徽省计算机二级VB笔试权威模拟试题及答案2

全国计算机等级考试二级笔试试卷VB语言程序设计

zlegfa考试中心安徽省计算机二级VB笔试权威模拟试题及复习资料

全国计算机等级考试二级VB语言笔试试题与答案

计算机二级考试VB一般程序设计习题

计算机二级考试VB基础题

计算机等级考试二级_VB笔试真题及答案

2012江苏省计算机二级VB试题库及答案

全国计算机等级考试VB二级上机题库,有答案

计算机二级VB题库

2020年计算机二级VB考前模拟试题

2010年9月计算机二级VB笔试试题及答案

2010年3月计算机等级考试二级_VB笔试真题及答案

江苏省计算机二级VB考试真题和答案

全国计算机二级VB试题

2016计算机二级vb考试题及答案

计算机等级考试二级VB模拟试题四及答案解析