江苏省二级考试VB试题汇总

省二级考试VB试题汇总

在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是_______。 D A. 上述三个过程都可以在工程中的任何窗体或模块中被调用

B. frmFunction2和md1Function过程能够在工程中各个窗体或模块中被调用 C. 上述三个过程都只能在各自被定义的模块中调用

D. 只有md1Function过程能够被工程中各个窗体或模块调用（窗体间相互调用过程需在过程名前加上窗体的名称，如果有两个或两个以上的模块，调用时也必须在过程名前加上模块的名称） 74 以下程序段的运行结果是_______。 B

Function abc(n As Integer) As Integer abc = n * 5 + 10 End Function

Private Sub Form_Click() Dim x As Integer

x = abc(234) + 109 * abc(10) Print x End Sub

A. 7700 B. 7720 C. 2340 D. 7770 75 下列程序运行后显示的结果是_______。 A

Public Sub F1(n%,ByVal m%) n=n Mod 10 m=m\\10 End Sub

Private Sub Command1_Click() Dim x%,y% x=12:y=34

CallF1(x,y) Print x,y End Sub

A. 2 34 B. 12 34 C. 2 3 D. 12 3 76 以下关于窗体的描述中，错误的是_______。 A

A. 执行Unload Form1语句后，窗体Form1消失，但仍在内存中 B. 窗体的load事件在加载窗体时发生

C. 当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止 D. 窗体的Height、Width属性用于设置窗体的高和宽

77 若要使某命令按钮获得控制焦点，则可使用_______方法来设置。B A. Refresh B. SetFocus C. GotFocus D. Value

78 设组合框Combo1中有3个项目，则能删除最后一个项的语句是_______。B A. Combo1.RemoveItem Text B. Combo1.RemoveItem 2 C. Combo1.RemoveItem 3

D. Combo1.RemoveItem Combo1.Listcount

79 将数据项\添加到列表框List1中，成为第一项（行）应使用语句_______。A A. List1.AddItem \ B. List1.AddItem \ C. List1.AddItem 0, \

80 假定时钟控件的Interval属性为1000，Enabled属性为True，并且有下面的事件过程，计算机

第 13 页 共 50 页

省二级考试VB试题汇总

将发出_______次Beep声。 D

Private Sub Timer1_Timer() (本题运行会出现错误，因为没有定义变量，如果定义 For i = 1 To 5 了变量，将会一直发出Beep声) Beep Next i End Sub

A. 1000次 B. 10000次 C. 5次 D. 以上都不对

81 将命令按钮Command1的标题作为文本框Text1的文本内容，应执行语句_______。 B A. Text1= Command1

B. Text1.Text= Command1.Caption C. Text1.Caption=Command1.Caption D. Text1.Text= CStr(Command1)

82 下列控件可以用作其他控件容器的有_______。 D A. 窗体，标签，图片框 B. 窗体，框架，文本框 C. 窗体，图像，列表框 D. 窗体，框架，图片框

83 改变驱动器列表框的Drive属性将激活_______事件。 A

A) Change B) Scroll C) KeyDown D) KeyUp 84 在窗体上添加一个列表框和一个文本框，然后编写如下两个事件过程：

Private Sub Form_Load() List1.AddItem \ List1.AddItem \ List1.AddItem \ List1.AddItem \End Sub

Private Sub List1_DblClick() a = List1.Text

Print a + Text1.Text End Sub

程序运行后，在文本框中输入\，然后双击列表框中的\，则输出结果为_______。 B A. 1245 B. 456789 C. 789 456 D. 0 85 在窗体上添加一个文本框，然后编写如下事件过程：

Private Sub Form_Load() Text1.Text = \ For i = 1 To 10 Sum = Sum + i Next i

Text1.Text = Sum End Sub

上述程序的运行结果是_______。 A

A. 在文本框Text1中输出55 B. 在文本框Text1中输出0

C. 出错 D. 在文本框Text1中输出不定值 86 在窗体上添加一命令按钮Command1，并将其Caption属性设置为cmdAA、名称属性设置为cmdBB，则关于该控件的下列_______语句是正确的。 C A. Command1.Left=100 B.cmdAA.Left=100

第 14 页 共 50 页

省二级考试VB试题汇总

C. cmdBB.Left=100 D. 以上语句都不对

87 在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。在List1的单击事件过程中能正确实现上述功能的语句是_______。 D

A） Label1.Caption = List1.ListIndex B) Label1.Name = List1. ListIndex C） Label1.Name = List1.Text D） Label1.Caption = List1.Text

88 下面对语句 Open \的功能描述错误的是_______。C A. 以顺序输出模式打开文件\

