VB窗体和简单的输入输出.ppt

第3章窗体和简单的输入输出,唐加胜,第3章窗体和简单的输入输出,本章内容最简单的工程Form对象的属性、方法和事件输入对话框inputbox和消息对话框msgbox编码风格本章重点Form对象的属性、方法和事件Msgbox（）、Inputbox（）本章难点Msgbox（）Inputbox（）,3.1最简单的VB工程,最简单VB工程的创建新建/”标准EXE”只有一个工程文件：工程1.VBP工程中只有一个窗体文件:form1.frm,3.2窗体的基本属性,Caption设置或返回窗体标题栏的文字。BorderStyle设置窗体的边框样式，取值见P31。Controlbox设置是否显示窗体的控制菜单条。MaxButton、MinButton设置是否显示最大化和最小化按钮Moveable设置窗体是否可移动。True可以移动。Icon设置窗体最小化时的图标,3.2窗体的基本属性,Picture指定窗体内要显示的背景图片。SetForm1.Picture=LoadPicture(“c:bkground.jpg”)StartUpPosition窗体启动时在屏幕上的显示位置。手动（0）、容器中央（1）、屏幕中央（2）、窗口缺省（3）WindowState窗体启动时是正常（0）或最小化（1）或最大化（2）ScaleHeight、ScaleWidth窗体内部绘图区的高度、宽度，Height,Width指定整个窗体的高和宽。,课堂示例3-1,用窗体名访问form1.caption=“欢迎”用Me访问（me表示当前窗体）Me.caption=“欢迎”直接访问窗体属性caption=“欢迎”访问窗体的控件属性窗体名.控件名.属性如果是当前窗体，则可省略窗体名。举例：窗体Form1上有一个命令按钮command1,使之一直位于窗口中央。(提示：在窗体的resize事件中编写代码),访问窗体的属性,课堂示例3-0,Initialize事件窗体对象被创建、但没加载。该事件中的代码最先被执行。通常将一些初始化的操作放在该事件过程中。Load事件窗体的所有控件都装入内存，但窗体仍未显示。可使用show方法显示。窗体中控件的初始值代码通常放在Load事件中，如：Text1=100Activate事件窗体处于活动状态事件。窗体中控件的获得焦点方法Setfocus一般放在此事件中。同时有Gotlocus事件产生。如：text1.setfocusDeactivate事件窗体处于非活动状态。同时有Lostfocus事件产生。,3.3窗体的常用事件,【例】设计程序，使窗体一打开就在屏幕的右下角。,【提示】Screen是一个全局的系统对象，对应于计算机屏幕，可以直接使用。思考:如果窗体位于屏幕的中央，怎么修改上述代码？,课堂示例3-1,Load事件示例,QueryUnload事件cancel设置为非零值，可停止窗体的关闭Unloadmode指示引起此事件的原因UnLoad事件在Queryunload事件后发生,课堂示例3-2,3.3窗体的常用事件,3.3窗体的常用事件,鼠标事件窗体中最常用的鼠标事件为Click和DbClick事件，此外，还常用：MouseMove、MouseDown、MouseUp等事件。【例】编写程序在窗口标题栏中显示鼠标当前的坐标位置。,Button按钮常数。左按钮（1）、右按钮（2）Shift换档常数。Shift键(1)、Ctrl键(2)、Alt键(4)X鼠标的水平坐标Y鼠标的垂直坐标&字符串连接操作符,课堂示例3-2,3.3窗体的常用事件,键盘事件主要有：KeyPress、Keydown、KeyUP、KeyPreviewKeyPreview为True，窗体的键盘事件优先于控件的键盘事件。通常情况下，焦点控件对于键盘事件有优先响应的权利。【例】编写程序利用字符+和-实现窗口的变大和变小。,课堂示例3-3,课堂示例3-3,Resize事件当窗口第一次显示或窗口大小改变时引发该事件。当窗口调整大小时，可用Resize事件过程来移动窗口中的控件位置或调整其大小，以使界面保持美观。【例】设计包含一个TextBox控件的窗体，要求该控件总是充满整个窗体。(提示：ScaleWidth和ScaleHeigth属性代表窗口内部绘图区域的宽度和高度。),3.3窗体的常用事件,Print方法cls方法Show方法Hide方法,窗体的常用方法,窗体类型SDI窗体程序运行中只有一个窗口被激活和显示MDI窗体程序管理和显示多个窗口添加新窗体“工程-添加-添加窗体”添加已存在窗体“工程-添加-添加文件”提示：一个工程中可以添加多个窗体，一个窗体可以添加到多个工程中。,3.4设计多窗体程序,课堂示例3-4,指定启动窗体有多个窗体的工程必须指定一个启动窗体。默认情况下，第一个创建的窗体为启动窗体。如果需要更改，可采用以下方法：右键单击“工程”，选“工程属性”选“通用”选项卡在“启动”列表框中，选中所要窗体使用SubMain在标准模块(.bas)中定义主过程MainSubMain().EndSub在工程属性的“启动”列表框中，选中“SubMain”举例：将前面的示例合并到一个工程文件中。,设置启动窗体,窗体的加载、显示和隐藏,除了通过设置启动窗体来自动加载窗体外，还可以在程序中加载窗体。在程序中加载窗体的方法:窗体名.Show0无模式窗体，可以将焦点切换到其它窗体窗体名.Show1模式窗体，不能将焦点切换到其它窗体执行Show方法可以完成窗体的创建、加载和可见三个过程。如果执行Load窗体名只能加载窗体,此时窗体还不可见，仍需要执行show方法。显示窗体窗体名.Show窗体名.Visible=True隐藏窗体窗体名.Hide窗体名.Visible=False,End语句，立即中止、结束程序。不触发窗体的Unload和QueryUnload事件。,窗体的关闭,卸载窗体可以使用以下几种方法:Unload窗体名UnloadmeEnd关闭按钮,课堂示例3-6,3.5简单的输入和输出,消息对话框MsgBoxMsgBox函数和语句会产生一个输出对话框，向用户传送信息，并可通过用户在对话框上的选择接收用户所做的响应，作为程序继续执行的依据。格式：MsgBox(prompt,buttons,title)prompt对话框中显示的消息，字符串表达式buttons按钮、图标和默认按钮的取值之和，数值表达式，见P41Title对话框的标题，字符串表达式函数返回值为一个数值，见P42。,课堂示例3-5,输入对话框InputBoxInputbox函数提供一个输入对话框，允许用户输入数据。函数返回值就是用户输入的值，是一个字符串。格式：变量=InputBox(prompt,title,default,x,y)BackString对话框中的返回值prompt对话框中显示的提示信息，必选项title可选，对话框的标题，缺省标题为应用程序名default可选，输入文本框中的缺省值x,y对话框与屏幕左边和上边的距离,3.5简单的输入和输出,VB语句书写规则,每个语句占一行，以回车键结束；多个语句可写在同一行上，各语句间用冒号:隔开。例如：t=a:a=b:b=t一个语句可以写在多行上，中间行末尾用下划线_表示续行，续行符（即下划线）与前面的字符之间至少要有一个空格；在同一行内，续行符后面不能加注释