可视化程序设计习题与上机指导.docx

可视化程序设计习题与上机指导.docx

《可视化程序设计习题与上机指导.docx》由会员分享，可在线阅读，更多相关《可视化程序设计习题与上机指导.docx（32页珍藏版）》请在冰豆网上搜索。

可视化程序设计习题与上机指导

可视化程序设计习题与上机指导

第一章VisualBasic基础

习题：

1.什么是属性、事件、方法及三者之间的区别？

2.如何创建一个新的工程？

3.创建VisualBasic应用程序的基本步骤是什么？

4.如何生成一个可执行文件？

可执行文件生成前应完成哪些工作？

5.根据前面讲述的保存方法，自己保存一个空白的窗体和工程。

上机实验：

认识VB界面，设计一个简单应用程序。

实验目的：

掌握VisualBasic的启动与退出操作，熟悉应用程序的建立步骤以及工程的保存方法，能生成一个可执行文件。

实验内容：

1.VisualBasic的启动。

请遵循如下步骤：

1、单击“开始”按钮。

2、选择“程序”选项。

这将显示更多的选项。

3、从显示的选项中选择“MicrosoftVisualBasic6.0”选项。

此时会显示一个选项列表。

4、从这些显示的选项中单击“MicrosoftVisualBasic6.0”选项。

打开的VisualBasic屏幕如图1.11所示。

2.VisualBasic退出。

有如下几种方法：

方法一：

单击窗口右上角的关闭按钮。

方法二：

单击“文件”菜单，选择“退出”选项。

方法三：

按快捷键Alt＋Q键。

方法四：

按快捷键Alt＋F4键。

3.设计一个简单应用程序，在窗体上添加一个文本框，单击窗体后，在文本框中显示“欢迎使用VisualBasic”

具体步骤如下：

1.在工具箱（ToolBox）中双击“TextBox（文本框）”控件（工具箱中第二行的第二个控件）。

2.在“Form1”中单击并拖动“TextBox”，把它放置到窗体中的适当位置，“TextBox”控件上有一个缺省的文字“Text1”，如图1.31所示。

图1.31

3.使用“属性（Properties）”窗口，删除分配给该控件Text属性的缺省值“Text1”，使其变为空白，参见图1.32。

图1.32

4.各对象的属性设置如表1.10所示。

表1.10属性设置

对象

属性

设置

窗体

（名称）

Form1

Caption

一个简单应用程序

文本框

（名称）

Text1

Text

空白

Multiline

True

5.参考代码如下：

窗体的单击事件，用于实现文本框中内容的显示。

PrivateSubForm_Click（）

="欢迎使用VisualBasic"

EndSub

运行结果如图1.33所示。

图1.33

6.保存工程。

1）选择主菜单选项“文件（F）”。

2）选择子选项“保存工程（V）”，这将调用“文件另存为”对话框，如图1.34所示。

图1.34

VisualBasic首先提示我们保存窗体。

参见图1.34。

3）在标签“文件名（N）”中指定作为窗体名字，以当前工作目录为文件保存目录，窗体使用的缺省扩展名为frm。

4）单击“保存（S）”按钮，这将调用“工程另存为”对话框。

5）指定作为当前工作目录下工程的名字，工程文件的缺省扩展名为vbp。

参见图1.35。

图1.35

6）单击“保存（S）”按钮（在VisualBasic中，窗体和工程分别作为单独的文件存储）。

7.运行工程。

让我们运行一下应用程序，看看你的代码操作。

1）选择菜单选项“运行（R）”。

2）单击子选项“启动（S）”。

这将运行应用程序。

当应用程序在屏幕上运行时，他将如图1.32所示。

3）单击窗体，文本框中将显示“欢迎使用VisualBasic”，如图1.33所示。

8.生成可执行文件。

生成可执行文件之前，要确保整个应用程序的正确性。

因为，一旦生成可执行文件之后，应用程序便不可修改，如果出现错误，需重新再生成一个可执行文件。

1）选择菜单选项“文件（F）”。

2）单击子选项“生成工程1.exe（K）…”，这将调用“生成工程”对话框，如图1.36所示。

图1.36

3）在标签“文件名（N）”中指定“工程1.exe”作为可执行默认文件名，以当前工作目录为文件保存目录，窗体使用的缺省扩展名为exe。

4）单击“确定”按钮，即可立即生成该应用程序的可执行文件。

第二章窗体与基本控件

习题：

1.当用鼠标单击窗体时，能够触发哪些事件？

2.设计一个程序，窗体如图2.24所示。

