vb练习题及答案

vb练习题2

二、程序设计题

51．设计一个程序，输入一个正整数N，求1＋2＋3＋…+N的和。界面如下：

当用户输入N后，单击―计算‖按钮，则输出1＋2＋3＋…+N的和。 参考答案：

Private Sub Command1_Click() Dim i, a, b As Integer a = Val(Text1.Text) For i = 1 To a b = b + i Next i

Label3.Caption = b End Sub

Private Sub Command2_Click() End End Sub

52．编一个求圆柱的侧面积的程序：

当用户输入半径与高后，单击―侧面积为‖按钮，输出正确结果。 参考答案：

Private Sub Command1_Click() Dim r, h, c, s As Single r = Val(Text1.Text) h = Val(Text2.Text) c = 2 * 3.14159 * r s = c * h

Label3.Caption = s End Sub

53．设计一个计时程序。该程序用户界面如图所示，由一个文本框（text1），和两个按钮：命令按钮1（command l）、命令按钮2（command 2）组成。程序运行后，用户按开始按钮，则开始计时，文本框中显示秒数，接停止按钮，则计时停止。单击窗口则退出。（请阅读下面程序，编写出时钟控件的计时事件中的程序代码。）

Dim i, t As Integer

Private Sub Command1_Click() Timer1.Interval = 1000 Timer1.Enabled = True t = 0 End Sub

Private Sub Command2_Click() Timer1.Enabled = False End Sub

Private Sub Form_Click() End End Sub

Private Sub Timer1_Timer() End Sub 参考答案： t = t + 1

Text1.Text = t & \秒\

54．编制一个能在窗体中画出由用户指定圆心位置和半径大小的圆的程序,要求单击―绘圆‖按钮时绘圆，单击―清除‖按钮时清除绘图区中的图形及文本框中的内容。运行界面如下：

参考答案：

Private Sub Command1_Click() Dim x, y, r As Single x = Val(Text1.Text) y = Val(Text2.Text) r = Val(Text3.Text) Picture1.Circle (x, y), r End Sub

Private Sub Command2_Click() Picture1.Cls Text1.Text = \Text2.Text = \Text3.Text = \End Sub

信息技术教师培训自学部分VB练习题二 一、选择题

1．在 Visual Basic环境下，当写一个新的 Visual Basic程序时，所做的第一件事是B A、编写代码 B、新建一个工程 C、打开属性窗口 D、进入VB环境

2．若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置D

A、 Text属性值为* B、Caption属性值为* C、password属性值为空 D、Passwordchar属性值为* 3．能够将文本框控件隐藏起来的属性是B A、Clear B、Visible C、Hide D、New 4．获得系统日期的函数是C

A、 data$ B、 time$ C、 date$ D、 gettime$ 5．下列运算符号中属于算术运算符的是_____。B A、NOT B、^ C、= D、<= 6．Visual Basic属于:A

A、 高级语言B、汇编语言C、机器语言D、低级语言。 7．一个程序可以有_____窗体。C A、1个 B、2个 C、多个D、无穷多个 8．事件是指_____。B A、对象的外部特征。

B、预先设置好的能被对象识别的特定动作。 C、对象的属性。

D、对象原来就包含的内部函数或程序。 9．VB在运行中使用_______来临时存储数据。B A、常量 B、变量 C、函数 D、方法 10．布尔型又称_____。B

A、数值型 B、逻辑型 C、字符串型 D、整型 11．下列运算符号中属于关系运算符的是_____。D A、— B、+ C、AND D、<=

12．关于高级语言，下列叙述正确的是。B

A、不必编译即可执行 B、可读性最高 C、难学难记 D、执行速度最快 。 13．下列各组控件都具有Caption属性的是（ ）C

A、窗体、文本框 B、标签、定时器 C、窗体、标签 D、文本框、定时器

14．下列运算结果中，值最大的是（ ）D A、3\\4 B、3/4 C、4 mod 3 D、3 mod 4

15．Visual Basic语言中，下列那一项数值运算符号是正确的。(C) A、＠表示加 ?B、～表示减 ?C、*表示乘 ?D、÷表示除。 16．下面程序执行的结果是________。C Private Sub Form_Click() A$ = \C = Val(A$) + Val(B$) Print C \\ 100 End Sub

A、123 B、3 C、5 D、579 17．函数Sqr(9) 的值是（ ）B A、9 B、3 C、―3‖ D、―9‖

18．下列控件中可用于接受用户输入文本，又可用于显示文本的是（ ）B A、Label 控件 B、TextBox 控件 C、Timer 控件 D、CommandButton 控件 19．以下程序段执行后整型变量度n 的值为（ ）B n=0

for L=1 to 20 step 5 n=n+L next L

A、50 B、34 C、15 D、210

20．如果要改变窗体的标题,需要设置窗体对象的_____属性。B A、Name B、Caption C、BackColor D、BorderStyle

21．Visual Basic提供的标签控件（LABEL）可具有功能是B A、 输入文本 B、显示文本 C、计时 D、 取得时间 22．以下选项中，不是 Visual Basic控件的是C

A、文本框 B、定时器 C、窗体 D、命令按钮

23．若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为（ ）D if a>5 then c=b-a else c=a + b endif

A、2 B、-1 C、1 D、5