【精选资料】VB综合练习题二及参考答案

VB综合练习题二一、选择题[ (1)—(15)，每小题2分，共30分](1)以下变量名中合法的是A）x2-1 B）print C）str_n D）2x(2)在Viusal Basic中，表达式3 * 2 \ 5 Mod 3的值是A）1B）0C）3D）出现错误提示(3)设窗体文件中有下面的事件过程：Private Sub Command1_Click()Dim sa%=100Print aEnd Sub其中变量a和s的数据类型分别是A) 整型，整型B) 变体型，变体型C) 整型，变体型D) 变体型，整型(4)把数学表达式表示为正确的VB表达式应该是A) (5x+3) / (2y-6) B) X*5+3 / 2*y-6C) (5*x+3)÷(2*y-6) D) (x*5+3)/(y*2-6)(5)“x 是小于105的非负数”，用Visual Basic表达式表示正确的是A) 0<=x<105 B) 0<=x<=105C) 0<=x And x<105 D) 0<=x Or x<105(6)代码“Print “Sqr(16) = “；Sqr(16) ”的输出结果是A) Sqr(16) = Sqr(16) B) Sqr(16) = 4C) ”4” = 4 D) 4 = Sqr(16)(7)设a = "MicrosoftVisualBasic" ，则以下使变量b的值为“VisualBasic”的语句是A) b = Left(a, 10) B) b = Mid(a, 10)C) b = Right(a, 10) D) b = Mid(a, 10, 11)(8)在Visual Basic代码中，将多个语句合并写在一行上的并行符是A) 撇号(') B) 冒号(:) C) 感叹号(!) D) 星号(*)(9)当我们输入代码时，Visual Basic可以自动检测______错误。

A) 语法错误B) 编译错误C) 运行错误D) 逻辑错误(10)设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是A) 命令按钮的Click事件过程名是C1_ClickB) 窗体的Click事件过程的过程名是Myform_ClickC) 命令按钮的Click事件过程的过程名是Command1_ClickD) 上述三个过程名都是错误的(11)以下叙述中正确的是A）窗体的Name属性指定窗体的名称，用来标识一个窗体B）窗体的Name属性值是显示在窗体标题栏中的文体C）可以在运行期间改变窗体的Name属性值D）窗体的Name属性值可以为空(12)以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是A) ="VisualBasic窗体"B) Form1.Title="VisualBasic窗体"C) Form1.Caption="VisualBasic窗体"D) Form1.Text="VisualBasic窗体”(13)下列哪项是窗体对象的方法而不是属性A) Name B) Print C) Caption D) Enabled(14)在窗体上画一个命令按钮（名称为Command1）编写如下事件过程：Private Sub Commmand1_Click()b=1c=3print a=b+cEnd Sub程序运行后，单击命令按钮，输出的结果是A) a=3 B) a=b+c C) 3 D) False(15)设a=10，则执行x = iif(a>7,-1,0) 后，x的值是A) 7 B) 10 C) -1 D) 0二、填空题[ (16)—(20)，每小题2分，共10分]16、假定窗体的名称为Form1，对该窗体编写如下代码：Private Sub Form_Load()Form1.Caption = “AAAAA”Me.Caption = “BBBBB”Caption = “CCCCC”End Sub程序运行后，窗体的标题是______17、语句Z=y+1代表的含义是_________18、在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()x = InputBox("请输入一个整数")Print x + Text1.TextEnd Sub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为_________19、为使计时器控件每个1秒钟产生一个计时器事件，则应将其Interval属性设置为_________20、语句Print 5 / 4 * 6 \ 5 Mod 2 的输出结果是_________三、看程序写结果[ (21)—(24)，每小题3分，共12分](21) 设有如下程序Private Sub Command1_Click()a=0For j=1To15a = a + j Mod 3Next jPrint aEnd Sub程序运行后，单击窗体，输出结果是A) 105 B) 1 C) 120 D) 15(22)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Static x As IntegerClsFor i=1 To 2y=y+xx=x+2NextPrint x , yEnd Sub程序运行后，连续三次单击Command1按钮后，窗体上显示的是A) 4 2 B) 12 18 C) 12 30 D) 4 6(23)下面的程序段执行后，a的值是多少？Private Sub Form_Click()a=1b=1Do while b <> 5a=b-ab=b+1LoopPrint aEnd SubA）5 B）3 C）1 D）8(24)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=InputBox("Input")Select Case xCase 1,3Print "分支1"Case Is >4Print "分支2"Case ElsePrint "Else 分支"End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是A）分支1 B）分支2 C）Else分支D) 程序出错四、简答题 [ (25)—(27)，每小题4分，（28）每小题6分，共18分](25) 什么是对象的属性、方法和事件？试各举例说明。

