VB 第七章 菜单 工具栏 状态和对话框

合集下载

VB基础(第七章)菜单PPT课件

VB基础(第七章)菜单PPT课件
下拉式菜单:单击菜单后,立即会弹出 下拉式菜单具有很多优点:
(1)整体感强,操作一目了然 (2)具有导航功能。 (3)占用屏幕空间小
1)菜单栏(或主菜单行):即是一个菜单标题
窗体分为3个部分: 2)子菜单区:菜单命令或菜单项,会自动折叠 ,具有具体、 独立的功能. 3)工作区:,进行输出和输入操作
第七章 菜单、工具栏和状态栏
第七章 菜单、工具栏和状态栏
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
7.3 弹出式菜单
为了显示弹出式菜单,使用PopupMenu方法,该方法的语法如下:
PopupMenu “菜单名”,flags,x,y,boldcommand
第七章 菜单、工具栏和状态栏
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
7.2.2设定菜单项 1.有效性控制
格式:菜单名.Enabled=False(或True) Private Sub Command1_Click() WX.Enabled = False End Sub
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
主菜单条 子菜单名
菜单项
主菜单名 快捷键
热键
下级子菜 单标记
分隔线
第七章 菜单、工具栏和状态栏
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结

vb 第7章 对话框和菜单

vb 第7章  对话框和菜单

