《程序设计基础VB》作业题.docx

1、程序设计基础VB作业题第一章 练习题一、选择题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程序的工具。

2、 B 打开/关闭各窗口的命令主要在IDE的视图菜单中。 C 窗体设计窗口是用来设计应用程序界面（窗体）的。 D 不能往控件工具箱中添加其它控件。二、填空题1、如果进入VB的集成开发环境后，发现没有工具箱，那么可以打开（ ）菜单并选择工具箱菜单项，就可使工具箱出现。2、（ ）窗口用来管理一个应用程序所包含的各种资源文件。3、代码窗口用来编写应用程序的（ ）。三、简答题1、简单叙述计算机程序设计语言的发展历程。2、简单叙述窗体布局窗口的用途。3、简单叙述属性窗口的用途。四、实验题1、题目编写一个简单的VB程序，界面如下图所示。程序有两个按钮。当用户按显示按钮时，在窗体上显示出欢迎使用VB6.0字样

3、；当用户按清屏按钮时，清除窗体上的文字内容。程序有两个标签。一个用来显示显示VB程序设计字样；一个用来显示系统当前时间。2、实验目的初步了解IDE各窗口的用途及操作。初步了解一个VB程序的设计过程。观察一个VB程序的构成。3、实验步骤启动IDE单击任务栏的开始菜单程序Microsoft Visual StudioMicrosoft Visual Basic6.0便出现新建工程对话框，如下图所示。选择标准EXE工程类型，按打开按钮。便进入了IDE的界面如下图所示：界面设计在窗体设计窗口中摆放控件方法一：单击控件工具箱中所要的控件（这时你会发现控件图标凹下去了），把鼠标移到窗体上（这时你会发现鼠标

4、指针图形变成了字形），在窗体上初步确定一个安放点，按住鼠标左键往安放点的右下角拖，当你初步认为大小合适了便可放开鼠标左键。方法二：双击控件工具箱中所要的控件，该控件便被放到窗体中。但要注意：这种方法默认为把控件放到窗体中，而不能放到其它容器控件中（如：选项卡，图片框，框架）。控件的编辑* 选中控件要想手动地调整一个控件的大小就必须先选中它。选中控件很简单：只要将鼠标指向该控件并按一下鼠标左键即可。当一个控件被选中后，它的周围便出现一些小正方形（我们称其为句柄）。如果你要同时选中许多控件，你可以按住键在用鼠标点选所要的控件。* 调整大小方法一：将鼠标移到被选中控件上下边的句柄上（这时你会发现鼠标

5、指针图形变成了双向箭头状），按住鼠标左键上下拖放即可该变控件的高度。将鼠标移到被选中控件左右边的句柄上，按住鼠标左键左右拖放即可该变控件的宽度。方法二：选中要调整的控件，按住键，同时按、四个键来调整控件的高度、宽度。方法三：通过属性窗口设置该控件的Height属性值可改变控件的高度，设置该控件的Width属性值可改变控件的宽度。* 调整位置方法一：选中要调整的控件，按住鼠标左键拖放。方法二：选中要调整的控件，按住键，同时按、四个键来调整控件的位置。 方法三：通过属性窗口设置该控件的Top属性值，可改变控件顶边到其容器（窗体）顶边的距离；设置该控件的Left属性值，可改变控件左边到其容器左边的距

6、离。* 删除控件如果想删除窗体中的某个控件，你可以用鼠标右击该控件，这时会出现一个快捷菜单，选择其中的删除命令。* 对齐控件如果你要使一些控件按某种方式对齐，你可以先选中这些控件，然后打开格式菜单并把鼠标指向对齐命令，从出现的二级菜单中选择所要的对齐方式。* 锁定控件如果你已经把一些控件的大小、位置调整好了，你可以把它们锁定，防止误操作改变其位置。锁定控件的步骤是：选中控件，然后打开格式菜单，选择锁定命令。设置窗体、控件的属性对象名称对象类型属性设置值用途Form1窗体Caption=第一章示例1程序界面Picture=窗体背景图片文件名全称，例如：Picture=d:VB示例第一章tx1.b

7、mpLabel1标签Caption=VB程序设计显示一个标题Label2标签Caption=系统当前时间显示系统时间Command1命令按钮Caption=显示在窗体上打印文字Command1命令按钮Caption=清屏清除窗体上的文字Timer1时钟Interval=100（单位是：毫秒）闹钟为相关控件的有关事件过程编写程序代码* 对命令按钮Command1的Click（即鼠标左单击）事件过程编写如下代码Private Sub Command1_Click() CurrentX = 2100 CurrentY = 500 Print 欢迎使用VBEnd Sub* 对命令按钮Command2的

8、Click事件过程编写如下代码Private Sub Command2_Click()ClsEnd Sub* 对时钟的Timer1的Timer事件过程编写如下代码Private Sub Timer1_Timer() Label2.Caption = Time()End Sub注意：事件过程的头、尾是系统自动给出的，不须用户输入。运行、结束程序* 运行程序方法一：点击工具栏上的启动按钮，如右图所示：方法二：打开运行菜单选择启动方法三：按功能键F5* 结束程序方法一：点击工具栏上的结束按钮，如右图所示：方法二：打开运行菜单选择结束方法三：点击程序窗体上的关闭按钮方法四：按住键，再按键。保存程序一个

