第7章课件学生.ppt

第7章 用户界面设计 7.1 常用控件 7.2 通用对话框 7.3 菜单设计 7.4 多重窗体 （自学） 7.5 鼠标和键盘 （自学） 7.6 应用程序向导 （自学） 7.7 综合应用 5.3 列表框和组合框 常用方法 课堂测试 7.1 常用控件 7.1.1 单选按钮、复选框和框架 2.复选框(CheckBox) 3.框架 (Frame) 7.1.2滚动条和进度条 滚动条属性 滚动条事件 7.1.3 图形框和图像框 2. 图像框 Image 例如：在图形框(图像框)中切换图形 7.1.4 定时器 7.2 通用对话框 通用对话框的基本属性和方法 通用对话框的基本属性和方法 7.2.1打开文件对话框 7.2.3 颜色对话框 7.2.4 字体对话框 7.3 菜单设计 7.3.1 菜单编辑器 7.3.1 菜单编辑器 本章小节 思考题 ScrollBar: 【skroul】 ProgressBar Min(-32768~32767) Max(-32768~32767) Horizontal: 水平面的 Upright：垂直的 读音 Enabled【I’neibl】 Interval【’intаvаl】音特沃 List1.ListIndex = 2 ‘选中的信息为序号2 List1.ListCount = 6 ‘共6行信息 List1.Sorted = False ‘按加入先后顺序排列 List1.Text 为 “C/C++程序设计 “ ’当前内容为C/C++程序设计 List1.AddItem x, k ‘x为插入值，k为索引值，即将13插入到K的位置上 List1.RemoveItem List1.ListIndex ‘删除由选定项的序号ListIndex决定的选项，即删除光标选定的项 例7.7 设计一个倒计时应用程序（例 红绿灯） Sub Command1_Click() t = 60 * Val(Text1.Text) Timer1.Enabled = True End Sub Sub Timer1_Timer() Dim m, s As Integer t = t – 1 ‘ 倒计时 m = Int(t / 60) ‘ 计算分钟 s = t Mod 60 ‘ 计算秒 Label1.Caption = m 分 s 秒 If (t = 0) Then Timer1.Enabled = False MsgBox (时间到！) End If End Sub 通用：Dim t As Integer 产生Timer事件条件： Enabled=True　　　 Interval0 例7.8 用一个定时器控制蝴蝶在窗体内的飞舞 Private Sub Timer1_Timer() Static ImaBmp As Integer ‘ ? (参见P4~5例1.1) If ImaBmp=0 Then ImaMain.Picture = ImaOpenWings.Picture Else ImaMain.Picture = ImaCloseWings.Picture End If ImaBmp = Not ImaBmp End Sub 下述程序在蝴蝶飞行时仅在原地飞舞，若 让其始终从左下角往右上角的方向飞，请 去掉程序中的注释符，将？改为正确内容 VB提供了一组基于Windows的标准对话框。利用通用对话框控件可在窗体上创建打开文件、保存文件、颜色、字体、打印等对话框。 本章目录 例7.9 通过打开文件对话框，选择一个BMP位图文件，在图形框中显示该图片。 通用对话框仅用于应用程序与用户之间进行信息交互，是输入输出的界面，不能真正实现文件打开、文件存储、设置颜色、字体设置、打印等操作，如果想要实现这些功能则需要编程实现。 本章目录 (1) Action属性和Show方法 打开对话框 ShowHelp 6 帮助对话框 ShowPrinter 5 打印机对话框 ShowFont 4 字体对话框 ShowColor 3 颜色对话框 ShowSave 2 另存为对话框 ShowOpen 1 打开文件对话框 Show方法 Action属性 通用对话框的类型 该属性只能在程序中赋值，例如： CommonDialog1. Action＝1 CommonDialog1. ShowOpen 本章目录 (2) Dia