《程序设计》ppt课件

《《程序设计》ppt课件》由会员分享，可在线阅读，更多相关《《程序设计》ppt课件（129页珍藏版）》请在金锄头文库上搜索。

1、1,Visual Basic 程序设计,第2章 可视化编程初步,2,2.1 时钟程序设计任务 2.1.1 任务描述 创建一个倒计时的简单应用程序。功能是：当在文本框内输入倒计时的分钟数后，单击“开始”按钮就开始倒计时，倒计时结束时，弹出“时间到！”的信息框。,3,2.1.2 界面设计,1. 界面设计 新建工程并创建窗体。 见下页图。（演示）,4,5,2. 向窗体上添加控件 添加的控件有： 一个标签 一个文本框 一个命令按钮 一个计时器控件 见下页图。,6,7,3 设置对象属性 （1）Form1窗体 Caption”倒计时器” （2）Label1控件 Caption”请输入倒计时的分钟数” Au

2、toSizeTrue （3）Command1控件 Caption”开始” （4）Text1控件 Alignment”2-Center” （5）Timer1控件 Intervel”1000”,8,2.1.3 代码设计 1.进入代码编辑器窗口 见下页图,9,10,2. 书写程序代码 （1）代码编辑器“通用”部分代码 Dim m As Long 声明一个变量 （2）Command1控件代码 使控件计时器开始工作 Timer1.Enabled = True 将分钟数转换为秒数，并保存在变量m中 m = Val(Text1.Text) * 60 改变标签控件的标题 Label1.Caption = “现

3、在开始倒计时“ 使命令按钮不可见 Command1.Visible = False,11,2. 书写程序代码 （3）Timer1控件代码 Private Sub Timer1_Timer() 当timer1.enabled=true时，本程序每秒自动执行一次 每运行一次，就将m变量的值减1秒 m = m - 1 If m 0 Then 如果倒计时结束，则 Timer1.Enabled = False 关闭计时器 MsgBox “时间到！“, 0, “倒计时“ Label1.Caption = “请输入倒计时的分钟数“ Text1.Text = “ 清空文本框 Command1.Visible

4、= True 使命令按钮可见 Else 否则显示倒计时数 Text1.Text = m End If End Sub,12,2.1.4 保存和运行程序 1. 保存工程 （1）单击“文件”菜单中的“保存工程”或单击工具栏上的“保存工程”按钮，系统弹出“文件另存为”对话框，提示用户输入窗体文件名。将窗体文件名该为Timer.frm。 （2）紧接着出现“工程另存为”对话框，以来保存工程文件。将文件名改为Timerapp.vbp，然后单击“保存”按钮。 （演示） 2.运行程序 （演示）,13,习题 教材 P47 一、,1. 在Visual Basic的集成开发环境中创建Visual Basic应用程序

5、时，除了工具箱窗口、窗体设计窗口、属性窗口外，必不可少的窗口是（ ）。 A. 窗体布局窗口 B. 立即窗口 C. 代码窗口 D. 监视窗口 答案：C,14,2.1.5 编译与打包 1.编译应用程序 编译应用程序就是把一个应用程序制成一个可执行文件，即.EXE文件。方法是单击“文件”菜单中的“生成Timerapp.exe”选项，出现“生成工程”对话框，在其中输入Timerapp.exe，然后单击“确定”按钮，程序即被编译在磁盘上，这样该应用程序就可以脱离VB环境，在操作系统下单独运行了。 （演示）,15,习题 教材P48 二、,2. 简述建立可执行文件的步骤。 答：单击“文件”菜单中的“生成Ti