9、应用程序设计完成后，程序被存放在计算机的内存中。如果计算机被关闭或重启，程序就会丢失。要想使程序长期保存，就必须把程序存放在计算机的磁盘中。按工具栏中的保存按钮，如右图所示：然后在出现的对话框中，选择文件的存放位置、文件名。当把所有的窗体文件、工程文件都存储完后，出现一个如下图所示的对话框： 修改程序要对已经存过盘的工程进行修改，步骤如下：* 到存放工程的文件夹* 双击工程文件，图标如下图* 修改* 存盘4、思考回答问题当一个程序被存盘后，有那些文件？能否用Windows的重命名功能对某个文件重命名？当你使用Windows的复制功能将工程文件复制到另一个文件夹中，然后双击该文件图标会出现什么情

10、况？为什么？能否双击窗体文件打开工程，为什么？第二章 练习题一、选择题1、当窗体被关闭时，系统自动执行该窗体的_事件过程。（A）Click （B）Load （C） Unload （D）LostFocus2、如果Print方法在窗体的Load事件过程中不起作用，原因是（ ）属性 的值为false。 （A）AutoRedraw （B）Moveable （C）MaxButton （D）ControlBox3、在运行时，要使窗体既不能移动有不能改变大小，应设置BorderStyle=( )。 （A） 0 （B） 1 （C）2 （D） 34、要使窗体运行时充满整个屏幕，应设置其（ ）属性。 （A） He

11、ight （B）Width （C）WindowState （D） AutoRedraw5、要使标签控件的大小随Caption 属性值而自动调整，应设置其（ ）属性。（A）Width （B）AutoSize （C） Caption （D）Alignment6、要设置标签控件字体的大小，应设置其（ ）属性。（A）Height （B）Width （C） Caption （D）Font7、要使标签控件标题内容居中显示，应设置其（ ）属性。 （A）Alignment （B）Appearance （C） BackStyle （D）ToolTipText8、 程序运行时，要使用户不能修改文本框中的内容，那么

12、应设置_。 （A） Enabled=False （B） MultiLine=False （C） Locked=True （D） PasswordChar=*9、当设置文本框的ScrollBars=Both 而文本框确没有显示出滚动条，原因是（ ）。 （A）文本框中没有内容 （B）文本框的MultiLine=False （C）文本框的Locked=True （D）文本框的MultiLine=True10、 程序运行时，要使用户不能修改文本框中的内容，那么应设置_。 （A） Enabled=False （B） MultiLine=False （C） Locked=True （D） Password

13、Char=*11、要使鼠标指向命令按钮时，出现一个提示文本，应设置其_属性。 （A）Caption （B）Picture （C）ToolTipText （D） Style12、要使命令按钮在运行时能力丧失（不能用），Enabled=（ ）。 (A) True (B) False13、使命令按钮获得焦点的方法是（ ）。 （A）LinkSend （B）Move （C） SetFocus （D）Refresh14、一个窗体上有三个文本框，按放置顺序分别是：Text1，Text2，Text3 ，若使程序运行时Text3首先获得焦点，那么，应设置其（ ）属性值为 0 。 （A） Top （B）Tag （

14、C） Tabindex （D）Index15、一个窗体上有两个文本框，按放置顺序分别是：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()16、用一个对象来表示：一只白色的足球被踢进球门，那么，白色、足球、踢、 进球门分别是（ ）。 （A）属性、对象、方法、事

15、件 （B）属性、对象、事件、方法 （C）对象、属性、方法、事件 （D）对象、属性、事件、方法17、下面关于对象属性的叙述中，不正确的是（ ）。 A 属性是对一个对象特征的描述。 B 属性都有名称、取值类型、值。 C 属性的值必须在设计时确定。 D 有些属性的值可以在程序运行时改变。二、填空题1、当双击控件工具箱中的控件是，系统默认地把控件放到（ ）中。2、一般来说对象有属性、方法、事件，（ ）是指对象具有作某种事的能力。3、app.path返回值的含义是（ ）。4、要使标签背景透明（与其容器的背景一致），应设置其（ ）属性值为0。5、文本框的MaxLength=0的含义是（ ）。6、往当前工程

16、中添加窗体的操作步骤是：打开（ ）菜单，选择（ ）命令。三、简答题1、假如一个工程有两个窗体Form1、Form2，其中Form1为启动窗体，如果你想让Form2为启动窗体，应如何操作？2、简述标签与文本框的区别。3、假如一个窗体上有三个文本框，按放置顺序依次为Text1、Text2、Text3，若要使程序运行时，Text3首先获得焦点，应如何操作？四、实验题实验一1、题目设计一个简单VB小程序，界面如下右图所示。 窗体上有三个命令按钮，按Print方法按钮在窗体上显示信息；按Cls方法按钮清除窗体的信息；按Move方法按钮使窗体往右下角移动。窗体被加载时，在窗体的标题栏中显示第二章实验一字样

