第十章一、选择题1、不需要编译，计算机便可直接执行的程序是（）。

A C语言程序B Visual Basic语言程序C 汇编语言程序D 机器语言程序2、下面关于VB的叙述中，不正确的是（）。

A VB是美国Microsoft（微软）公司开发程序设计语言。

B VB是在20世纪60年代美国Dartmouth学院开发的Basic语言基础上发展而形成的。

C 用VB编写的程序可以在任何操作系统环境中运行。

D VB是面向对象的可视化的软件开发工具。

3、下面关于VB的集成开发环境（IDE）的叙述中，不正确的是（）。

A IDE是设计、调试、运行VB程序的工具。

B 打开/关闭各窗口的命令主要在IDE的“视图”菜单中。

C “窗体设计窗口”是用来设计应用程序界面（窗体）的。

D 不能往“控件工具箱”中添加其它控件。

4、当窗体被关闭时，系统自动执行该窗体的_________事件过程。

（A）Click（B）Load （C）Unload （D）LostFocus5、如果Print方法在窗体的Load事件过程中不起作用，原因是（）属性的值为false。

（A）AutoRedraw（B）Moveable （C）MaxButton （D）ControlBox6、在运行时，要使窗体既不能移动有不能改变大小，应设置BorderStyle=( )。

（A）0（B）1 （C）2 （D）37、要使窗体运行时充满整个屏幕，应设置其（）属性。

（A）Height （B）Width （C）WindowState （D）AutoRedraw8、要使标签控件的大小随Caption 属性值而自动调整，应设置其（）属性。

（A）Width（B）AutoSize （C）Caption （D）Alignment9、要设置标签控件字体的大小，应设置其（）属性。

（A）Height（B）Width （C）Caption （D）Font10、要使标签控件标题内容居中显示，应设置其（）属性。

（A）Alignment（B）Appearance （C）BackStyle （D）ToolTipText11、程序运行时，要使用户不能修改文本框中的内容，那么应设置__________。

（A）Enabled=False （B）MultiLine=False（C）Locked=True （D）PasswordChar=”*”12、当设置文本框的ScrollBars=Both 而文本框确没有显示出滚动条，原因是（）。

（A）文本框中没有内容（B）文本框的MultiLine=False（C）文本框的Locked=True （D）文本框的MultiLine=True13、程序运行时，要使用户不能修改文本框中的内容，那么应设置__________。

（A）Enabled=False （B）MultiLine=False（C）Locked=True （D）PasswordChar=”*”14、要使鼠标指向“命令按钮”时，出现一个提示文本，应设置其_______属性。

（A）Caption （B）Picture （C）ToolTipText （D）Style15、要使命令按钮在运行时能力丧失（不能用），Enabled=（）。

(A) True (B) False16、使命令按钮获得“焦点”的方法是（）。

（A）LinkSend（B）Move （C）SetFocus （D）Refresh17、一个窗体上有三个文本框，按放置顺序分别是：Text1，Text2，Text3 ，若使程序运行时Text3首先获得“焦点”，那么，应设置其（）属性值为0 。

（A）Top（B）Tag （C）Tabindex （D）Index18、一个窗体上有两个文本框，按放置顺序分别是：Text1，Text2 ，要想在Text1中按“回车”键，“焦点”自动转到Text2上，应在（）处编写程序。

（A）Private Sub Text1_KeyPress(KeyAscii As Integer)（B）Private Sub Text1_LostFocus()（C）Private Sub Text2_GotFocus()（D）Private Sub Text1_Click()19、用一个对象来表示：“一只白色的足球被踢进球门”，那么，白色、足球、踢、进球门分别是（）。

（A）属性、对象、方法、事件（B）属性、对象、事件、方法（C）对象、属性、方法、事件（D）对象、属性、事件、方法20、下面关于对象属性的叙述中，不正确的是（）。

A 属性是对一个对象特征的描述。

B 属性都有名称、取值类型、值。

C 属性的值必须在设计时确定。

D 有些属性的值可以在程序运行时改变。

21、V al (“123ab”)=（）。

（A）0（B）123 （C）1230 ( D ) 不能转换22、数学式3≤X＜5写成VB表达式是（）。

（A）3<=X<5 （B）3<=X or X<5（C）3<=X and X<5 （D）X>=3 and <523、x=2，则表达式x+1>2 Or sin（x）>0.9 And 3>x+3=（）。

（A）True（B）False ( C ) 不能计算24、将逻辑型数据转换成整型数据时，转换规则是（）。

（A）将True转换为–1 ，将False转换为0（B）将True转换为 1 ，将False转换为–1（C）将True转换为0 ，将False转换为-1（D）将True转换为 1 ，将False转换为025、下面正确的变量名是（）。