6、merapp.exe”选项，出现“生成工程”对话框，在其中输入工程名.exe，然后单击“确定”按钮，程序即被编译在磁盘上，这样该应用程序就可以脱离VB环境，在操作系统下单独运行了。,16,习题 教材P48 二、,3. Visual Basic应用程序中包括哪些类型的文件？ 答：可能包含下列不同类型的文件： 1. 跟踪所有部件的工程文件（.vbp） 2. 每个窗体的文件（.frm） 3. 每个窗体的二进制数据文件（.frx） 4. 每个类模块的文件（.cls），可选 5. 每个标准类模块的文件（.bas），可选 6. 一个或多个包含Activex控件的文件（.ocx），可选。 7. 单个资源文件

7、（.res），可选。,17,2. 打包 如上所述，.EXE文件可以脱离VB环境，在操作系统下单独运行，但不能简单地认为这样就可以将该.EXE文件发布给他人，或者可以拷贝到活动磁盘上带到任意的系统上去使用。因为在执行已编译的代码时，VB要运行特定的运行库，但每台计算机安装的运行库不一定相同，因此必须创建一个安装程序来发布文件。,18,创建安装程序的操作步骤： （1）在“开始”菜单的“Microsoft Visual Basic 6.0中文版”程序组中，选择“Microsoft Visual Basic 中文版工具”，然后在其下级菜单中选择“Package&Deployment向导”，打开“打包和

8、展开向导”对话框。（见下图）,19,（2）单击上图中的“浏览”按钮，出现“打开工程”对话框，选择要打包的文件，单击“打开”按钮。,20,（3）系统返回“打包和展开向导”，单击图中的“打包”按钮， 如果工程还没有编译成可执行文件，系统会弹出对话框提示 你进行编译，然后已编译，则弹出“包类型”对话框。,21,22,23,（4）选择“标准安装包”，以创建由setup.exe程序安装包。 然后单击“下一步”按钮，弹出“打包文件夹”对话框。,24,选择缺省项，然后单击“下一步”按钮。,25,在上图的对话框中，单击“是”按钮，弹出“包含文件”对话框。,26,这里列出同应用程序一起发布的文件，若用户还需要用

9、到 其他一些文件和库，可以手工“添加”按钮加入这些文件。 然后单击“下一步”按钮。,27,（5）在“压缩文件选项”框，默认“单个的压缩文件”。如果 用户希望用软盘来发布应用程序，可选中“多个压缩文件” 选项，并且选择合适的磁盘大小。然后单击“下一步”按钮。,28,（6）在“安置程序标题”对话框，输入程序标题，然后单 击“下一步”按钮。,29,（7）在“启动菜单项”对话框，发布的程序可以通过单击 “开始”、“程序”、然后再选中该应用程序的组启动。单击 “下一步”按钮。,30,（8）在“安置位置”对话框，可选择应用程序的安置目录。 这里选择缺省设置，然后单击“下一步”按钮。,31,（9）在“共享文

10、件”对话框，用户可将给定的文件设置成 共享，然后单击“下一步”按钮。,32,（10）在“已完成”对话框，单击“完成”按钮，系统开始生 成安置包程序。打包完成后弹出“打包报告”。,33,单击“关闭”按钮，完成操作。,34,2.1.6 安装运行 当用户需要在其它机器上运行已打包的程序时，必须进行程序安装。首先找到压缩包所在的目录，然后双击Setup.exe文件，Windows就会执行安装程序显示欢迎对话框，单击“确定”按钮后，系统将显示“安装程序”对话框。,35,单击“确定”按钮，开始安装。安装家属后，将在 Windows”开始”菜单对应该程序的地方添加一个 图标。如果单击“退出安装”按钮，安装程

11、序将启 动应用程序删除工具来删除临时安装文件。,36,习题 P47 一 、,2. 应用程序打包后，其包文件的后缀为（ ）。 A. .exe B. .cab C. .tet D. .ocx 答案：B,37,习题 P48 一 、,10. 工程文件的后缀是（ ）。 A. .bmp B. .vbp C. .frm D. .bas 答案：B,38,2.1.7 VB应用程序开发的一般步骤 1.设计应用程序界面 2.设计对象属性 3.编写代码 4.保存和运行程序 5.编译和打包 6.安装运行,39,习题 教材P48 二、,1. 简述设计Visual Basic应用程序的步骤。 答：1.设计应用程序界面 2.

