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

由天下分享时间：2024/12/2 10:13:12 加入收藏我要投稿点赞

程序运行后，单击命令按钮，在输入对话框中分别输入 2 、 4 、 6 ，输入结果为 _____ 。 A) ) 0 B) 2 C) 3 D) 4 (24)有以下程序： Option Base 1 D) im arr() As Integer Private Sub Form_Click() D) im i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr (i,j)=i*2+j Next j Next i

ReDim Preserve arr(1,4) For j=3 To 4 A) rr(3,j)=j+9 Next j

Print arr(3,2);arr(3,4) End Sub

程序运行后，单击窗体，输出结果为 _____ 。 A) ) 8 13 B) 0 13 C) 7 12 D) 0 0 (25)以下叙述中正确的是 _____ 。

A) )一个 Sub 过程至少要一个 Exit Sub 语句 B) )一个 Sub 过程必须有一个 End Sub 语句

C) )可以在 Sub 过程中定义一个 Function 过程，但不能定义 Sub 过程 D) )调用一个 Function 过程可以获得多个返回值 (26)有以下程序： Sub subp(b()As Integer) For i=1To4 B) (i)=2-i

Nexti End Sub

Private Sub Command1_Click() D) im a (1 To 4)As Integer A) (1)=5 A) (2)=6 A) (3)=7 A) (4)=8 subpa() For i=1 To4 Print a (i) Next i End Sub

运行上面的程序，单击命令按钮，输出结果为 _____ 。

A) ) 2 4 6 8 B 、 5 6 7 8 C 、 10 12 14 16 D 、出错 (27)设有如下通用过程： Public Function Fun(xStr As String) D) im tStr As String, srtL As Integer tStr+”” strL=Len(xStr) i=1

D) o While i<=strL/2

tStr=tStr &Mid(xStr,i ,1)& Mid (xStr ,strL-i+1,1) i=i+1 Loop Fun=tStr End Function

在窗体上画一个名称为 Textl 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程：

Private Sub Command 1_ Click()

Dim S1 As String S1=”abcdef”

Text1.Text=UCase(Fun(S1)) End Sub

程序运行后，单击命令按钮，则 Text1 中显示的是 _____ 。 A) ) ABCDEF B) abcdef C) AFBECD D) DEFABC

(28)在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub

假定焦点已经位一地文本框中，则能够触发 KeyPress 事件的操作是 A) )单击鼠标 B)双击文本框

C) )鼠标滑过文本框 D)按下键盘上的某个键

(29)在窗体上画一个命令按钮和两上文体，其名称分别为 Command1 、 Text1 和 Text2 ，然后编写如下程序：

D) im S1 As String, S2 As String Private Sub Form_Load() Text1. Text=”” Text2. Text=”” End Sub

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) S2=s2 & Chr(KeyCode) End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & chr(KeyAscii) End Sub

Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1= “”

S2= “” End Sub

程序运行后，在 Text1 中输入“ abc ”，然后单击命令按钮，在文本框 Text1 和 Text2 中显示的内容分别为 _____ 。

A) abc 和 ABC B 、 abc 和 abc C 、 ABC 和 abc D 、 ABC 和 ABC (30)以下说法正确的是 _____ 。

A)任何时候都可以通过执行“工具”菜单中的“菜单编辑器”命令打开菜单编辑器 B)只有当某个窗体为当前活动窗体时，才能打开菜单编辑器

C)任何时候都可以通过单击标准工具栏上的“菜单编辑器”按钮打开菜单编辑器 D)只有当代码窗品为当前活动窗口时，才能找开菜单编辑器

(31)在窗体上画一个通用对话框，其名称为 CommonDialog1 ，然后画一个命令按钮，并编写如下事件过程：

Private Sub Command1_Click()

CommonDialog1. Filter=”All Files(*.*)|*.*Text Files”&_ “(*.txt)|*.txt| Executable Files(*.exe)|*.exe” CommonDialog1. Filterindex=3 CommonDialog1. Show Open MsgBox CommonDialog1. FileName End Sub

程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 _____ 。 A) All Files(*.*) B) Text files(*.txt) C) Executable Files(*.ext) D)不确定 (32)以下叙述错误的是

A)一个工程中可以包含多个窗体文件

B)在一个窗体文件中用 Public 定义的通用过程不能被其他窗体调用 C) 窗体和标准模块需要分别保存为不同类型的磁盘文件 D)

二、填空题（每空 2 分，共 30 分）

请将每空的正确答案写在答题卡【 1 】 ~ 【 15 】序号的横线上，答在试卷上不得分。 1

下列软件系统结构图的宽度为【 1 】。

【 2 】的任务是诊断和改正程序中的错误。

一个关系表的行称为【 3 】。

按“先进后出”原则组织数据的数据结构是【 4 】。

数据结构分为线性结构和非线性结构，带链的队列属于【 5 】。

描述 \是小于 100 的非负整数 \的 Visual Basic 表达式是【 6 】。

在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后，