要求在“数据”框中输入一个数字作为被乘数，当单击“计算”命令按钮时，将被乘数乘以6后的结果显示在另外的标签框中。

图2.24

3.文本框与标签框在使用时有哪些区别？

上机实验：

窗体、命令按钮、文本框、标签框的应用

实验目的：

掌握窗体、命令按钮及文本框的常用属性、事件和方法，熟练这些控件的综合应用，并能实现相应的功能。

实验内容：

1.设计一个程序，在执行时由用户从键盘上键入两个操作数和运算符，然后根据输入的运算符来改变标签框的内容，单击“＝”命令按钮，将根据运算符进行相应的运算并将运算结果显示在“运算结果”标签框中。

其界面设计如图2.25所示。

图2.25

其属性设置如表2.8所示。

表2.8属性设置

对象

属性

设置

窗体

（名称）

Form1

Caption

控件综合使用

标签框1

（名称）

Label1

Caption

操作数

AutoSize

True

Alignment

2－center

标签框2

（名称）

Label2

AutoSize

True

Alignment

2－center

标签框3

（名称）

Label3

Caption

运算符

AutoSize

True

Alignment

2－center

标签框4

名称

Label4

Caption

运算结果

AutoSize

True

Alignment

2－center

标签框5

（名称）

Label5

Caption

注意：

运算符只能是+、-、*、/中的一个

标签框6

（名称）

Label6

Caption

空白

文本框1

（名称）

Text1

Text

空白

文本框2

（名称）

Text2

Text

空白

文本框3

（名称）

Text3

Text

空白

命令按钮1

（名称）

Command1

Caption

＝

命令按钮2

（名称）

Command2

Caption

清除

命令按钮3

（名称）

Command3

Caption

退出

参考代码如下：

1．确定用于说明运算类型的标签框的显示内容

PrivateSubText2_Change（）

SelectCase

Case"+"

on="被加数"

on="加号"

on="加数"

on="和"

Case"-"

on="被减数"

on="减号"

on="减数"

on="差"

Case"*"

on="被乘数"

on="乘号"

on="乘数"

on="积"

Case"/"

on="被除数"

on="除号"

on="除数"

on="商"

EndSelect

EndSub

2．用于进行运算的命令按钮“＝”

PrivateSubCommand1_Click（）

aa=Val（）

bb=Val（）

SelectCase

Case"+"

cc=aa+bb

Case"-"

cc=aa-bb

Case"*"

cc=aa*bb

Case"/"

cc=aa/bb

EndSelect

on=Str（cc）

EndSub

3．进行多次运算时需进行的“清除”操作

PrivateSubCommand2_Click（）

=""

=""

on=""

cus

EndSub

4．结束操作

PrivateSubCommand3_Click（）

End

EndSub

第三章VisualBasic程序设计基础

习题：

1.如何在程序中加入注释内容？

2.怎样声明局部变量和模块级变量？

二者之间存在哪些不同？

3.静态变量有什么特点，应怎样声明？

4.在调用子程序时，若需要进行参数的传递，通常有几种参数的传递方式，它们的区别是什么？

5.运算符“/”和“\”有什么区别，分别用于何种问题的解决？

6.设计一个简单的应用程序，在窗体上有一个文本框，用户在执行过程中随意在其中输入n个字符，单击命令按钮“计数”后，在标签框中显示字符的个数，用户界面如图3.8所示。

图3.8

上机实验：

常量、变量、表达式和基本语句的应用

实验目的：

掌握数据类型的定义及使用，掌握常量、变量和表达式的使用，熟悉VB基本语句的使用，能够使用简单的算法解决实际问题。

实验内容：

1.设计一个应用程序，窗体上有3个文本框、1个标签框和3个命令按钮，界面设计如图3.9所示。

当用户运行应用程序后，在文本框中随意输入三个数据，单击“排序”命令按钮后，将三个数据按照从小到大的顺序重新排列。

图3.9

表3.8属性设置

对象

属性

设置

窗体

（名称）

Form1

Caption

排序

文本框1

（名称）

Text1

Text

空白

文本框2

（名称）

Text2

Text

空白

文本框3

（名称）

Text3

Text

空白

标签框1

（名称）

Label1

Caption

排序结果为：

命令按钮1

（名称）

Command1

Caption

排序

命令按钮2

（名称）

Command2

Caption

退出

命令按钮3

（名称）

Command3

Caption

清空

参考代码如下：

1．数据输入后的排序操作

PrivateSubCommand1_Click（）

Dima,b,cAsInteger

