第七章用户界面设计.ppt

《第七章用户界面设计.ppt》由会员分享，可在线阅读，更多相关《第七章用户界面设计.ppt（30页珍藏版）》请在三一文库上搜索。

1、第七章 用户界面设计,7.1 用户界面概述 7.2 菜单设计 7.3 对话框设计 7.4 工具栏 7.5 综合应用 7.6 自主学习鼠标和键盘,本章目录,本章目录,7.1 用户界面概述,例7.1 记事本程序,菜单：下拉式菜单、弹出式菜单（快捷菜单） 对话框：通用对话框、自定义对话框 工具栏,本章目录,7.1 用户界面概述,界面设计预定义类,System.Windows.Forms命名空间,7.2 菜单设计,MenuStrip：下拉式菜单 ContextMenuStrip：弹出式菜单,本章目录,重要属性： (1)Text 热键 &热键字符 输入：新建(&N) 显示：新建(N) N为热键 分隔符

2、输入：- (2) ShortCut 设置快捷键。 (3) Checked 控制菜单项左边是否显示“” 重要事件： 菜单项的事件Click 为菜单项编写程序,本章目录,例7.2 设计例7.1的程序,本章目录,下拉式菜单的建立过程： 在窗体上放置一个MainMenu控件 设计菜单 设置菜单项的属性 编写菜单项的事件过程,本章目录,弹出式菜单的建立过程： 在窗体上放置一个ContextMenuStrip控件 设计菜单 设置菜单项的属性 建立弹出式菜单与文件框之间的关联 编写菜单项的事件过程 一般与下拉式菜单中的菜单项共享事件过程 修改“新建”菜单项的事件过程（假定弹出式菜单中“新建”菜单项名称为Po

3、pFileNew） Sub FileNew_Click( ) Handles FileNew.Click, PopFileNew.Click TextBox1.Text = “ TextBox1.Focus() End Sub,7.3 对话框设计, 通用对话框 自定义对话框,不能真正实现文件打开、文件存储、设置颜色、字体设置、打印等操作。 如果想要实现这些功能则需要编程实现。 打开对话框的方法： ShowDialog 例如： OpenFileDialog1.ShowDialog 返回值： Windows.Forms.DialogResult.OK Windows.Forms.DialogRes

4、ult.Cancel,本章目录,1. 打开文件对话框,控件：OpenFileDialog 重要属性 : (1) FileName包含路径，Title不包含路径 (2) Filter 确定所显示文件的类型 例如：Text Files|*.txt|所有文件|*.* 显示文本文件和所有文件 (3) FilterIndex 决定文件列表框中显示第几组类型的文件 (4) InitialDirectory 初始化路径,本章目录,例7.4 编写一个应用程序，弹出打开文件对话框， 从中选择一个BMP位图文件，能在图形框中显 示该图片 Sub Button1_Click( ) Handles Button1.C

5、lick OpenFileDialog1.FileName = “*.Bmp“ OpenFileDialog1.InitialDirectory = “C:Windows“ OpenFileDialog1.Filter = “Pictures(*.Bmp)|*.Bmp|All Files(*.*)|*.*“ OpenFileDialog1.FilterIndex = 1 显示“打开文件”对话框，并判断是否选择了文件。 If (OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK) Then 利用Image.FromFile函数

6、把图片放入图形框中。 PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName) Else MsgBox(“没有选择文件！“) End If End Sub,本章目录,可以在属性窗口中设置,例7.5 为例7.1中的“打开”菜单项编写事件过程. Sub FileOpen_Click( ) Handles FileOpen.Click, Pop FileOpen Dim InputData As String OpenFileDialog1.FileName = “*.txt“ OpenFileDialog1.InitialDirect

7、ory = “c:“ OpenFileDialog1.Filter = “Text Files(*.Txt)|*.Txt|All iles(*.*)|*.*“ OpenFileDialog1.FilterIndex = 2 OpenFileDialog1.ShowDialog() 显示“打开文件”对话框 FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input) TextBox1.Text = “ Do While Not EOF(1) InputData = LineInput(1) 读一行数据 TextBox1.Text = TextBox1

8、.Text + InputData + vbCrLf Loop FileClose(1) 关闭文件 End Sub,本章目录,可以在属性窗口中设置,2. 保存文件对话框,控件：SaveFileDialog 属性与OpenFileDialog控件基本相同， 特有属性是DefaultExt 用于设置缺省的扩展名 例7.6 为例7.1中的“另存为”菜单项编写事件过程。 有关文件的读写操作请参阅第八章。 Sub FileSaveAs_Click( ) Handles FileSaveAs.Click, PopFileSaveAs SaveFileDialog1.FileName = “Default.

9、Txt“ 设置缺省文件名 SaveFileDialog1.DefaultExt = “Txt“ 设置缺省扩展名 SaveFileDialog1.ShowDialog() 打开另存为对话框 FileOpen(1, SaveFileDialog1.FileName, OpenMode.Output) Print(1, TextBox1.Text) 将文本框中的内容写入文件 FileClose(1) 关闭文件 End Sub,本章目录,3. 颜色对话框,控件：ColorDialog 重要属性：Color 用户选定的颜色，属于Color结构类型 例7.7 为例7.1中的“颜色”菜单项编写事件过程。 S

10、ub FormatColor_Click() Handles FormatColor.Click, PopFormatColor.Click ColorDialog1.ShowDialog() 打开颜色对话框 TextBox1.ForeColor = ColorDialog1.Color End Sub,设置文件框前景颜色,本章目录,4. 字体对话框,控件：FontDialog,例7.8 为例7.1中的“字体”菜单项编写事件过程。 Sub FormatFont_Click() Handles FormatFont.Click, PopFormatFont.Click FontDialog1.S