12、设计对象属性 3.编写代码 4.保存和运行程序 5.编译和打包 6.安装运行,40,2.2 程序代码分析 VB应用程序涉及变量、赋值语句、MsgBox等概念，下面对它们进行 简要介绍。,41,2.2.1 变量 所谓变量就是可以改变的量，程序运行过程中可以不断改变它的值。变量具有名字和数据类型两个属性。变量的名字用于在程序中标识变量和使用变量的值，数据类型则标识变量中能保存哪种类型的数据。一个变量在一个时刻只能存放一个值，当新的数据存放到变量中时，原来的数据就不存在了。,42,在使用一个变量时，必须首先用Dim语句对它进行声明。例如 声明一个变量a，用来存储字符型数据 Dim a As Stri

13、ng 声明一个变量b，用来存储整型数据 Dim b As Integer 声明一个变量c，用来存储双精度型数据 Dim c As Double 当执行Dim语句后，VB程序就会在计算机内预留一个位置，准备存放数据。,43,习题 P47 一 、,5. 在Visual Basic中，变量的默认类型是（ ）。 A. Integer B. Double C. Variant D. Currency 答案：C,44,2.2.2 赋值语句,赋值语句是程序设计中最基本、最常用的语句，当需要把数值、字符串表达式的运行结果保持到变量中，或者需要修改某个对象缺省属性值时，最常用的方法就是使用赋值语句，赋值语句的语

14、句格式为： 变量名=表达式 或 对象名.属性名=表达式 例如：m=Val（Text1.Text）*60,45,赋值语句具有计算和赋值双重功能，它首先计算“=”（赋值号）右边的值，然后把结果赋值给“=”左边的变量。使用赋值语句应注意以下几点： 1. 不要把赋值号“=”与数学中的等号相混淆。等号表示两侧的值相等，而赋值号“=”是将一个值赋给一个变量。例如： m=m-1 2. 赋值号“=”左边必须是变量名或对象属性，“=”右边是表达式，其值可以是常量、变量、函数或是它们的混合运算式。例如: x=x+y b=1 c=b*2+2,46,习题 P47 一 、,7. 下列赋值语句正确的是（ ）。 A. A=

15、B+C B. B+C=A C. B=A D. 2=A+B 答案：A,47,2.2.3 MsgBox语句和函数的使用 在编写程序过程中，为了对用户的操作给予一定的提醒或反馈，常常需要在屏幕上显示一些提示信息、警告信息、询问信息或错误消息等提示，VB提供的MsgBox命令就可以实现这些功能，它不仅可以向用户传送信息，还可以接收用户在对话框上的选择，以此作为程序继续执行的依据。,48,MsgBox命令称为消息对话框，它有两种格式，一种作为函数使用，需要返回值；另一种作为一般的命令语句使用，不需要返回值。 MsgBox函数格式： 变量=MsgBox（提示信息，对话框类型，对话框标题） MsgBox命令

16、格式： MsgBox 提示信息，对话框类型，对话框标题 其中： （1）“提示信息”指定在对话框中出现的文本。 （2）“对话框标题”指定了对话框的标题。 （3）“对话框类型”用来指定对话框中出现的按钮和图标，一般有三个参数。 （4）MsgBox返回值指明了用户在对话框中选中了哪一个按钮。,49,“对话框类型”参数1出现的按钮,50,“对话框类型”参数2图标类型,51,“对话框类型”参数3默认按钮,52,函数返回值,53,例如： Private Sub Command1_Click() MsgBox “除数不能为0！“, vbOKCancel, “输入数据错误“ End,54,例如： Private Sub Command1_Click() a = MsgBox(“密码不正确“, 2 + 32 + 0, “标题“) If a = 3 Then End End If