7
7.2.2 “打开文件”对话框 打开文件” 打开文件
设计时建立“打开文件” ⒈ 设计时建立“打开文件”对话框 设计时建立“打开”文件对话框的步骤如下: 设计时建立“打开”文件对话框的步骤如下: 在窗体上添加通用对话框控件。 ⑴ 在窗体上添加通用对话框控件。 打开“属性页”对话框。 ⑵ 打开“属性页”对话框。 ⑶ 选择“打开 另存为”选项卡,设置属性。 选择“打开/另存为 选项卡,设置属性。 另存为” 其中“属性页”中有关属性的含义如下: 其中“属性页”中有关属性的含义如下: 对话框标题( 对话框标题(Dialog Title):字符串类型,缺省值为“打开”。 ) 字符串类型,缺省值为“打开” 文件名称( 字符串类型, 文件名称( FileName) : 字符串类型,程序运行后该属性返 ) 回用户所选择的文件名。 回用户所选择的文件名。 初始化路径( 初始化路径(InitDir):字符串类型,用于设置初始的文件目 ) 字符串类型, 字符串中的字符表示某文件夹名称。 录,字符串中的字符表示某文件夹名称。
它属于VB的 控件, 它属于 的ActiveX控件,在使用前需要将它添加到工具 控件 箱中。将通用对话框图标添加到工具箱的方法如下: 箱中。将通用对话框图标添加到工具箱的方法如下: 单击“工程”菜单的“部件”选项, (1) 单击“工程”菜单的“部件”选项,或者用鼠标右键单击 工具箱,在弹出的菜单中选择“部件” 打开“部件”对话框。 工具箱,在弹出的菜单中选择“部件”,打开“部件”对话框。 (2)在 部件”对话框中,选中“ (2)在“部件”对话框中,选中“Microsoft Common Dialog Control 6.0”。 。 单击“确定”按钮即可将通用对话框控件添加到工具箱中。 (3) 单击“确定”按钮即可将通用对话框控件添加到工具箱中。 把通用对话框控件( 拖放到窗体。 (4) 把通用对话框控件(CommonDialog1)拖放到窗体。

第7章 Visual Basic 通用对话框与菜单

第7章 Visual Basic 通用对话框与菜单

编写代码: 编写代码:
Private Sub cmdFont_Click() FontDialog.Action = 4 wb1.FontName = FontDialog.FontName wb1.FontSize = FontDialog.FontSize wb1.FontBold = FontDialog.FontBold wb1.FontItalic = FontDialog.FontItalic wb1.FontUnderline = FontDialog.FontUnderline End Sub
– 用PopupMenu方法可显示弹出式菜单
格式: [对象.]PopupMenu 菜单控件名称 格式: 对象.
若“对象”缺省,则在当前窗体中显示弹出菜单 对象”缺省,
– 通常,按下鼠标右键时显示弹出菜单,例如: 通常,按下鼠标右键时显示弹出菜单,例如:
Private Sub Form或控件名称 或控件名称_MouseUp (Button As Integer, 或控件名称 Shift As Integer, X As Single, Y As Single) If Button = 2 Then '如果按的是鼠标右键 如果按的是鼠标右键 PopupMenu 菜单名 ‘显示弹出菜单,“菜单名” 显示弹出菜单, 菜单名” 为顶层菜单项的名称,已建立的菜单名称。 为顶层菜单项的名称,已建立的菜单名称。 End If End Sub
菜单的设计与应用-使用菜单编辑器 菜单的设计与应用-
编辑菜单控件
如果菜单 控件的前面 没有内缩符 ”, 号 “ ”,表 明该控件建 立的是主菜 单,否则为 子菜单。 子菜单。
菜单的设计与应用示例
看程序例题:菜单编辑器(编辑—设置) 看程序例题:菜单编辑器(编辑—设置)

VB菜单、工具栏、菜单栏设计

VB菜单、工具栏、菜单栏设计

5.运行时改变状态栏
• 运行时,能重新设置窗格Panel对象以显示不同的 功能,这些功能取决于应用程序的状态和各控制 键的状态。有些状态要通过编程实现,有些系统 已具备。
• (6)Alignment属性 –该属性设置或返回该对象的标题文本对齐方式。 • (7)Bevel属性: –设置或返回该对象的斜面样式,0为没有显示斜面,1 为凹下显示,2为凸起显示。 • (8)AutoSize属性 –调整状态栏的大小后,该属性返回或设置确定Panel对 象的宽度值。 • (9)Count属性 –该属性返回Panels集合中Panels对象的数目。
菜单以分组的形式组织多个命令或操作,为 用户提供了操作应用程序的便捷手段。
工具栏以按钮的形式显示应用程序中最常用 的命令和操作。
状态栏用于显示应用程序的当前状态、键盘 状态以及当前日期和时间等。
6-1
菜单简介
菜单标题 菜单栏 分隔条 菜单选项 快捷键 访问键 子菜单标题 子菜单选项
6-2
设置StatusBar控件。在StatusBar控件上右击鼠标,调出其 属性页。在其中插入两个窗格,第一个窗格的文本设置为“提 示”,第二个窗格自动调整大小属性设置为为1,其他设置不 变。
1.状态栏控件的常用属性
• (1)Align属性 –该属性决定状态栏控件在窗体中的显示位置和大小。 其值为1~4,分别表示在窗体的顶部,底部,左边和 右边,且随窗体自动调整。 • (2)Style属性 –该属性设置或返回状态栏控件的样式。默认值0表示 Normal样式,正常显示所有Panel对象;值为1时表示 Simple样式,仅显示一个大窗格。 • (3)Height和Width属性 –该属性决定控件的高度和宽度。 • (4)Top属性 –该属性决定控件顶端距窗体顶端的距离。

VB--ch7通用对话框解析

VB--ch7通用对话框解析

Text1.BackColor = CommonDialog1.Color
End Sub
例7.4 利用颜色对话框给shape着色
界面设计,如图所示。 在窗体上添加一个框架:在框架上画出6个单选 钮(控件数组)用来选择不同的形状; 形状控件、通用对话框控件、命令按钮各一个。 知识点:
这里采用了一组 控件数组来设计 单选钮,充分体 现使用控件数组 的优点
CommonDialog1.Action = 4
Text1.FontName =CommonDialog1.FontName Text1 1.FontBold=CommonDialog1.FontBold
End Sub
例7.5
“字体”对话框示例。
编程:在文本框上显示文字,利用“字体”对 话框来设置所显示文字的字体、字型、大小、 颜色等。 知识点: 设置字体一定需要添加语句: CommonDialog1.Flags=1+256 (屏幕字体加下划线、删除线、颜色组合框)
• 例: • Private Sub Form_click() • CommonDialog1.Filter = "所有文件 (*.*)|*.*|WORD文档(*.doc)|*.doc|位图文件 (*.bmp)|*.bmp|" • CommonDialog1.Action = 1 • Picture1.Picture = LoadPicture(CommonDialog1.FileName) • End Sub
把对话框部件添加到工具箱步骤: “工程” “部件” 选中: Microsoft Common Dialog Control 6.0 对话框的类型由对话框控件的Action属性决定。 与Timer 控件一样,CommonDialog 控件

vb文件菜单通用对话框

vb文件菜单通用对话框
只显示文本文件:File1.Pattern= “*.txt“ 显示文本文件和Word文档,可用分号隔开多个通 配符:File1.Pattern= “*.txt; *.Doc” 注:当Patters属性改变后,会触发文件列表框的 pattenChange事件。
计算机软件技术基础 Visual Basic 程序设计
③事件: ★PathChange事件:路径被FileName或Path
属性改变时发生。 ★PatternChange事件:列表样式被FileName
或Path属性改变时发生。
计算机软件技术基础 Visual Basic 程序设计
4.文件系统控件的同步操作 (控件的联动)
Sub Drive1_Change() Dir1.Path = Drive1.Drive
要从现存文件中读入数据,应以顺序Input 方式打开该文件,然后使用:
Input # 语句 Line Input # 语句 Input 函数 将文件内容读入到程序变量中。
使驱动器列表框和目录列表框同步的程序代码: Private Sub Drive1_Change() Dir1.Path=Drive1.Drive End Sub
使目录列表框和文件列表框同步的程序代码: Private Sub Dir1_Change() File1.Path=Dir1.Path End Sub 这样,每当改变驱动器列表框的Drive属性时,将 产生Change事件,目录列表框中的目录变为该驱 动器的目录,进一步引发文件列表框目录的变化。
例2
计算机软件技术基础 Visual Basic 程序设计
3.文件列表框(FileListBox)
① 功能:显示当前文件夹下的所有文件列表。 ② 属性:

vb 菜单与对话框 课件

vb 菜单与对话框 课件

菜单与对话框
7.1 下拉式菜单设计
下拉式菜单是用户在任 何时候都可以在顶端菜单 条上选择后拉出的菜单。 条上选择后拉出的菜单。
菜单与对话框
7.1 下拉式菜单设计
主菜单条
菜 单 项
主菜单名 快捷键 键 菜单
菜单名
菜单与对话框
7.1下拉式菜单设计 下拉式菜单设计
打开“菜单编辑器” 打开“菜单编辑器”:
FilterIndex DialogTitle DefaultExt
菜单与对话框
“公用对话框”的方法 公用对话框”
方法 ShowOpen ShowSave ShowColor ShowFont ShowPrinter ShowHelp Action属性 属性 1 2
3
功能 显示文件打开对话框 显示文件存储对话框 显示颜色对话框 显示字体对话框 显示打印对话框 显示Windows帮助对话框 帮助对话框 显示
内部常数 vbPopupMenuLeftButton vbPopupMenuRightButton
行为常数 0(默认 默认) 默认 2
说明 菜单只接受右键单击 菜单接受左、 菜单接受左、右键单击
两个常数可以相加或者以or相连 两个常数可以相加或者以 相连
菜单与对话框
例7-4:在上例中增加弹出式菜单。 :在上例中增加弹出式菜单。
菜单与对话框
7.2 弹出式菜单(快捷菜单) 弹出式菜单(快捷菜单)
语法格式: 语法格式: [窗体名 窗体名.]PopupMenu 菜单名 flags, x, y 菜单名, 窗体名 说明: 说明
省略窗体名,将打开当前窗体的菜单 省略窗体名 将打开当前窗体的菜单; 将打开当前窗体的菜单 菜单名是通过菜单编辑器设计的菜单的名称 Flags参数为一些常量数值的设置 包含位置常数和 参数为一些常量数值的设置,包含位置常数和 参数为一些常量数值的设置 行为常数,表示弹出的位置和触发的键位置。 行为常数,表示弹出的位置和触发的键位置。

VB 第七章 菜单 工具栏 状态和对话框

VB 第七章 菜单 工具栏 状态和对话框

ToolBar与 ImageList的连接
工具栏样式
工具栏例题8.10 工具栏例题8.10
2.为工具栏增加按钮 为工具栏增加按钮
索引(Index)、关键字(Key)每个按钮 的编号、标识, ButtonClick事件中引用;
样式(Style),共6种
图象(Image) ImageList对象中的 图象,值可以是Key或Index
弹出菜单(快捷菜单) 三、 弹出菜单(快捷菜单)
弹出菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。显示 位置取决于单击鼠标键时指针的位置。设计与普通菜单相同(如果 不希望菜单出现在窗口的顶部,该菜单名Visible属性设置为False )。 菜单弹出的方法:
[对象 对象.]PopupMenu 菜单名 标志 x, y 菜单名, 标志, 对象
例8.1 用命令按钮的Click事件显示文件打开对话框 CommonDialog1.InitDir=“C:\Windows” ' 设置初始目录 CommonDialog1.Filter = "文本文件 | *.Txt" ' 过滤文件类型 CommonDialog1.CancelError = True ' 控制取消按钮 CommonDialog1. ShowOpen ‘ 打开对话框 Label1.Caption = CommonDialog1.FileName 另存为” 2. “另存为”对话框 没有提供真正的存储文件操作,仍需要编程完成储存操作。 属性 DefaultExt:缺省扩展名 颜色” 3. “颜色”对话框 属性 Color:返回或设置选定的颜色。 例8.2 “颜色”对话框的使用
字体” 4. “字体”对话框
FontName FontBold、FontItalic FontSize
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

四、状态栏
状态栏显示系统信息和对用户的提示,如:系统日期、软件版本、光 标的当前位置、键盘的状态等。一般在窗口的底部。 1.建立状态栏 .
显示的文本
样式
可插入图象
状态栏例题8.10 状态栏例题8.10
8.5 RichTextBox控件 控件
RichTextBox控件可以输入和编辑文本,还可以实现多种文字格式、段落 等的设置,还可以插入图形的功能,可真正构成一个象Word一样的字处 理软件。 选择“Microsoft Rich TextBox Controls 6.0”将控件添加到工具箱。 1.文件操作方法 (1)LoadFile方法 LoadFile方法能够将RTF文件或文本文件装入控件,其形式如下: 对象.LoadFile 文件标识符[,文件类型] 文件类型: 0或rtfRTF为RTF文件(缺省);1或rtfTEXT为文本文件 例如: RichTextBox1.LoadFile CommonDialog1.FileName, 1 or: RichTextBox1.LoadFile “c:\windows\readme.txt”, 1
8.2 菜单的设计
下拉式菜单系统的组成结构 :
主菜单条 菜 单 项
主菜单名 快捷键 键
菜单名
下 单

一、菜单编辑器的使用
工具/菜单编辑器(CTRL+E) 窗体上快显菜单/菜单编辑器
常用属性:
1. 标题(Caption) 热键:前面加& 菜单项属性 操作按钮 菜单列 表框 2. 名称(Name)文本框 分隔符也应有名称。 分隔符也应有名称
例8.1 用命令按钮的Click事件显示文件打开对话框 CommonDialog1.InitDir=“C:\Windows” ' 设置初始目录 CommonDialog1.Filter = "文本文件 | *.Txt" ' 过滤文件类型 CommonDialog1.CancelError = True ' 控制取消按钮 CommonDialog1. ShowOpen ‘ 打开对话框 Label1.Caption = CommonDialog1.FileName 另存为” 2. “另存为”对话框 没有提供真正的存储文件操作,仍需要编程完成储存操作。 属性 DefaultExt:缺省扩展名 颜色” 3. “颜色”对话框 属性 Color:返回或设置选定的颜色。 例8.2 “颜色”对话框的使用
例8.7 弹出菜单
8.3 多重窗体和多文档窗体
一、多重窗体 1.添加窗体 1.添加窗体
“工程|添加窗体” 现存
新建
添加“现存”窗体时要注意: 添加“现存”窗体时要注意: 防止多个窗体的Name相同而不能添加; 添加的窗体实际是将其它工程中已有的窗体加入,多个工程共 享窗体; 通过“另存为”命令以不同的窗体文件名保存,断开共享。
通用对话框的类型 打开(Open) 另存为(Save As) 颜色(Color) 字体(Font) 打印机(Printer) 和帮助(Help)
通用对话框应用实例
选定Microsoft CommDialog Control 6.0
Action 1 2 3 4 5 6 方法 ShowOpen ShowSave ShowColor ShowFont ShowPrinter ShowHelp
ToolBar与 ImageList的连接
工具栏样式
工具栏例题8.10 工具栏例题8.10
2.为工具栏增加按钮 为工具栏增加按钮
索引(Index)、关键字(Key)每个按钮 的编号、标识, ButtonClick事件中引用;
样式(Style),共6种
图象(Image) ImageList对象中的 图象,值可以是Key或Index
例8.8 输入和计算学习成绩。
模块: 模块: Public MATH As Single Public PHYSICS As Single Public CHEMISTRY As Single Public CHINESE As Single Public ENGLISH As Single
多文档界面(MDI) 二、 多文档界面
确定
属性
Action:打开通用对话框。 DialogTiltle:对通用话框标题。 CancelError True:选择“取消”按钮,出现错误警告; Err.Number置为32755(cdCancel)。 False(缺省):选择“取消”按钮,没有错误警告。
1.文件对话框(打开、保存)需设置的属性 1.文件对话框(打开、保存) 文件对话框
产生一个固定宽度的间隙 再按一下才能起来 为其它控件留 下任意宽地方 除菜单按钮(5)外的5种样式 按前后外观无变化
Style=0 Style=3 Style=4 Style=1 Style=2
一组里只能有 一个被选中
响应ToolBar控件事件 三、 响应 控件事件
ToolBar控件常用的事件有两个:ButtonClick和ButtonMenuClick。前者对 按钮样式为0-2,后者对样式为5的菜单按钮。 (1)用索引Index确定按钮 (2)用关键字Key确定按钮
弹出菜单(快捷菜单) 三、 弹出菜单(快捷菜单)
弹出菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。显示 位置取决于单击鼠标键时指针的位置。设计与普通菜单相同(如果 不希望菜单出现在窗口的顶部,该菜单名Visible属性设置为False )。 菜单弹出的方法:
[对象 对象.]PopupMenu 菜单名 标志 x, y 菜单名, 标志, 对象
3. 快捷键(Shortcut) 菜单名没有快捷键 4. 复选(Checked)检查框 TRUE 有 5. 有效(Enabled)检查框 6. 可见(Visible)检查框
例 8.6 建立一个有菜单功能的文本编辑器。要求有三级菜 单、热键、快捷键、并能够进行对齐格式的变化
二、 菜单项增减
在程序运行时,菜单随时增减,如“文件”菜单能保留最近打开 的文件数。这同控件数组一样,使用菜单数组。 步骤: 1.在菜单设计时,加入一个菜单项,其Index为0(菜单数组), Visual为False。 2. 2.在程序运行时,通过Load方法向菜单数组增加新的菜单项。 Load 动态添加菜单项例题8.7.1 动态添加菜单项例题 同样,要删除所建立的菜单项,使用UnLoad方法向菜单数组减少 菜单项。
例8.3
字体对话框的使用
打印” 5. “打印”对话框 属性 FromPage:起始页号 ToPage:终止页号 Copies:打印份数
如果打印驱动程序不支持多份打印,该属性有可能始终返回 1。
例8.4 打印对话框的使用 帮助” 6. “帮助”对话框 帮助文件需要用其它的工具制作,如Microsoft Windows Help Compiler。 属性 例8.5 HelpCommand:在线Help帮助类型 演示:Help帮助类型 .avi 帮助类型 HelpFile:Help文件的路径及其名称 HelpKey:在帮助窗口显示由该帮助关键字指定的帮助信息。
Private Sub Toolbar1_ButtonClick(Byval Button As ComctlLib.Button) Select Case Button.Key Select Case Button.Index Case 1 Case "TNew" FileNewProc FileNewProc Case 2 Case "TOpen" FileOpenProc FileOpenProc …… ..... End Select End Sub 注意:第1个按钮的Index值为1。用Index还是用Key比较,Key 可读 , 性好,可维护性好。
字体” 4. “字体”对话框
FontName FontBold、FontItalic FontSize
Min、Max
FontStrikethru FontUnderline Color
注意: 注意:Flags属性:指示所显示的字体类型,必须设置。
cdlCFScreenFonts cdlCFPrinterFonts cdlCFBoth cdlCFEffects &H1 &H2 &H3 &H100 屏幕字体 打印机字体 打印机字体和屏幕字体。 显示删除线和下划线检查框以及颜色组合框
什么是多文档界面? 什么是多文档界面? 图标有何特点? 图标有何特v6b8-1)
利用向导创建MDI窗体及其子窗体的方法 利用向导创建MDI窗体及其子窗体的方法 MDI
文件/新建工程 文件 新建工程/VB应用程序向导 新建工程 应用程序向导 对于MDI窗体及其子窗体可以进一步进行自定义 窗体及其子窗体可以进一步进行自定义 对于
2.
保存窗体
一个工程中有多个窗体,应分别取不同文件名保存在磁盘上, VBP工程文件中记录了该工程的所有窗体文件名。
3. 设置启动窗体
属性” “工程/属性” 工程 属性 “启动对象” 启动对象”
设置启动对象
4. 窗体语句 (1)Load语句:装入窗体到内存但没有显示窗体 形式: Load 窗体名称 (2)Unload语句:从内存删除窗体 形式: Unload 窗体名称
标志,表示弹出的位置和触发的键(见教材P193 表1.8.4)
Sub picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu EditMenu, vbPopupMenuCenterAlign End Sub
一、在ImageList控件中添加图象 控件中添加图象
ImageList控件不单独使用,专门为其它控件提供图像库.
相关文档
最新文档