（A）3xy（B）xy_01 （C）sa t01 （D）integer二、填空题1、如果进入VB的集成开发环境后，发现没有“工具箱”，那么可以打开（）菜单并选择“工具箱”菜单项，就可使“工具箱”出现。

2、（）窗口用来管理一个应用程序所包含的各种资源文件。

3、“代码窗口”用来编写应用程序的（）。

4、当双击控件工具箱中的控件是，系统默认地把控件放到（）中。

5、一般来说对象有属性、方法、事件，（）是指对象具有作某种事的能力。

6、要使标签背景透明（与其容器的背景一致），应设置其（）属性值为0。

7、文本框的MaxLength=0的含义是（）。

8、往当前工程中添加窗体的操作步骤是：打开（）菜单，选择（）命令。

9、把X是5或7的倍数写成VB表达式是（）。

10、取出一个三位整数x的十位上的数字（例如：324十位上的数字是2）的VB表达式是（）。

三、简答题1、简单叙述计算机程序设计语言的发展历程。

2、简单叙述窗体布局窗口的用途。

3、简单叙述属性窗口的用途。

4、简述“标签”与“文本框”的区别。

5、假如一个窗体上有三个“文本框”，按放置顺序依次为Text1、Text2、Text3，若要使程序运行时，Text3首先获得“焦点”，应如何操作？四、实验题1、编写一个简单的VB程序，界面如下图所示。

程序有两个按钮。

当用户按“显示”按钮时，在窗体上显示出“欢迎使用VB6.0”字样；当用户按“清屏”按钮时，清除窗体上的文字内容。

程序有两个标签。

一个用来显示显示“VB程序设计”字样；一个用来显示“系统当前时间”。

2、设计一个简单VB小程序，界面如下右图所示。

窗体上有两个“标签”，两个“文本框”，一个“命令按钮”。

当程序运行时，用户在上面的“文本框”中输入圆的半径，然后点击“计算”按钮，程序便计算出圆的周长、面积并显示在下面的“文本框”中。

3、编写一个程序，界面如下图所示。

当用户单击“开始”按钮时，程序随机产生两个[1-100]之间的整数a 和b ，并把”a+b=”字样显示在标签Label1中，等待用户在文本框text1中输入答案。

当用户在文本框text1中输入了答案并按“回车”键后，程序开始判断答案是否正确，并将判断结果显示在标签Label2中，同时将“焦点”放到“开始”按钮上。

4、设计一程序，用户输入三角形的三条边A ，B ，C 的长度，然后程序判断它们能否构成三角形。

如果能构成三角形，则计算出面积并输出，然后程序结束；如果不能构成三角形，则提示用户：不能构成三角形并转回重新输入。

计算面积的公式为：面积=))()((C L B L A L L --- ，L=(A+B+C)/25、写一个程序打印出所有的“水仙花数”。

水仙花数是指三位的正整数，其各位数字的立方之和等于该正整数本身。

例如：407=4*4*4+0*0*0+7*7*7。

6.设计如图1所示的程序界面，实现简单的算术运算，并且当点击不同的运算按钮时，显示“运算符”的标签内容会同时变化，例如当点击“*”按钮时用户界面如图2所示。

图1 用户界面 图2 点击“*”按钮后的用户界面7. 在文本框1、2中分别输入双精度类型a 、b ，然后分别实现下列运算，并将运算结果从文本框3输出。

8. 将如下用ElseIf实现的多分支程序段改写为用Select Case 语句实现。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickDim a, c As Doublea = TextBox1.TextIf a < 0 ThenMsgBox("存款不能为负数！")ElseIf a <= 100 Thenc = a * (1 + 0.1)ElseIf a <= 200 Thenc = a * (1 + 0.2)ElseIf a <= 300 Thenc = a * (1 + 0.3)ElseIf a <= 400 Thenc = a * (1 + 0.4)ElseIf a <= 500 Thenc = a * (1 + 0.5)Elsec = a * (1 + 0.6)End IfTextBox2.Text = cEnd IfEnd Sub9. 编写应用程序，读入一个整数，分析它是几位数。

10．编写应用程序，读入一行字符，统计其中有字母、数字、空格和其他字符各有几个。

11. 利用循环实现下图所示图形的输出。

12. 编写应用程序，统计并逐行显示（每行5个数）在区间[10000，50000]上的回文数。

8. 编写程序，求下面级数前n项的和S，以此作为数π*π/12的近似值，要求末项的绝对值小于0.00001，计算并输出和数S。

（其中^表示幂运算）π*π/12 = 1-1/(2*2)+1/(3*3)-1/(4*4)+……+(-1)^(n-1)/(n*n)+……13. 有一个数列，其前三项分别为1，2，3，从第四项开始，每项均为其相邻的前三项之和的1/2，问：该数列从第几项开始，其数值超过1000。