可视化程序设计 VBNET 第7章.pptVIP

* * * * * * * * * * * * * * * * * * * * * * 第七章 用户界面设计 7.1 用户界面概述 7.2 菜单设计 7.3 对话框设计 7.4 工具栏 7.5 综合应用 * 7.1 用户界面概述 例7.1 记事本程序 菜单：下拉式菜单、弹出式菜单（快捷菜单） 对话框：通用对话框、自定义对话框 工具栏 7.1 用户界面概述 界面设计预定义类 界面元素 控件 控件 菜单 MenuStrip ContextMenuStrip 下拉式菜单 弹出式菜单 通用对话框 OpenFileDialog SaveFileDialog FontDialog ColorDialog 打开文件对话框 保存文件对话框 字体对话框 颜色对话框 工具栏 ToolStrip 工具栏 * 7.2 菜单设计 MenuStrip：下拉式菜单 ContextMenuStrip：弹出式菜单 * 菜单项重要属性： (1) Text :标题文本 热键字符 输入：文件(F) F为热键（按alt+F激活） 重要事件： 菜单项的事件Click (2) ShortCutKeys :设置快捷键 分隔符 输入：- * 例7.2 设计例7.1的程序 下拉式菜单的建立过程： 在窗体上放置一个MenuStrip控件 设计菜单 设置菜单项的属性 编写菜单项的事件过程 * 编写菜单项的事件过程 “新建”菜单项 Textbox1.text=“” Textbox1.focus “退出”菜单项 End 剪切 s = TextBox1.SelectedText TextBox1.SelectedText = 粘贴、复制 * 弹出式菜单的建立过程： 在窗体上放置一个ContextMenuStrip控件 设计菜单、菜单项 建立文本框与弹出式菜单之间的关联 （设置文本框的属性ContextMenuStrip） 编写菜单项的事件过程 一般与下拉式菜单中的菜单项共享事件过程 先给菜单项改名 * 7.3 对话框设计 ■ 通用对话框 ■ 自定义对话框 不能真正实现文件打开、文件存储、设置颜色、字体设置等操作。 如果想要实现这些功能则需要编程实现。 * 7.3 对话框设计 ■ 通用对话框 ■ 自定义对话框 打开对话框的方法： ShowDialog 例如： ColorDialog1.ShowDialog * 3. 颜色对话框 ColorDialog 重要属性： Color：用户选定的颜色 ‘ 打开颜色对话框 ColorDialog1.ShowDialog() TextBox1.ForeColor = ColorDialog1.Color 例7.7 为例7.1 “颜色”菜单项编写事件过程。 4. 字体对话框 FontDialog 例7.8 为例7.1中的“字体”菜单项编写事件过程。 FontDialog1.ShowDialog() TextBox1.Font = FontDialog1.Font TextBox1.ForeColor = FontDialog1.Color 主要属性 Font获取选择的字体 Color 选定的颜色 ShowColor属性控制是否有“颜色”选项 * 1. 打开文件对话框OpenFileDialog 重要属性 : FileName：文件名 Title：文件对话框的标题 (3) Filter ：确定所显示文件的类型 例 文本文件|*.txt|所有文件|*.* 显示文本文件和所有文件 (3) FilterIndex 决定文件列表框中显示第几组类型的文件 (4) InitialDirectory 初始化路径 例7.4 编写一个应用程序，弹出打开文件对话框， 从中选择一个BMP位图文件，能在图形框中显示该图片 可以在属性窗口中设置 例7.5 为例7.1中的“打开”菜单项编写事件过程. 以读方式打开文件 → 读文件 → 关闭文件 OpenFileDialog1.FileName = *.txt OpenFileDialog1.Filter = 文本文件|*.txt|所有文件|*.* OpenFileDialog1.ShowDialog() FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input) Do While Not EOF(1) TextBox1.Text = LineInput(1) vbCrLf Loop