Question

VB程序设计试卷

1、 可以删除字符串前导空格的函数是（ ）
A) Ltrim B) Rtrim C) Left D) Mid
3、 如果执行以下操作：
a=int(Rnd*10+1)
print a
则输出结果是（ ）
a的值不确定，有可能取任意整数
a的值是一个介于0-9之间的任意整数
C) a的值是一个介于1-10之间的任意整数
D) 以上说法均不对
4、 以下是ru对象的单击事件过程，当第2次调用此过程，在执行End Sub之前，b的值是( )
Private Sub ru_Click()
Dim b As Integer b＝b+1 End Sub
A)0 B)1 C)2 D)不确定
5、确定复选框是否选中，可访问的属性是（ ）
A）Value　　 B)Checked　　 C) Selected　　 D) Caption
6、通用对话框中能打开“颜色对话框”的方法是　　
A) ShowOpen　　 B) ShowColor　　 C) ShowSave　　 D) ShowPrinter
7、与传统的程序设计语言相比，VB最突出的特点是（ ）
A) 结构化程序设计B) 程序开发环境C) 事件驱动编程机制D) 程序调试技术
8、能对顺序文件进行输出的语句是（ ）
A) Put　　 B) Get　　 C) Write　　 D) Read
9、在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=8while xa = a+xx = x-1wendPrint aEnd Sub程序运行后，单击命令按钮，则输出结果为（ ）
A) 36 B) 35 C) 37 D) 出错
10、 阅读下面的程序段：For i=1 To 3For j=1 To ia=a+1Next jNext i执行上面的二重循环后，a 的值为（ ）
A) 3 B) 6 C) 9 D) 14
11、 用下面语句定义的数组的元素个数是（ ）Dim A (2，-1 To 3，2) As Integer
A) 18 B) 20 C)16 D) 45
12、 窗体从内存中卸载的过程中会触发许多事件，这些事件的顺序是（ ）
A）QueryUnload、Unload、Terminate B）Unload、QueryUnload、Terminate
C）Terminate、QueryUnload、Unload D）QueryUnload、Terminate、Unload
13、文本框不具有的属性是（ ）
A) Multiline B) CaptionC)Font D) Height
14、 要想使文件列表框（file1）和目录列表框(dir1)同步，则应书写下列哪段程序（ ）
A) Private Sub file1_Change()File1.Path = Dir1.PathEnd Sub
B) Private Sub Dir1_Change()File1.Path = Dir1.PathEnd Sub
C) Private Sub Dir1_Change()Dir1.Path = File1.PathEnd Sub
D) Private Sub file1_Change()Dir1.Path = File1.PathEnd Sub
二、填空题（每空2分，共20分）请将每一个空的正确答案写在答题纸对应题号的横线上，其它作答方式不得分。
1、以下程序的循环次数为【2】K=0DO WHILE K<=10K=K+1LOOP
2、声明变量为模块级，则应在模块的声明段中用【4】或【5】来定义。
3、设有如下的代数式：5 ×x2 - 3 × x - 2× Sin(a) ÷3它相当于Visual Basic表达式【6】4、为了将数据写入顺序文件c:\a1.txt，应首先将文件以【8】语句打开。

Answer 1

（1）A（3）C（4）B（5）A（6）B（7）B（8）C（9）A（10）B（11）D（12）B（13）B（14 ）B
填写的空白
1（2）11
2（4）公共（5）私人
3（6）5 * X * X-3 * X -2 * SIN（A）/ 3
（8）打开“C：\ a1.txt”输出为＃1

Answer 2

(1)A(3)C(4)B(5)A(6)B(7)B(8)C(9)A(10)B(11)D(12)B(13)B(14)B
填空题
1.（2）11
2.(4)public（5）private
3.(6)5*x*x-3*x-2*sin(a)/3
(8)open "c:\a1.txt" for output as #1