DimzjjgAsInteger

a=CInt（）

b=CInt（）

c=CInt（）

Ifa>bThen

zjjg=a

a=b

b=zjjg

EndIf

Ifa>cThen

zjjg=a

a=c

c=zjjg

EndIf

Ifb>cThen

zjjg=b

b=c

c=zjjg

EndIf

on="排序结果为：

"&a&","&b&","&c

EndSub

2．清空操作，用于第2次以后的要排序数据的输入

PrivateSubCommand3_Click（）

=""

=""

=""

cus

EndSub

3．结束操作

PrivateSubCommand2_Click（）

End

EndSub

运行后的结果如图3.10所示。

图3.10

第四章常用控件

习题：

1.对于框架内的复选框和单选钮，在使用时有何不同？

2.组合框和列表框的主要区别是什么？

在什么时候可以二者有相同的用法。

3.图片框和图像框在使用时有哪些不同之处？

4.在程序中为图片框或图像框加载图像时，通常使用哪个函数？

上机实验：

常用控件的应用

实验目的：

掌握复选框、单选钮、列表框和组合框的常用属性、事件及典型的使用方法，熟悉滚动条的数值应用，掌握对话框的设计及使用，掌握图片框、图像框的使用及在使用中二者的区别，能够利用计时器进行动画制作。

实验内容：

1．设计一个应用程序，窗体上由1个文本框、1个命令按钮和4个框架组成，界面设计如图4.39所示。

图4.39

表4.25属性设置

对象

属性

设置

窗体

（名称）

Form1

Caption

Form1

文本框1

（名称）

Text1

Text

欢迎使用VisualBasic

框架1

（名称）

Frame1

Caption

字体

框架2

（名称）

Frame2

Caption

大小

框架3

（名称）

Frame3

Caption

颜色

框架4

（名称）

Frame4

Caption

字形

框架5

（名称）

Frame5

Caption

文字效果

（名称）

Label3

单选钮1

（名称）

Option1

Caption

宋体

单选钮2

（名称）

Option2

Caption

隶书

单选钮3

（名称）

Option3

Caption

幼圆

单选钮4

（名称）

Option4

Caption

18点

单选钮5

（名称）

Option5

Caption

20点

单选钮6

（名称）

Option6

Caption

22点

单选钮7

（名称）

Option7

Caption

蓝色

单选钮8

（名称）

Option8

Caption

红色

单选钮9

（名称）

Option9

Caption

黄色

单选钮10

（名称）

Option10

Caption

普通

单选钮11

（名称）

Option11

Caption

粗体

单选钮12

（名称）

Option12

Caption

斜体

单选钮13

（名称）

Option13

Caption

粗斜体

复选框1

（名称）

Check1

Caption

删除线

复选框2

（名称）

Check2

Caption

下划线

命令按钮1

（名称）

Command1

Caption

退出

参考代码如下：

1．装载窗体

在初始装载窗体时，给出窗口运行的初值

PrivateSubForm_Load（）

=True

=True

=True

=True

EndSub

2．确定文本框中文字的字体

PrivateSubOption1_Click（）

If=TrueThename="宋体"

EndSub

PrivateSubOption2_Click（）

If=TrueThename="隶书"

EndSub

PrivateSubOption3_Click（）

If=TrueThename="幼圆"

EndSub

3．确定文本框中文字的字号（即字的大小）

PrivateSubOption4_Click（）

If=TrueThenize=18

EndSub

PrivateSubOption5_Click（）

If=TrueThenize=20

EndSub

PrivateSubOption6_Click（）

If=TrueThenize=22

EndSub

4．确定文本框中文字的颜色

PrivateSubOption7_Click（）

If=TrueThenolor=QBColor（9）

EndSub

PrivateSubOption8_Click（）

If=TrueThenolor=QBColor（12）

EndSub

PrivateSubOption9_Click（）

If=TrueThenolor=QBColor（14）

EndSub

5．确定文本框中文字的字形

PrivateSubOption10_Click（）

If=TrueThen

old=False

talic=False

EndIf

EndSub

PrivateSubOption11_Click（）

If=TrueThen

old=True

talic=False

EndIf

EndSub

PrivateSubOption12_Click（）

If=TrueThen

old=False

talic=True

EndIf

EndSub

PrivateSubOption13_Click（）

If=TrueThen

old=True

talic=True

EndIf

EndSub

6．确定文本框中文字的文字效果

PrivateSubCheck1_Click（）

If=1Then

trikethru=True

Else

trikethru=False

EndIf

EndSub

