Ch7-菜单、工具栏及公共对话框.ppt

Visual Basic 程序设计第7章 菜单、工具栏和公共对话框 主要内容 公共对话框 菜单制作 下拉式菜单 弹出式菜单－快捷菜单 代码设计 工具栏制作 加入部件（工具栏，图像列表等） 组成：图像加入到工具栏 代码设计 公共对话框 不是标准控件。而是可插入部件： Microsoft Common Dialog Control 6.0 和标准控件一样，有属性、方法 多功能（由Action属性决定）： 打开公共对话框的方法 ShowOpen 显示打开文件对话框 ShowSave 显示另存为对话框 ShowColor 显示颜色对话框 ShowFont 显示字体对话框 ShowPrinter 显示打印对话框 ShowHelp 显示帮助对话框 公共对话框的属性页 分页设置不同对话框的有关属性 “打开/另存为”对话框的主要属性 FileName 用户所选文件路径 Filter 过滤器－限制文件选择范围 格式： “描述|通配符;…” 例： “所有文件|*.*|图片文件|*.bmp;*.jpg” FilterIndex 用户选择的过滤项索引号 “打开”对话框 “字体”对话框的主要属性 FontName 字体 （String） FontSize 大小 （Single） FontBold 粗体 （Boolean） FontItalic 斜体 （Boolean） FontUnderline 下划线 （Boolean） Flags 标志 （Long） Flags（标志）属性 对不同对话框有不同含义。特别要注意： 在字体对话框中，bit 0 — 屏幕字体； bit 1—打印机字体； bit 8 — 效果框架。 实例7.1和 With语句 Private Sub Command1_Click ( ) ‘设置Flags属性 CommonDialog1.Flags = cdlCFBoth + cdlCFEffects ‘打开字体对话框 CommonDialog1.ShowFont ‘对文本框的相应属性赋值，用With语句 With CommonDialog1 Text1.FontName = .FontName Text1.FontSize = .FontSize Text1.FontBold = .FontBold Text1.FontItalic = .FontItalic Text1.FontUnderline = .FontUnderline Text1.FontStrikethru = .FontStrikethru Text1.ForeColor = .Color End With End Sub “颜色”对话框的主要属性 Color 用户所选的颜色值 Flags 标志，如果flags属性为0，则打开颜色对话框时只显示左半边，如果flags属性为3，显示全部。 菜单和工具栏的应用实例 菜单编辑器窗体 菜单编辑器 功能：适用于下拉式菜单和快捷菜单 菜单的树形结构（最多6层） 菜单项的增减、插入、移动 菜单项的属性设置 菜单项数组 窗体工作区缩小（ScaleHeight 或ScaleWidth相应缩小） 菜单项的属性 把菜单项看作一种类似命令按钮的控件 主要属性 名称(Name)：必须输入，不能重名，除非是数组元素（Index属性非空） 标题（Caption） Index 索引（下标）属性，一般不填 Visible（可见），Enabled（可用） 对应的快捷键－主项与子项的设置方法不同 特殊菜单项：菜单中的分隔条，标题为“-” 增强型文本框 RichTextBox 用于Windows附件中的“写字板” 程序，比一般文本框好用，主要优点： 可仅对选定的文本设置字体、颜色等属性 可用LoadFile方法读取整个文本文件，用 SaveFile方法保存文本框全部内容。 能处理纯文本文件（.txt等类型）和带格式 文件（.rtf类型）。 RichTextBox的主要属性和方法 SelText 属性— 用户在文本框中所选择的文字段 SelFontName，SelFontSize，SelBold，SelItalic，SelColor等属性 — 用于对所选文字段的字体名称、字体大小、字型和字体颜色等进行设置。 LoadFile方法 — 将文件内容全部读入到文本框中。格式： 对象名.LoadFile 文件名 SaveFile方法 — 将文本框中内容保存到文件中。格式：