vb基础练习题答案.docVIP

Vb 考试题 一、选择题（ 5 分一题） 1、使用 Visual Basic 编程,我们把工具箱在的工具称为 ( )。 A. 事件 B.工具 C.控件 D.窗体 2、我们保存一个编写好的程序， “过程名 ”是以（ ）作为扩展名的。 A 、.frm B、.vbp C、.bat D、.bas 3、下列变量名写法正确的是（ ）。 A 、abc B、abc123 C、abc_123 D、123abc 4、结束当前程序的语句是（ ）。 A 、quit B、exit C、end D、sub 5、要改变窗体的标题时，应当在属性窗口中改变的属性是（ ）。 A 、Caption B、Name C、Text D、Label 6、VB 是一种面向对象的程序设计语言，构成对象的三要素是（ ）。 A 、属性、事件、方法 B、控件、属性、事件 C、窗体、控件、过程 D、窗体、控件、事件 7、在 VB 中表达式 11\3+11 mod 3 的运算结果值是（ ）。 A 、3 B、4 C、5 D、6 8、语句段 a=3: b=5 t=a: a=b: b=t 执行后，（ ）。 A 、a 值为 3，b 值为 3 B、a 值为 3，b 值为 5 C、a 值为 5，b 值为 5 D、a 值为 5，b 值为 3 9、语句 if 3*4=10 then a=1 else a=2 执行后， a 的值为（ ）。 A 、12 B、10 C、1 D、 2 10、语句段 s=0 for i=1 to 5 s=s+i next i 执行后， s和 i 的值为（ ） A 、1 B、5 C、6 D、15 二、填空判断题（ 4 分一题） （ ）1、 End if 语句对单行 if 语句不需要。 （ ）2、 表达式 (2*3)=5 and 12/3 = 4 的值为 false。 （ ）3、 VB 程序一行写不下，可以直接换行继续写。 4、若整型变量 a 的值为 2、b 的值为 3，则下列程序段执行后整型变量 c 的值为 ______。 If a5 then if b4 then c=a-b else c=b-a End if elseif b3 then c=a*b else c=a mod b End if 5、以下程序用来输出 1 到 100 所有奇数的和，请补充完该程序。 Private Sub Command3_Click() Dim s As Long Dim x As Integer s = 0 For x=1 to 100 step____ s = s + x Next x Print s End Sub 三、编程题（ 30 分） 1、有如下一个窗体（ 20 分） 要求：变成实现 1） 控件加载时， text1、text2、label1 清空， label1 文字居中， command1 文字变成“执行” 2） 实现输入 2 个不相等的数，求这两个数之间不能被 3 整除的数，依次显示在 label1 中 3） 做判断， text1 与 text2 如果相等，或者没有输入数据，给出 msgbox 的提醒 2、改错题（本题 10 分） 求 100——999 之间的水仙花数 1 Private Sub Command1_Click() 2 Dim a, b, c As Intger 3 For i = 100 To 999 step 2 4 a = i \ 100 5 b = (i - 100 * a) \ 10 6 c = i - 100 * a - 10 * b 7 If i = a * a * a + b * b * b + c * c * c Then Text1.Text = Text1.Text i 8 Next i 9 End Sub 10 11 Private Sub Form_Load() 12 Text1.Text = 13 Text1.Lock = True 14 Command1.Caption = 显示 100--1000 之内的水仙花数 15 End Sub 参考答案： 一、选择题： 1、C 2、B，在保存 VB 文件时，会弹出两个保存窗口，一个是用于保存窗体文件，它的扩展名 为.frm ；另一个用于保存工程，它的扩展名为 .vbp。 3、ABC 4、C 5、A 6、B，属性: 对象的特征，如尺寸、位置、颜色或文本。属性决定对象的外观，有时也决定 对象的行为。 事件：由用户或操作系统引发的动作， 如击键、 单击鼠标、 一段时间的限制等。 方法：嵌入在对象定义中的程序代码，它定义对象怎样处理信息并响应某事件。 7、C， “”整除，值为商的整数部分； “mod求”余，值为整除后的余数。 8、D， 最后三条语句是交换两个变量的值，交换两个变量的值也