2016新编vb程序设计实训

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

1、实训项目一VisualBasic集成开发环境一、实训目的与要求1.能进行VisualBasic的启动与退出；2.培养VisualBasic的集成开发环境的简单运用。二、实训设备与器材计算机、VisualBasic6.0软件三、实训组织与实施周一：14:00-17:30地点：电子阅览室四、实训内容实训1-1练习VisualBasic6.0的启动与退出（1）启动（2）退出①单击下图VB主窗口右上角的关闭按钮②选择“文件”菜单中的“退出”命令：③按快捷键Alt+Q实训1-2熟悉集成开发环境的窗口（1）主窗

2、口如上图所示，由标题栏、菜单栏和工具栏组成(2)窗体设计器窗口操作练习：①拖动窗体设计窗口,改变其位置；①拖动窗体设计窗口边框,改变其大小；①拖动窗体设计窗口的“最小化”按钮，将其缩成图标；双击窗体设计窗口控制菜单图标，恢复其原来大小；（3）属性窗口属性窗口位于主窗口右侧，所有窗体或控件的属性，如颜色、字体、大小等，都可以通过窗口设置以及修改。操作练习：①单击窗体设计窗口，注意此时属性窗口显示了当前Form1的所有属性；②选中Caption属性，将Form1改为窗体练习，此时窗体变为窗体练习；（3）

3、工程资源管理器窗口工程资源管理器窗口是以树型结构方式列出当前工程中所有文件，并对工程进行管理，如下图：操作练习：①查看“代码窗口”按钮，显示和编辑代码；②查看“对象代码”按钮，显示窗口上的模块对象；（3）代码窗口代码窗口是专门进行程序设计的窗口，可在其中显示和编辑代码窗口。（4）工具箱窗口操作练习：①选择“工程菜单”中的部件按钮；①在弹出部件对话框中选择控件选项卡，单击确定按钮，这时工具箱中会出现新的按钮；（7）其它窗口1）立即窗口：使用立即窗口可以在中断状态下监视对象属性、变量或表达式的值，也可以

4、在设计时查询表达式的值或命令的执行结果。初学者可以在设计时利用立即窗口练习常用函数、语句和表达式的使用。2）窗体布局（FormLayout）窗口：窗体布局窗口，用于指定程序运行时窗体的初始位置。在窗体布局窗口中有一个模拟显示器，在它的“屏幕”上直观地显示了本程序中各窗体在实际显示器屏幕中的位置和大小。思考题：1.详细叙述VB6.0各个窗口的主要作用。①窗体窗口:窗体窗口是VisualBasic应用程序的主要构成部分，是应用程序最终面向用户的窗口，应用程序的运行结果最终在窗体中体现。各种图形、图像、数

5、据、按钮等都是通过窗体或窗体中的控件显示出来的，窗体窗口的设计是应用程序设计的第一步。②属性窗口：属性窗口就是用来设置窗体和窗体中的控件属性的。③工程资源管理器窗口：在工程资源管理器中也可以创建、添加或删除文件。在工程资源管理器窗口的上部有3个按钮，其作用介绍如下。【查看代码】按钮：用于打开代码编辑器，查看当前窗体的程序指令。【查看对象】按钮：将当前打开的代码编辑器所指向的窗体打开。【切换文件夹】按钮：用于切换工程资源管理器中管理不同类型文件的文件夹。2.任意举出一个例子来说明VB应用程序开发的详细

6、步骤。3.谈谈VB程序设计学习的感受。（不少于1000字）项目二创建简单的应用程序一、实训目的和要求1.VisualBasic对象的属性、方法和事件运用；2.练习VisualBasic程序开发的一般步骤操作；3.培养编写简单的应用程序。二、实训设备和器材计算机、VisualBasic6.0软件三、实训组织与实施地点：电子阅览室四、实训内容实训2-1：①控件名称及其属性设置控件名称属性名及属性值Form1Caption=“LT1-1”Command1Caption=“确定”②界面设计②显示代码：Pri

7、vateSubCommand1_Click()Print"你单击了命令按钮"EndSubPrivateSubForm_Click()Form1.Print"你单击了窗体"EndSub④运行效果实训2-2：①控件名称及其属性设置控件名称属性名及属性值Label1Caption=“输入行数”Text1Text=“”②界面设计③代码显示：PrivateSubForm_Click()DimnAsInteger,i%,j%Cls'清屏n=Val(Text1.Text)Fori=1TonPrintTab(20)

8、;Forj=1ToiPrint"*";NextjPrintNextiEndSub④运行效果：实训2-3①控件名称及其属性设置控件名称属性名及属性值Text1Text=“”Text2Text=“”Command1Caption=“测算”②界面设计③显示代码：PrivateSubCommand1_Click()DimnAsDaten=Text1.TextIfnMod4=oAndnMod100<>0OrnMod400=0ThenText2.Text="是闰年"ElseTex