VB可视化编程基础VB武科大.ppt

VB可视化编程基础 第二章 2 目标 VB可视化程序设计的基本概念窗体命令按钮文本框标签 3 2 1基本概念 对象属性方法事件 4 事件驱动 系统调用Command1 Click事件过程来响应该事件 该代码被执行 PrivateSubCommand1 Click 语句块EndSub Command1按钮发生了Click事件 5 VB中的对象 VB中的对象是VB系统基本运行实体 如窗体 Form 标签 Label 文本框 TextBox 命令按钮 CommandButton 等 包括一组程序代码和数据的集合 6 回顾与导入 7 工具箱控件图解 VB中的对象概述 8 演示向VB窗体中添加对象 9 对象的三要素 对象属性对象事件对象方法 10 对象属性设置 直接输入属性值通过下拉列表选择所需的属性值利用对话框设置属值如字体 颜色 11 对象属性设置 通过程序语句设置 对象名 属性名 属性值 PrivateSubCommand1 Click Label1 Visible TrueEndSubPrivateSubCommand2 Click Label1 Visible FalseEndSub 12 2 2窗体概述 窗体的作用 演示一系统 13 窗体 窗体的结构窗体的属性 事件 方法 14 窗体的结构 窗体 X Y Left Top 0 Width Height 15 窗体举例 QQ ICON caption minbutton maxbutton 16 窗体的属性 NameCaption大小类 TOP LEFT Height Width字体颜色 Backcolor图片 包括Icon和PictureBorderstyleVisiable 17 Borderstyle属性 18 窗体的事件 ClickLoadActivate 活动 Deactivate 非活动 QueryUnloadResize 19 Print方法 使用格式如下 对象名 Print 输出列表 PrivateSubForm Click a 3 b 4Printa b a bPrinta bPrint a a b bEndSub 输出列表的各项间可以用逗号或分号分隔逗号与分号作分隔符的区别 若语句行末尾没有分隔符 则输出当前项后自动换行 窗体的Print方法 20 2 Spc函数格式 Spc n 功能 在输出项之间输出n个空格例如 Print 学号 Spc 2 姓名 Spc 5 成绩 输出结果 表示空格 学号 姓名 成绩 格式输出函数 21 格式输出函数 3 Tab函数格式 Tab n 功能 指定输出项在输出行的位置例如 PrintTab 2 学号 Tab 11 姓名 Tab 21 成绩 输出结果 1个汉字占2个位置 学号 姓名 成绩 22 PrivateSubForm Click PrintPrintTab 15 学号 Tab 26 姓名 Tab 36 成绩 PrintTab 14 String 27 输出27个减号字符 PrintTab 14 20011001 Tab 26 张小三 Tab 36 57PrintTab 14 20011003 Tab 26 李小四 Tab 36 69PrintTab 14 20011012 Tab 26 马小五 Tab 36 92PrintTab 14 String 27 输出27个减号字符 EndSub 23 窗体的Print方法 PrivateSubForm Click Print 武汉科技大学 计算机学院 PrintPrint 武汉科技大学 计算机学院 PrintPrint 武汉科技大学 Spc 10 计算机学院 PrintPrintTab 10 武汉科技大学 计算机学院 EndSub 24 窗体的方法Print 用于将文本输出到窗体的一行上 调用格式 对象名 Print 输出项列表 对象除了窗体外 还可以是图片框 PictureBox Debug或打印机 Printer 若缺省对象名 表示将文本输出到当前窗体上 输出项列表 是由0个 1个或多个待输出的数值表达式或字符串表达式构成 当输出项是由多个项构成 则中间必须用逗号或分号分隔 若Print后什么都不跟 则表示输出一个空行 窗体的Print方法 如下代码 PrivateSubForm Click Print1 2PrintPrint We study EndSub 注意 标准格式即参数以 分割 下一个输出项将与上一个输出项间隔14列 紧缩格式即参数以 分割 下一个输出项将以紧凑格式 紧跟着上一个输出项输出 Print方法输出的位置是由窗体的绘图坐标CurrentX和CurrentY属性决定的 默认为对象的左上角 0 0 该方法可以结合定位输出函数一起使用 Spc n 在下一个输出项前插入n个空格 Tab n 输出定位在绝对n列号上 代码 11 9 7 5 13 11 15 9 13 17 PrivateSubForm Click EndSub PrintTab 11 A PrintTab 9 B Spc 3 B PrintTab 7 C Spc 3 C Spc 3 C PrintTab 5 D Spc 3 D Spc 3 D Spc 3 D 25 Print在Load和Activate事件中的区别 PrivateSubForm Load Print EndSubPrivateSubForm Activate Print EndSub 注意 Load事件发生时窗体是不活动的 而Activate事件发生时窗体是活动的 Print方法不能在不活动窗体上使用 因此Print不能用于Load事件中 26 窗体的Print方法总结 Print方法 在窗体上输出 对象 Print Spc n Tab n 表达式列表 Spc n 函数 插入n个空格 允许重复使用 Tab n 函数 左端开始右移动n列 允许重复使用 分号 光标定位上一个显示的字符后 逗号 光标定位在下一个打印区的开始位置处 每个打印区占14列 空print则表示换行 27 窗体的其它常用方法 窗体的方法也就是窗体所具有的行动方式 窗体上常用的方法有 1 Show 用以显示窗体2 Hide 用于隐藏窗体 但不能使其卸载3 Move 用以移动窗体到一定的坐标位置4 Cls 清除窗体中的图形或文本 演示QQ登录程序 28 命令按钮 CommandButton 属性 Name caption Enabled cancel default style picture事件 click 29 命令按钮通常在Click事件中编写一段程序 当用户用鼠标单击这个按钮时 就会启动这段程序 执行某一特定的功能 命令按钮控件的属性Caption 设置命令按钮的标题 Default 设置命令按钮是否为默认按钮 即当运行程序时 用户按回车键时 就激活它 语法格式 命令按钮 CommandButton 对象名 Cancel True False 对象名 Default True False 注意 在一个窗体内 只能有一个Default命令按钮 也只能有一个Cancel命令按钮 30 命令按钮控件的属性Enabled 设置命令按钮是否能被按下 语法格式 其中 属性值为True 默认值 表示该按钮能被响应 属性值为False表示该按钮不能被响应 以灰色显示 Picture 设置命令按钮上显示的图形 语法格式 命令按钮 CommandButton 对象名 Enabled True False 对象名 Picture LoadPicture 图形文件名 31 命令按钮控件的属性Style 设置命令按钮的类型 语法格式 ToolTipText 设置当鼠标在命令按钮上暂停时显示的文本 命令按钮 CommandButton 对象名 Style 0 1 对象名 ToolTipText 字符串 32 命令按钮控件的事件Click MouseDown MouseUp 当单击鼠标时就会触发该三个事件 他们触发的顺序为MouseDown Click MouseUp事件 命令按钮 CommandButton 对象名 Default True False 注意 MouseDown和MouseUp只能通过单击鼠标触发 而Click既可通过单击鼠标触发 还可以在按钮获得焦点时按空格或回车键触发 33 命令按钮 CommandButton 命令按钮的主要方法SetFocus 设置焦点 设置为焦点的按钮在其表面有一个虚边框 注意 命令按钮不支持双击事件 BackColor属性和Picture属性在Style属性值为1 图形方式 下 才能显示出来 34 命令按钮 CommandButton PrivateSubCommand1 Click Form1 MoveLeft 500 Top 500 Width 500 Height 500EndSubPrivateSubCommand2 Click Form1 MoveLeft 500 Top 500 Width 500 Height 500EndSubPrivateSubCommand3 Click EndEndSub 35 文本框是一个文本编辑区域 主要用于接收用户的输入 输出 修改等信息 文本框 TextBox 何时使用文本框 如 36 文本框控件TextBox 文本框控件用于输入 输出文本 与标签不同之处在于文本可以编辑 建议名称采用前缀txt打头的一串英文字母 如 txtName 默认名称Text1 Text2 37 文本框 TextBox 在工具箱选取文本框按钮创建按钮 用鼠标在窗体上拖曳画出 单选按钮的默认名 TextX 38 Name 设置文本框的名称 Text 主要属性 设置文本框中显示的文本内容 语法格式 文本框 TextBox 对象名 Text 字符串 文本框常用属性 39 Locked 设置文本框是否可以被编辑 语法格式 MaxLength 设置文本框中输入的字符串最大长度 对象名 Locked True False 文本框常用属性 40 PasswordChar 设置是否在文本框中显示用户所输入的字符串 语法格式为 对象名 PasswordChar 文本框常用属性 41 Change 当用户改变文本框的内容时 该文本框的Change事件被触发 该事件对应的代码结构如下 PrivateSubText1 Change EndSub 文本框常用事件 42 例 程序运行时 用户输入密码时 在另一个文本框中显示用户输入的密码 分析 接收用户输入用户输入的内容保存在文本框的什么属性中文本框2与文本框1内容一致同步显示代码 文本框 Text2 text text1 text 文本框Change事件 PrivateSubText1 Change EndSub Text2 Text Text1 Text 文本框示例 43 文本框控件的方法SetFocus 可以设置焦点 其获得焦点的显示效果是焦点 光标 在文本框中闪动 语法格式 让指定的对象获得焦点 设置焦点 本方法可使指定的文本框 或其他有聚焦能力的对象 成为焦点 也就是当前文本框 成为焦点的文本框中具有闪动的光标 对象名 SetFocus 文本框常用方法 44 文本框的其他常用属性 MultiLine 支持多行显示 True False ScrollBar 文本框带滚动条 None Horizontal Vertical Both 注意 必须MultiLine为TrueMaxLength 文本框的最大长度 最多接受字符数 一个汉字或一个字符长度都为1默认为0 表示长度无限制PassWordChar 设置口令显示字符注意 必须MultiLine为FalseLocked 锁定文本内容 True False 45 文本框的常用事件之一Change 一旦文本框的内容发生变化 立即触发该事件例 标签同步显示文本框的输入例 程序阅读假设文本框中原先没有内容 程序启动后在文本框中输入 ABCD 再单击命令按钮Command1 写出程序的运行结果 PrivateSubCommand1 Click PrintText1 TextEndSubPrivateSubText1 Change PrintText1 TextEndSub 课堂练习 46 例设计一个程序可检查密码是否正确 用户名和密码都为 12345 文本框示例 47 标签Label 标签控件用于显示文本 多用作给其他控件加文字说明 还可以作为提示或结果输出 不可直接编辑建议名称采用前缀lbl打头的一串英文字母 如 lblResult 默认名称Label1 Label2 48 标签的常用属性 标签控件的Caption属性表示标签的文字内容 赋值语句格式 Label1 Caption 欢迎光临 Label的AutoSize属性 True False False Label大小不变 太长文本被截断 注意中英文的区别 英文按单词汉字按字换行 True Label调整大小 以适应文本 配合WordWrap属性 False 调整宽 True 调整高 可