《VB教程---窗体和简单的输入输出课件》由会员分享，可在线阅读，更多相关《VB教程---窗体和简单的输入输出课件（31页珍藏版）》请在金锄头文库上搜索。
1、第三章 窗体和简单的输入输出,本章内容: 最简单的工程 Form对象的属性、方法和事件 输入对话框inputbox和消息对话框msgbox 编码风格 本章重点: Form对象的属性、方法和事件； inputbox（）、msgbox（） 本章难点: inputbox（）、msgbox（）,3.1 最简单的工程,最简单的VB程序： 新建”标准EXE” 只有一个工程文件：工程1.VBP 工程中只有一个窗体:form1.frm,3.2 窗体的属性,一、窗体的属性 Caption 控制窗体标题栏的文字 BorderStyle 控制窗体的边框样式，取值见 。 Controlbox、MaxButton、Mi
2、nButton 是否显示菜单条、最大化和最小化按钮 WindowState 启动时是正常（0）或最小化（1）或最大化（2） Picture 指定窗体内要显示的图片 Set Form1.Picture = LoadPicture(“c:bkground.jpg”) Icon 窗体最小化时的图标 MouseIcon 鼠标图标 ScaleHeight、ScaleWidth 窗体内部绘图区的高度、宽度，Height,Width 指定整个窗体的高和宽。 StartUpPosition 窗体在屏幕上的显示位置：手动（0）、容器中央（1）、屏幕中央（2）、窗口缺省（3） 。,二、访问窗体的属性 用窗体名访问
3、 form1.caption=“欢迎” 用Me（表示当前窗体）访问 Me.caption=“欢迎” 直接访问属性 caption=“欢迎” 访问窗体上控件的属性 窗体名. 控件名.属性 如果是当前窗体，则可省略窗体名。,3.2 窗体的属性,创建 Initialize事件,可见,加载 Load事件,获得焦点 Activate和GotFocus事件,失去焦点 Deactivate和LostFocus事件,卸载 QueryUnload和UnLoad事件 Terminate事件,3.3 窗体的事件,课堂示例3-0,一、窗体的创建、加载事件,1. Initialize事件 窗体对象被创建、但没加载。该事
4、件中的代码最先被执行。 通常将一些初始化的操作放在该事件过程中。,2. Load事件 窗体的所有控件都装入内存，但窗体仍未显示。可使用show方法显示。 对控件设置初始值的代码通常放在Load事件中，如：text1.text=100,【例】设计程序，使窗体一打开就在屏幕的右下角。,【提示】Screen是一个全局的系统对象，对应于计算机屏幕，可以直接使用。 思考:如果窗体位于屏幕的中央，怎么修改上述代码？,课堂示例3-1,3. Activate事件 窗体处于活动状态。Setfocus方法一般放在此事件中。 Form1_Activate() MsgBox “Activate事件发生!” End S
5、ub 4. Deactivate事件 窗体处于非活动状态。,课堂示例3-0,5. QueryUnload事件,Unloadmode（选讲） 一个值或一个常数，如返回值中所描述的，它指示引起 QueryUnload 事件的原因。参数返回下列值： 常数 值 描述 vbFormControlMenu 0 用户从窗体上的“控件”菜单中选择“关闭”指令。 vbFormCode 1 Unload 语句被代码调用。 vbAppWindows 2 当前 Microsoft Windows 操作环境会话结束。 vbAppTaskManager 3 Microsoft Windows 任务管理器正在关闭应用程序。
6、 vbFormMDIForm 4 MDI 子窗体正在关闭，因为 MDI 窗体正在关闭。 vbFormOwner 5 因为窗体的所有者正在关闭，所以窗体也在关闭。,cancel 设置为非零值，可停止窗体的关闭,6. UnLoad事件：在Queryunload事件后发生,课堂示例3-2,cancel 设置为非零值，可停止窗体的关闭,Unload 窗体名 或 Unload me 关闭按钮 End （End 语句，立即结束程序。不触发Unload和QueryUnload事件。）,卸载窗体:,三、鼠标事件,6.鼠标事件 最常用的鼠标事件为Click和DbClick事件。 绘图中还常用：MouseMove
7、、 MouseDown、MouseUp 【例】编写程序在窗口标题栏中显示鼠标当前的坐标位置。 Button 按钮常数。左按钮（1）、右按钮（2） Shift 换档常数。 Shift键(1)、 Ctrl键(2) 、Alt键(4) X 鼠标的水平坐标 Y 鼠标的垂直坐标 姓名;Tab(30);年龄,P90示例,Spc(n)：此函数用在Print方法或Print#语句中，跳过n个空格。,n是在显示或打印下一个表达式之前插入的空格数。Spc函数与输出项间用分号隔开。,（1）当Print方法与大小不同的字体一起使用时，使用Spc函数打印的空格字符的宽度总是等于选用字体内以磅数为单位的所有字符的平均宽度。
8、 （2）Spc函数与Tab函数的作用类似，可互相代替。但应注意，Tab函数从对象的左端开始计数，而Spc函数只表示两个输出项之间的间隔。 （3）另外还有Space函数，功能与Spc函数类似。,Print ABC;Spc(5);DEF 显示：ABC DEF,说明：,书写代码的规则,1不区分大小写 在VB中所有的关键字、常量名、变量名以及对象属性等在书写时不区分英文大小写。但字符串的值，值A和值a是两个不同的值。 2使用注释 注释语句以单引号 开始，可以单独书写一行，也可以与程序语句在同一行。 3将长语句分行书写 续行符(下划线_) 可将长语句分成多行书写。 注意续行符不能将一个完整的单词或一对双引号括起的字符串分为两行。在同一行内，续行符后面不能加注释。 4缩进式书写 VB提供了自动缩进的功能。此外可以使用“编辑”工具栏进行整段代码左移、右移或进行注释等,使用编辑工具栏,“编辑”工具栏通过【视图】【工具栏】菜单来选择。,课后作业,完成课后的作业 P46 课后作业第2题,