PrivateSubCheck2_Click（）

If=1Then

nderline=True

Else

nderline=False

EndIf

EndSub

7．结束操作

PrivateSubCommand1_Click（）

End

EndSub

2．设计一个简单的报到处理窗体，要求界面如图4.40所示，从文本框中输入学生姓名，在“班级”旁边的组合框中选择其所属班级（提供4种默认班级）。

然后将学生姓名和班级添加到列表框中。

用户可以删除列表框中所选择的项目，也可以把整个列表框清空。

图4.40

表4.26属性设置

对象

属性

设置

窗体

（名称）

Form1

Caption

报到名单录入

文本框1

（名称）

Text1

Text

空白

组合框1

（名称）

Combo1

Text

空白

列表框1

（名称）

List1

List

空白

标签框1

（名称）

Label1

Caption

姓名

AutoSize

True

标签框2

（名称）

Label2

Caption

班级

AutoSize

True

标签框3

（名称）

Label3

Caption

学生列表

AutoSize

True

命令按钮1

（名称）

Command1

Caption

加入列表

命令按钮2

（名称）

Command2

Caption

删除列表选项

命令按钮3

（名称）

Command3

Caption

清空列表

命令按钮4

（名称）

Command4

Caption

退出

参考代码如下：

1．装载窗体

在初始装载窗体时，给出组合框的初始值

PrivateSubForm_Load（）

em"03网络"

em"03电商"

em"03计维"

em"03软件"

=（0）

EndSub

2．将新报到的学生名单加入列表框

PrivateSubCommand1_Click（）

If（<>""And<>""）Then

em+""+

Else

MsgBox"必须输入学生姓名"

EndIf

EndSub

3．根据实际需要，删除选定的列表项

PrivateSubCommand2_Click（）

eItemndex

EndSub

4．删除全部列表项

PrivateSubCommand3_Click（）

EndSub

5．结束操作

PrivateSubCommand4_Click（）

End

EndSub

3．设计一个应用程序，窗体上由1计时器和1个图像框组成，图像框中添加一个球形图片，界面设计如图4.41所示。

图4.41

表4.27属性设置

对象

属性

设置

窗体

（名称）

Form1

Caption

球体运动

计时器1

（名称）

Timer1

Interval

100

图像框1

（名称）

Image1

Stretch

True

参考代码如下：

1.在窗体的“通用”区定义窗体级变量,留作后用。

DimchuiAsInteger

DimshuiAsInteger

2．装载窗体

在初始装载窗体时，给出窗口运行的初始值

PrivateSubForm_Load（）

shui=80

chui=80

EndSub

3．通过鼠标单击窗体，决定球体是否运动

PrivateSubForm_Click（）

ed=Noted

EndSub

4．球体运动

PrivateSubTimer1_Timer（）

+shui,+chui

If<=0Thenchui=-chui

If+t>=t-420Thenchui=-chui

If<=0Thenshui=-shui

If+>=-100Thenshui=-shui

EndSub

5．捕捉球体，防止因窗体大小的改变而使球体跑出屏幕

PrivateSubForm_Resize（）

If<=0Then

=-25

chui=-chui

EndIf

If>=（t-420）Then

=（t-445）-t

chui=-chui

EndIf

If<=0Then

=-25

shui=-shui

EndIf

If>=（-100）Then

=（-125）-

shui=-shui

EndIf

EndSub

其运行结果如图4.42所示。

图4.42

第五章菜单设计

1.简述VisualBasic菜单设计器的基本构成和各部分的作用。

2.菜单的热键和快捷键有什么区别？

如何为菜单设置热键和快捷键？

3.怎样设计弹出菜单？

4.如何创建菜单的控件数组？

上机实验5设计应用程序菜单

实验目的：

掌握下拉式菜单和弹出式菜单的设计方法，掌握菜单事件过程的编写方法。

实验内容：

按本章所讲的步骤和方法，设计所要求的菜单系统。

1．设计一个菜单程序，在菜单栏中有“程序”和“附件”两个菜单。

其中“程序”菜单中有Word、Excel、PowerPoint三个选项。

“附件”菜单中含有“画图”和“游戏”两个选项。

当用户选择了某个菜单项时，应能启动相应的程序。

设计后的界面如图5．10所示。

图5．10

提示：

使用函数：

Shell（）

格式：

Shell（“文件名”）

功能：

执行一个可执行的文件。

可带盘符、路径、主文件名、扩展名。

例如：

编写“程序”菜单中有Word的单击事件的代码：

若Word文件的路径是：

d:

\programfi