vb 面向过程程序设计的含义_面向对象程序设计_vb程序设计教程答案(10)

Private Sub Form_Click()

For i=1 to 6

Combo1.AddItem i

Next i

For i= 1 to 3

Combo1.RemoveItem i

Next i

End Sub

(A)1 5 6(B)1 3 5 (C)4 5 6(D)2 4 6

? 设窗体上有一个列表框控件List1，且其中含有若干列表项。则以下能表示当前被选

中的列表项内容的是__(22)___.

(A)List1.List B）List1.ListIndex (C)List1.Index (D)List1. Text

? 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编

写如下事件过程：

Private Sub Command1_Click()

n = Val(Text1.Text)

For i = 2 To n

For j = 2 To sqr(i)

If i Mod j = 0 Then Exit For

Next j

If j > Sqr(i) Then Print i

Next i

End Sub

该事件过程的功能是__(23)__

(A) 输出n以内的奇数 (B) 输出n以内的偶数

(C) 输出n以内的素数 (D) 输出n以内能被j整除的数

? 如果要在菜单中添加一个分隔线，则应将其标题属性设置为___(24)_____。

(A)= (B)* (C)& (D)-

? 以下关于文件的叙述中正确的是__(25)__。

(A) 一个记录中所包含的各元素的数据类型都是相同的

(B) 随机文件中每个记录的长度是固定的

(C) Open命令的作用是打开一个已经存在的文件

(D) 使用Input # 语句可以从随时机文件中读取数据

? 以下定义数组或给数组元素赋值的语句中，正确的是__(26)__。

(A) Dim a As Variant (B) Dim a(10) As Integer

a=Array(1,2,3,4,5) a=Array(1,2,3,4,5)

(C) Dim a%(10) (D) Dim a(3),b(3) As Integer

a(1)="ABCDE" a(0)=0 : a(1)=1 : a(2)=2 : b=a ? 窗体中有一个命令按钮，编写如下程序，程序运行后，输出结果为___(27)___。

Private Sub test(p,m,n)

p=p+1: m=m+1: n=n+1

Print “Sub:”; p; m; n

End Sub

Private Sub Command1_Click()

a1=1: b1=2: c1=3

Call test(a1,b1+3,(c1))

Print “Main:”; a1; b1; c1

End Sub

(A) Sub: 2 6 4 (B) Sub: 2 6 4 (C) Sub: 2 6 4 (D) Sub: 2 6 4

Main: 2 6 4 Main: 1 6 4 Main: 1 2 3 Main: 2 2 3 ? 以下语句用于打开一个顺序文件Open"C:\MyFile.txt" For OutPut,但是该语句的一

个重要错误是没有___(28)_____。

(A) 指定打开方式 (B) 指定文件号 (C) 指定打开文件名 (D) 指定文件类型

? 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-22686-10.html