vbnet程序设计实用教程7

《vbnet程序设计实用教程7》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB.NET程序设计实用教程第7章Windows高级界面设计本章任务：体育彩票摇奖程序简易文本编辑器程序图文浏览器程序计算机应用教研室操作系统本章要点菜单的制作方法标准对话框的使用工具栏的制作方法多窗体应用程序设计状态栏的制作方法要点MDI应用程序设计7.1任务7-1：体育彩票摇奖程序——多窗体程序设计任务7-1描述：编写一个七位号码体彩摇奖程序，程序中有三个窗体，分别如图7-1、图7-2和图7-3所示。程序运行时首先出现摇奖窗体，在该窗体上单击“摇奖”按钮，将不停地产生随机数并填充在七个文本框中，如图7-4所示。单击“停止”按钮将停止摇奖

2、，此时在文本框中显示的数就是获奖号码。单击“公布”按钮将公布获奖号码，如图7-5所示。在该窗体上单击“返回”按钮将返回到摇奖窗体。单击“退出”按钮将出现如图7-6所示的“退出提示框”，单击“确定”按钮将退出应用程序。注意：在图7-1所示的窗体中还有一个定时器控件。计算机应用教研室操作系统图7-1摇奖窗体设计界面图7-2公布中奖号码窗体设计界面图7-3“退出提示框”窗体设计界面图7-4摇奖窗体运行界面图7-5公布中奖号码窗体运行界面图7-6“退出提示框”窗体运行界面1．启动VB.NET，新建一个项目，项目类型为“Windows应用程序”，项目的

3、存放位置为“D:VBTASKCH07”，项目名为“Task7_1”。2．把Form1窗体的Text属性值设置为“体育彩票摇奖程序”，把它的Name属性值设置为“frmTicketReward”。单击“解决方案资源管理器”中的“Form1.VB”窗体，然后在属性窗口中把它文件名属性设置为“frmTicketReward.vb”。然后执行【项目】→【Task7_1属性】命令，在出现的“Task7_1属性页”对话框中把“启动对象”设置为frmTicketReward”。注意：在多窗体程序设计中，如果要改变启动窗体，方法也是执行【项目】→【***

4、属性】命令，在出现的“***属性页”对话框中把“启动对象”设置为相应窗体即可。任务实现：控件名属性名属性值作用Label1Caption"号码"提示TextBox1~TextBox7Text""显示摇奖号码Button1Caption"摇奖"单击它开始摇奖Button2Caption"停止"单击它停止摇奖Button3Caption"公布"单击它弹出公布获奖号码窗体，公布中奖号码Button4Caption"退出"单击它弹出“退出提示框”提示是否退出程序Timer1EnabledIntervalFalse200每隔150毫秒产生一组号码3．对

5、照图7-1摇奖窗体设计界面，为窗体添加控件并设置控件的属性。控件的属性设置如表7-1所示。表7-1任务7-1中的frmTicketReward窗体中的控件属性设置及其功能计算机应用教研室操作系统4．单击工具栏上的“”按钮或执行【项目】→【添加Windows窗体】命令，将会出现如图7-7所示的【添加新项】对话框。5．在该对话框的“模板”下面的列表框中选中【Windows窗体】图标，在名称后面的文本框中输入窗体名“frmTicketPublish”，然后单击“打开”按钮，即为应用程序添加了一个名为“frmTicketPublish”窗体。把该窗体

6、的Text属性值设置为“中奖号码公布”。注意：也可以选添加窗体，然后再修改其Name属性值。图7-7“添加新项”对话框控件名属性名属性值作用Label1Caption"本期获奖号码如下："提示TextBox1~TextBox7Text""显示中奖号码Button1Caption"返回"返回到摇奖窗体6．对照图7-2公布获奖号码窗体设计界面，为窗体添加控件并设置控件的属性。控件的属性设置如表7-2所示。7．采用与步骤4和步骤5同样的方法为项目再添加一个名为“frmExit”的窗体，并把它的Text属性值设置为“退出提示框”。表7-2任务7-1中

7、的frmTicketPublish窗体中的控件属性设置及其功能对象名属性名属性值说明Label1Text"真的要退出应用程序吗？"提示信息Button1TextDialogResult"确定"OK单击它将退出应用程序Button2TextDialogResult"取消"Cancel单击它将不退出应用程序8．对照图7-3退出提示框窗体设计界面，为窗体添加控件并设置控件的属性。控件的属性设置如表7-3所示。然后再把该窗体的FormBorderStyle属性值设置为“FixedSingle”，把AcceptButton属性值设置为“Button1”

8、把CancelButton属性值设置为“Button2”。至此界面设计基本完成。表7-3任务7-1中的frmExit窗体中的控件属性设置及其功能9．在“解决方案资源