(26) 简述窗体的Name 与Caption 属性的区别 (27)根据条件，写出相应的VB 表达式：① 产生一个50～100(含50,100)范围内的随机整数 ② 表示关系表达式 10≤X<20(28)已知下面的数组声明Dim a(7) As Integer写出它的数组名、数组类型、维数、各维的上下界、数组的大小，并按行的顺序列出各元素。

五、编程题 [ (29)—(31)，每小题8分，（32）每小题6分，共30分](29) 计算分段函数：(30) 编程计算1～100 的整数中，能被 5 或 9 整除的数之和。

(31) 编程计算 5 的阶乘（即求 5！） (32)在窗体上画两个文本框，名称分别为Text1、Text2，一个命令按钮Command1，当在Text1中输入的数值是奇数，且按下命令按钮时，在Text2中即显示”奇数”；否则显示”偶数”。

y x x x x x xx =++≠-+=⎧⎨⎪⎩⎪sin cos 231030VB 综合练习题二参考答案一、选择题 [ (1)—(15)，每小题2分，共30分 ](1)-(5)(6)–(10)二、填空题 [ (16)—(20)，每小题2分，共10分 ] (16) CCCCC(17) 变量Z 取得y+1的值 (18) 123456 (19) 1000 (20) 1三、看程序写结果 [ (21)—(24)，每小题3分，共12分 ]四、简答题[ (25)—(27)，每小题4分，（28）每小题6分，共18分](25) 什么是对象的属性、方法和事件？试各举例说明。

答：对象的属性：描述对象的性质，如大小、形状、颜色等，如窗件的Name 、Caption 等。

对象的方法：在对象上实施某种操作的效果，即完成某种操作的功能，如打印（Print ）、显示窗体（Show ）等。

对象的事件：预先定义好的、能够被对象识别的动作，如单击(Click)、装载(Load) 等。

(26) 简述窗体的Name 与Caption 属性的区别 答：Name 属性:：窗体的名称Caption 属性：窗体标题栏上的标题(27) 根据条件，写出相应的VB 表达式：答：① 产生一个50～100(含50,100)范围内的随机整数Int(Rnd * (100-50+1))+50② 表示关系表达式 10≤X<20X>=10 And X<20(11)-(15)(28) 已知下面的数组声明Dim a(7) As Integer写出它的数组名、数组类型、维数、各维的上下界、数组的大小，并按行的顺序列出各元素。

答：数组名：a 数组类型：Integer维数：1维 各维的上下界：0,7 数组的大小：8a(0) a(1) a(2) a(3) a(4) a(5) a(6) a(7) a(8)五、编程题[ (29)—(31)，每小题8分，（32）每小题6分，共30分] (29) 计算分段函数：答： If x<>0 Theny=sin(x) + sqr (x *x+1)Elsey=cos(x) - x^3 + 3*x End If(30) 编程计算 1～100 的 5 或 9 的倍数的和。

答： Sum = 0For i = 1 To 100If i Mod 5 = 0 Or i Mod 9 = 0 Then Sum = Sum + i End If Next i Print Sum(31) 编程计算 5 的阶乘（即求 5！）T= 1For i =1 To 5 T = T * i Next i Print t(32) 在窗体上画两个文本框，名称分别为Text1、Text2，一个命令按钮Command1，当在Text1中输入的数值是奇数，且按下命令按钮时，在Text2中即显示”奇数”；否则显示”偶数”。