VB程序设计试题与答案-1.doc

《VB程序设计基础》试题 得分 评卷人 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual?Basic表达式，正确的是__________。 A. a=b=c??????? ????B. a=b?Or?b=c? C. a=b?And?b=c????? D. a=b?Not?b=c? 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。  A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 A. Function P1（P1） B. Function P1（By Val x As Integer） As Integer C. Sub P1（x As Integer）As Single D.Sub P1（ByVal x（）） 得分 评卷人 二、填空题：（每空 3 分，共 18 分） 1．找出100以内能同时被3、5、7整除的最小5个数据。 Private Sub Command1_Click() Dim countn%, n% n = 1: countn = 0 Do n = n + 1 If ___________________________________________ Then Print n countn = countn + 1 End If Loop _______________________ End Sub 2. 输出杨辉三角前五行。 Option Base 1 Private Sub Command1_Click() Dim a(5, 5) As Integer, i As Integer, j As Integer For i = 1 To 5 a(i, 1) = 1 _____________________________ Next i For i = 1 To 5 For j = 2