B. 如果文件\不存在，则建立一个新文件 C. 如果文件\已存在，则打开该文件，新写入的的数据将添加到文件末尾 （Append） D. 如果文件\已存在，则打开该文件，新写入的的数据将覆盖原来的数据 （我的答案） (input :打开已经存在的文件，并从该文件中读取数据)

89 执行语句Open \For Random As #1 Len = 50 后，对文件\中的数据能够进行的操作是_______。 C (随机文件的打开) A. 只能写不能读 B. 只能读不能写

C. 即可以读，也可以写 （二进制文件的打开则是forbinary，也是读写） D. 不能读，也不能写

90 下列说法错误的是_______。 C

A) 当用Write # 语句写顺序文件时，文件必须以Output或Append方式打开 B) 用Input方式打开一个文件时，对同一个文件可以用几个不同的文件号打开（文件不用关闭） C) 用Output和Append方式打开文件时，不用将文件关闭，就能重新打开文件

D) 用Append方式打开文件时，进行写操作，写入文件的数据附加到原来文件的后面 91 下面几个关键字均表示文件的打开方式，只能进行读不能写的是_______。 A

A. Input B. Output（只写不读） C. Random D. Append 92 下列哪个不是写文件语句_______。 D A. Put（随机文件） B. Print（顺序文件） C. Write（顺序文件） D. Output 93 以下叙述中正确的是_______。B

A. 一个记录中所包含的各个元素的数据类型必须相同 B. 随机文件中每个记录的长度是固定的（随机文件以记录的方式进行存储；顺序文件以Ascall C. Open命令的作用是打开一个已经存在的文件 码的方式进行存储，二进制文件以二进制） D. 使用Input#语句可以从随机文件中读取数据（input是读取顺序文件；get是读取随机文件） 94 在窗体上添加一个命令按钮Command1和一个文本框Text1，然后编写如下事件过程：

Private Sub Command1_Click() Dim s As String * 20 s = Text1.Text ?? End Sub

该程序的功能是当单击按钮Command1时，把变量S的内容写入一个顺序文件dat1.dat中，正确的程序段是_______。 B

A. Open \ B. Open \ Write #1, s Write #1, s Close #1 Close #1

C. Open \

第 15 页 共 50 页

省二级考试VB试题汇总

Write #1, s Write #1, s Close #1 Close #1

95 FileFiles.Pattern=\程序代码执行后，会显示_______。 A A. 只包含文件扩展名为\的文件 B. 第一个dat文件 C. 包含所有的文件 D. 显示磁盘的路径

96 目录列表框的Path属性的作用是_______。A A. 显示当前驱动器或指定驱动器上的路径

B. 显示当前驱动器或指定驱动器上的某个目录下的文件名 C. 显示根目录下的文件 D. 只显示当前路径下的文件

97 为了使Drive1驱动器列表框、Dir1目录路径列表框和File1文件列表框同步协调工作，需要_______。 A

A. Drive1的Change事件过程中加入Dir1.Path = Drive1.Drive，在Dir1的Change事件中加入File1.Path = Dir1.Path代码

B. Drive1的Change事件过程中加入Dir1.Path =Dir1.Path，在Dir1的Change事件中加入File1.Path = Drive1.Drive代码

C. Dir1的Change事件过程中加入Dir1.Path = Drive1.Drive，在Drive1的Change事件中加入File1.Path = File1.FileName代码

D. Dir1的Change事件过程中加入Dir1.Path = Drive1.Drive，在Drive1的Change事件中加入File1.Path = Dir1.Path代码

98 以下程序运行后，a1.dat文件的内容是_______。 B

Private Sub Form_Click()

Dim f1 As Integer, f2 As Integer, f3 As Integer Open \ f1 = 2 f2 = 3 f3 = f2 + f1

Write #1, f1 * f2, f2, f3 Close #1 End Sub

A. 2，3，3 B. 6，3，5 C. 2，5，6 D. 无内容

99 以下能判断是否到达文件尾的函数是_______。 D

A) BOF B) LOC（表示文件最后一次读写操作的位置） C) LOF（以字节为单位表示用open语句打开的文件大小） D) EOF 100 一条语句要分行书写，用_______符号作续行符。 C A. + B. - C. _ D. ?

101 VB 6.0的标准化控件位于IDE(集成开发环境)中的_______窗口内。 B A. 工具栏 B. 工具箱 C. 对象浏览器 D. 窗体设计器

102 关于Visual Basic应用程序正确的叙述是_______。 A A. Visual Basic程序运行时，总是等待事件被触发 B. Visual Basic程序设计就是编写代码 （程序编写）

第 16 页 共 50 页