11、howDialog() 打开字体对话框 TextBox1.Font = FontDialog1.Font 设置字体 End Sub,Font获取选择的字体 Color 选定的颜色,ShowColor控制是否有“颜色”选项,本章目录,5. 自定义对话框,具有特殊属性的窗体 添加Windows窗体，设置属性 使用VB.NET提供的模板，如对话框、“关于”框等 本节使用第一种方法 创建自定义对话框 (1) 添加窗体 项目添加Windows窗体 注意：一个项目中不能有相同名称的窗体 (2)设置属性,本章目录,(3)设置启动窗体 系统默认Form1为启动窗体。 项目属性命令设置启动窗体 (4)窗体的实例

12、化和显示 只有启动窗体实例化是由VB.NET自动完成 其他窗体都是通过代码实例化并显示的 例如，显示窗体Form2： Dim frm2 As New Form2 定义frm2为类Form2的对象变量，并创建一个实例赋予frm frm2.Show() 也可以用命令frm2.ShowDialog()显示窗体 而不能用下列语句显示Form2： Form2. Show() 或Form2. ShowDialog() 原因：Form2是一个类名，不是窗体名称,本章目录,重要方法 (1)Show 以非模式方法显示窗体 窗体对象.Show() 非模式 程序可继续执行 (2)ShowDialog 以模式方法显示

13、窗体 窗体对象.ShowDialog() 模式 在关闭该窗体后才能对其它窗体进行操作 (3)Hide 将窗体暂时隐藏(还在内存中) 窗体对象.Hide (4) Close 关闭窗体，释放内存 窗体对象.Close 注意：Me 关键字Me代表代码所在的窗体 Me.Close 关闭自己,本章目录,与对话框的数据传递 在模块中定义公共变量，作为交换数据的场所。 例如：创建Module1，然后在其中如下的变量： Public x As String 例7.9 为例7.1设计一个如图1.7.9所示的对话框， 并且为“帮助关于”编写事件过程 Sub AboutDialog_Click( ) Handles

14、 AboutDialog.Click Dim Dialog As New Form2 Dialog.ShowDialog() End Sub,本章目录,7.4 工具栏,控件：ToolStrip ToolStrip控件是一个容器， 可以放置ToolStripBotton、ToolStripLabel等对象,本章目录,例7.10 为例7.1配置一个工具栏 (1) 建立ToolStrip控件 (2) 创建图标按钮 选择Button (3) 设置属性 Image属性值是图标按钮中显示的图像 (4) 编写事件过程 一般与菜单项共享事件过程,本章目录, “新建”菜单项和“新建”图标按钮的事件过程 Sub

15、FileNew_Click( ) Handles FileNew.Click, PopFileNew.Click, ToolStripButton1.Click TextBox1.Text = “ TextBox1.Focus() End Sub 注意： 可以在项目编辑器中设置属性 在工具栏的属性窗口选择编辑器 ToolStrip控件上还可以放置ToolStripLabel等对象。 ToolStripBotton还有一个主要属性是ToolTopText,7.5 综合应用,例7.11 如图所示程序：“统计”和“结束”没有子菜单，当选择“统计后，统计结果显示在左图的对话框中。,本章目录,综合应用,

16、例7.12 多重窗体应用示例,本章目录,7.6 自主学习鼠标和键盘,7.6.1 鼠标 鼠标事件 需要注意事件发生在哪一个对象上 Click、DoubleClick事件 MouseDown 按下任意一个鼠标按钮时被触发 MouseUp 释放任意一个鼠标按钮时被触发 MouseMove 移动鼠标时被触发,本章目录,鼠标,鼠标事件过程中的参数e决定鼠标的当前状态。 e.X、e.Y表示当前鼠标的位置； e.Button指示按下或释放了哪个鼠标按钮，,本章目录,鼠标,例7.14 显示鼠标器指针所指的位置。 例7.15 设计一个最简单的画图程序。程序运行时，按住鼠标右键移动画圆，按住鼠标左键移动画线。,本

17、章目录,7.5.2 键盘,1. KeyPress事件 输入ACSII字符时发生， 参数e包含了与KeyPress事件相关的数据。 e.KeyChar 输入的字符的ASCII码值。 例如，键盘输入小写A，e.KeyChar的值为“a”。 e.Handled 表示本次按键是否被处理过 True:已经被处理过，不再处理，即怱略本次按键 False:传送给Windows进行常规处理。 利用这个特性可以在某些控件中过滤掉不允许的字符。,本章目录,键盘,2. KeyDown事件和KeyUp事件 当焦点在某个对象时，用户按下键盘上的任一键，便会引发该对象KeyDown事件，释放按键便触发KeyUp事件。 参

18、数e包含了所按键信息(及Shift、Ctrl、Alt键的状态)。 e.KeyCode的值为操作的物理键。 例7.21编写一个程序，按下Alt+F5组合键可终止程序的运行,本章目录,本章小节,常用控件 单选按钮、复选框、框架、列表框、组合框、滚动条、进度条、定时器、超链接 通用对话框 菜单 下拉式菜单 MainMenu 弹出式菜单 ContextMext 两个窗体之间访问 通过窗体对象实例.控件 或模块级公共变量,思考题,1. 有哪几种方法可以在列表框添加选项？ 2如果要一个定时器每半分钟产生一个Tick控件，则InterVal属性应设置为多少？ 3在VB.NET中，使用什么方法访问网页？ 4代码中如何判断用户在通用对话框中选择了“取消”按钮？ 5创建弹出菜单需要什么控件？通过什么属性才能将控件与弹出菜单建立关联？ 6什么是模式对话框？什么是非模式对话框？ 7简述窗体之间数据互访如何才能实现？,本章目录,