17、。2、实验目的了解窗体Load事件的发生条件及用途。初步掌握窗体的Print、Cls、Move方法的使用。初步掌握命令按钮的Clik事件的发生条件及用途。3、实验步骤界面设计对象名称对象类型属性设置值用途Form1窗体Font.size=24程序界面Command1命令按钮Caption=Print方法在窗体上打印文字Command2命令按钮Caption=Cls方法清除窗体上的文字Command3命令按钮Caption=Move方法移动窗体代码设计Private Sub Form_Load() Caption = 第二章实验一 Font.sEnd SubPrivate Sub Command

18、1_Click() Print 第一个输出项, 第二个输出项 Print 现在的时间是：; Time() Print x=; 5, y=; 4; Print x+y=; 10End SubPrivate Sub Command2_Click() ClsEnd SubPrivate Sub Command3_Click() Move Left + 100, Top + 100End Sub4、思考问题应如何调整窗体的Print起始打印位置。在程序代码中，如何使命令按钮获得焦点。实验二1、题目 设计一个简单VB小程序，界面如下右图所示。 窗体上有两个标签，两个文本框，一个命令按钮。当程序运行时，用

19、户在上面的文本框中输入圆的半径，然后点击计算按钮，程序便计算出圆的周长、面积并显示在下面的文本框中。2、实验目的初步掌握标签的基本属性及使用。初步掌握文本框的基本属性及使用。利用文本框输入、输出数据。如何使焦点从一个对象上转移到另一个对象上。3、实验步骤界面设计对象名称对象类型属性设置值用途Form1窗体Caption=第二章实验二应用程序界面Label1标签Caption=请输入圆的半径提示用户Label2标签Caption=圆的周长、面积提示用户Text1文本框接受用户输入Text2文本框MultiLine=True显示计算结果Command1命令按钮Caption=计算作计算程序代码Pr

20、ivate Sub Command1_Click() Dim r1, zc!, mj! r = Val(Text1.Text) zc = 2 * 3.14 * r mj = 3.14 * r 2 Text2 = 圆的周长= + Str(zc) + vbCrLf Text2 = Text2 + 圆的面积= + Str(mj)End SubPrivate Sub Text1_GotFocus() Text1 = Text2 = End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1.

21、SetFocus End IfEnd Sub4、思考问题请指出该程序的缺陷。为什么要在text1的GotFocus事件过程中，清空两个文本框的内容？第三章 练习题一、选择题1、表达式16/4-25*8/4 Mod 52 = ( )。 （A） 14 （B） 4 （C） 20 （D） 22、数学式3X5写成VB表达式是（ ）。（A） 3=X5 （B）3=X or X5（C） 3=X and X=3 and 2 Or sin（x）0.9 And 3x+3=（ ）。 （A）True （B）False ( C ) 不能计算4、将逻辑型数据转换成整型数据时，转换规则是（ ）。（A） 将True转换为 -1

22、 ，将False转换为 0 （B） 将True转换为 1 ，将False转换为 -1 （C） 将True转换为 0 ，将False转换为 -1（D） 将True转换为 1 ，将False转换为 05、下面正确的变量名是（ ）。 （A） 3xy （B） xy_01 （C） sa t01 （D） integer6、Int(-3.1)+round (-4.6)=_。 （A）-8 （B）-7 （C） -9 （D）-67、对不同类型的运算符优先级规定是（ ）。 （A） 字符运算符 算术运算符 关系运算符 逻辑运算符（B） 算术运算符 字符运算符 关系运算符 逻辑运算符（C） 算术运算符 字符运算符 逻辑

23、运算符 关系运算符（D） 字符运算符 关系运算符 逻辑运算符 算术运算符8、k=12.5 ，len( str( k ) )=( ) 。 （A） 4 （B） 3 （C） 5 （D） 29、len(vb程序设计)=( ) 。（A） 5 （B） 10 （C） 2 （D） 610、随机产生 10，50 之间整数的正确表达式是（ ）。 （A） Round( Rnd*51) （B） Int(Rnd*40+10)（C） Round( Rnd*50) （D） 10+Int(Rnd*41)11、赋值语句 A=123 + Mid$( 123456,3,2) 执行后，A=（ ）。 （A）12334 （B）123 （

24、C） 12334 （D）15712、Val (123ab)=（ ）。 （A）0 （B）123 （C）1230 ( D ) 不能转换13、当Ucase$(C$)A and Ucase$(C$)=1 then if x=1 then f=sqr(x+1) f=sqr(x+1) else End if f=x2+3 End if (C) if x=1 then (D) if x=1 then f=sqr(x+1) f=sqr(x+1) End if End if f=x2+3 if x1 then f=x2+3 End if 5、X是单精度类型变量，用Select语句表示下列处理的正确语句是（ ）。 当0X60 时，输出不及格；当60X70 时，输出及格； 当70X80 时，输出中； 当80X90 时，输出良