精华内容
下载资源
问答
  • 3.在VB中可以建立 菜单和 菜单...为了把通用对话框控件加到工具箱中应在工程菜单中选择部件命令弹出部件对话框在部件对话框的控件选项卡中选择 2.建立打开文件保存文件颜色字体和打印对话框所使用的方法分别为 Showopen
  • VB6.0 多种使用通用对话框的方法演示含源代码,为对话框增加常见的“打开”、“另存为”、“字体”、“打颖、“帮助”。演示了当“颜色”、“字体”等对话框按钮被按下时,程序如何执行,将TextBox的字体属性根据...
  • 8.8通用对话框控件  Windows应用程序里的Open对话框,Save As对话框在各个应用程序里看起来都是一样的,通用对话框控件就可以提供这些对话框的标准功能。  1.Open对话框及Save As对话框  打开Open对话框...

    8.8通用对话框控件

      Windows应用程序里的Open对话框,Save As对话框在各个应用程序里看起来都是一样的,通用对话框控件就可以提供这些对话框的标准功能。

      1.Open对话框及Save As对话框

      打开Open对话框使用ShowOpen方法,打开Save As对话框使用ShowSave方法。

      Private Sub mnuOpen_Click ()

      On Error GoTo ErrorHandler

      CommonDialog1.CancelError = True

      CommonDialog1.Filter = "Text Files (*.txt)|*.txt|Batch Files (*.bat)|*.bat|All Files (*.*)|*.*"

      CommonDialog1.ShowOpen ' 显示打开对话框

      Call OpenFile(CommonDialog1.FileName)

      ErrorHandler:

      Exit Sub 

      End Sub

      其中第三行决定了在文件格式类型栏里出现的文件类型。第五行需要一个自己的打开文件的过程,这个过程需要的参数就是通用对话框返回的文件名。通用对话框的CancelError属性设为True的话,用户单击Cancel按钮将产生一个错误信息程序,凭借这个信息程序可以检测到用户的放弃操作。

      2.Color对话框

      下面的过程可用用户选择的颜色作为窗体的底色。

      Private Sub mnuColor_Click ()

      On Error GoTo CancelButton

      CommonDialog1.CancelError = True

      CommonDialog1.ShowColor

      Form1.BackColor = CommonDialog1.Color

      CancelButton:

      Exit Sub

      End Sub

     3.Fonts对话框

      下面的过程可用字体对话框改变文本框的字体:

      Private Sub mnuFonts_Click ()

      On Error GoTo CancelButton

      CommonDialog1.CancelError = True

      CommonDialog1.Flags = cdlCFBoth ' Flags property must be set to cdlCFBoth

      CommonDialog1.ShowFont ' Display Font common dialog box.

      Text1.FontName = CommonDialog1.FontName

      Text1.FontSize = CommonDialog1.FontSize

      Text1.FontBold = CommonDialog1.FontBold

      Text1.FontItalic = CommonDialog1.FontItalic

      Text1.FontUnderline = CommonDialog1.FontUnderline

      Text1.FontStrikethru = CommonDialog1.FontStrikethru

      Text1.ForeColor = CommonDialog1.Color

      CancelButton:

      Exit Sub

      End Sub

      代码的第三行出现了通用对话框的Flags属性决定了通用对话框的一些可选项,不过即使不赋值给Flags,代码也一样会按缺省的情况去执行的。

    展开全文
  • filterindex是“打开”或“另存为”对话框(CommonDialog控件)中的一个缺省的过滤器,来打开或者保存文件的文件扩展名 要使用这个属性值,就必须先给filter属性赋值,比如 CommonDialog1.filter=“word文档|.doc|...

    filterindex是“打开”或“另存为”对话框(CommonDialog控件)中的一个缺省的过滤器,来打开或者保存文件的文件扩展名
    要使用这个属性值,就必须先给filter属性赋值,比如
    CommonDialog1.filter=“word文档|.doc|excel文档|.xlsl文本文件|.txt|所有文件|."
    (备注,共有4个过滤器,对应0-3)
    如果设置filterindex=0,那么默认打开对话框中显示的文件是所有后缀名为doc的word文档
    如果设置filterindex=1,那么默认打开对话框中显示的文件是所有后缀名为xls的exceld文档
    如果设置filterindex=2,那么默认打开对话框中显示的文件是所有后缀名为txt的文本文档
    如果设置filterindex=3,那么默认打开对话框中显示的文件是所有文件
    CommonDialog的用法:
    CommonDialog1.filter="word文档|
    .doc|excel文档|.xlsl文本文件|.txt|所有文件|.
    CommonDialog1.filterindex=0 ‘备注,可以根据需求设置
    CommonDialog1.action=1 ’action的值不同,意义也不同。1,则表示打开文件,2表示 另存为,具体可去网上收缩搜索
    当选定打开或保存对话框的文件时,该文件名将保存在CommonDialog1.filename中
    比如 fn=CommonDialog1.filename ‘用fn变量来保存打开或另存为的文件名

    展开全文
  • VB备忘录(12) 通用对话框

    千次阅读 2013-04-10 21:35:27
    对话框有: 1、inputbox 2、msgbox 3、通用通话框 通用通话框 部件:microsoft common dialog control 6.0 分为五种: 打开showopen 另存为 showsave 颜色 showcolor 字体 showfont 打印 ...

    对话框有:

    1、inputbox

    2、msgbox

    3、通用通话框



    通用通话框

    部件:microsoft common dialog  control 6.0

    分为五种:

    打开showopen

    另存为 showsave

    颜色   showcolor

    字体   showfont

    打印  showprinter

    帮助  showhelp



    注意: msgbox    popupmenu   showopen它们都有“挂起特征”,即对本过程以下的代码有静止作用,直到响应完毕。

    来一个实验看一下三个不同。

    添加一个计时器,在这三个弹出时的效果看一下,响应时,另一个过程的计时器是否仍然运行:













    可以看到上面三种情况时,对于其它过程,只有PoppupMenu允许其它继续运行,而msgbox和commondialog却使其挂起,静止。




    showopen的属性中:

    filter过滤文件

    filename  当点击相关文件后会返回文件名值(含路径),若点取消则返回空串。



    多选

    用flags标志来进行选择。

    多选文件时,多个文件之间用的是空格进行分隔。这样就遇到一个问题,有些文件名中间也有空格,产生了干扰,怎么办呢?

    还有一个cdlOFNExplore进行组合。这样组合选择后的结果就是,分隔符不是空格,而是空字符。

    空字符: ASC码为0的字符。chr(0)

     下面进行多个字符的选择,专门选择其中一个含有空格的文件名:

    Private Sub Command1_Click()
        Dim s As String, a As Variant, i As Integer
        CommonDialog1.Flags = cdlOFNAllowMultiselect Or cdlOFNExplorer
        CommonDialog1.ShowOpen
        s = CommonDialog1.FileName
        a = Split(s, Chr(0))
        For i = 0 To UBound(a)
            List1.AddItem a(i)
        Next i
    End Sub



    另一个值得注意的是,showfont须设置flags,否则提示“没有安装字体,请从控制面板进行安装”

    有两个可选择:

    cdlCFBoth                    屏幕和打印字体

     cdlCFPrinterFonts     打印字体

    cdlCFScreenFonts     屏幕字体


    即:

    commondialog1.flags=cdlCFprinterFonts  '  也可为cdlCFboth或cdlCFScreenFonts

    commondialog1.showfont


    展开全文
  • 没有OCX的通用对话框 描述 大家好, 该程序的目的是使用Windows通用对话框控件而不使用COMDLG32.OCX文件。 即使文件不存在也可以使用 这仅适用于打开和保存功能。 但是您也可以附加它以获取颜色和其他对话框, 只...
  • Shell "Rundll32.exe url.dll, ..., vbNormalFocus 摘自:网络整理 ...★VB查找替代字符串的函数 ...★VB换行气泡提示类 ...★VB/VBA通用路径选择对话框 ★ASCII码表0-255完整版 附详细注释 ...
    Shell "Rundll32.exe url.dll, FileProtocolHandler http://miaozk2006.blog.163.com", vbNormalFocus


    摘自:网络整理


    相关参考


    VB查找替代字符串的函数

    VB换行气泡提示类

    VB/VBA通用路径选择对话框

    ASCII码表0-255完整版 附详细注释

    VBKeyAscii

    VB取得TextBoxRichTextBox光标所在的行和列(支持汉字)

    VB取得TextBoxRichTextBox光标所在的行和列(支持汉字)

    VB如何实现Undo(撤消)功能

    VB计算文本文件的行数

    VB获取快捷方式原文件路径

    微软 Small Basic 简体中文版 已经发布了

    VB操作Excel 非常详细 [网摘]

    VB如何判断文件正被占用/已被打开

    VB添加listbox 的水平卷动轴

    VB打开资源管理器并指定文件

    VB根据窗体自动调整窗体内控件大小 注:实用,可以直接引用

    VB中的指针技术

    Visual Basic编程常见问题及解答(1

    Visual Basic编程常见问题及解答(2

    Visual Basic编程常见问题及解答(3

    VisualBasic变量、常数和数据类型及过程概述

    VB6的后期绑定和前期绑定

    VB用户控件制作讲解与实例

    VB制作OCX控件的步骤

    VBFSO的调用的两种方法

    VB操作EXCEL

    VB判断文件及目录的存在性

    VB网站(最新、经典源代码、技术文章、基础知识)

    VB得到指定文件夹下的文件列表

    VB产生随机任意大小文件挤满硬盘

    VB文件的读写操作

    VB创建超链接 打开指定网站的几种方法

    VB 源码 删除重复行程序 函数

    VB 计算自己程序段所用时间

    VB 获取路径名各部分 (获取文件路径,获取文件名,获取文件扩展名)自编

    几行VB代码拿下注册表

    VB 在浏览器中打开指定网址

    VB窗口置顶

    vb ListBox 之中点击右键弹出菜单

    展开全文
  • 原文链接:No.22 VB中变量的生命周期和作用域​mp.weixin.qq.com这几天我们讲了通用对话框【字体】【打开】【另存为】的使用,按照惯例接下来应该讲【颜色】和【打印】对话框,但是后台有一位朋友想要了解VB中变量的...
  • (1)在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为”打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:①...
  • (1.)单击“打开文件”按钮弹出一个通用对话框,选择文件后显示在文本框中 (2).单击“保存文件”按钮后弹出通用对话框,确定文件名后保存。 (3)单击“查找下一个”按钮后在文本文件中查找单词“VB”,找到后以...
  • 关键字:VB 预览 前一阵有人在VB专家门诊中提出一个问题,如何在VB中实现打开图像文件的预览,虽然给出了300分的高分,回答... 从MSDN中可以知道调用文件打开通用对话框需调用API 函数GetOpenFileName,原形如下: 
  • vb控件开发 开发ocx

    热门讨论 2011-02-28 16:12:16
    VB与MS-Draw开发通用作图软件 19 , 19.txt VB中APP对象及其应用 20 , 20.txt VB中list控件的功能扩充 21 , 21.txt VB中防止将重复项目添加到列表框控件中 22 , 22.txt VB中用Multimedia MCI控件开发多媒体应用 23 , ...
  • IT文档 7

    2009-03-23 09:12:00
    打开对话框同时选择多个文件“扫雷”游戏的幕后一个利用随机数加密字串的算法一个图片数据的存和取的示例一个很COOL的对话框弹出效果一个新奇和笨拙的VB屏保一个旋转的3D箱子(动画)一个用VBA编写的Melissa病毒一...
  • 反汇编C32asm

    2012-09-29 16:36:53
    0.4.12 1.hex编辑功能增加使用文件映射选项,功能用于...反汇编的编辑菜单,增加使用unicode分析选项,提供对unicode字符的支持,如果对vb程序进行反汇编,用户可以打开此选项看看是否能够得到更多字符串的提示信息.
  • 0.4.12 1.hex编辑功能增加使用文件映射选项,功能用于...反汇编的编辑菜单,增加使用unicode分析选项,提供对unicode字符的支持,如果对vb程序进行反汇编,用户可以打开此选项看看是否能够得到更多字符串的提示信息.
  • 0.4.12 1.hex编辑功能增加使用文件映射选项,功能用于...反汇编的编辑菜单,增加使用unicode分析选项,提供对unicode字符的支持,如果对vb程序进行反汇编,用户可以打开此选项看看是否能够得到更多字符串的提示信息.
  • C32Am编辑器0.4.12

    2010-01-10 13:38:11
    0.4.12 1.hex编辑功能增加使用文件映射选项,功能用于...反汇编的编辑菜单,增加使用unicode分析选项,提供对unicode字符的支持,如果对vb程序进行反汇编,用户可以打开此选项看看是否能够得到更多字符串的提示信息.
  • 郁金香VC++外挂编程全集初级篇1.2.1

    热门讨论 2010-07-05 07:00:59
    3.6.2、打开购物/售物对话框 3.6.3、购物功能 3.6.4、售物功能 3.7、 摆摊.开店 a、开店CALL参数分析 b、写代码测试 4、高级篇 4.1、编写完整的外挂 4.2、游戏更新后的外挂更新 4.3、脚本功能 4.4...
  • 实例266 使用API函数显示颜色对话框 第9章 菜单应用技术 9.1 标准菜单应用 实例267 为菜单添加访问键和快捷键 实例268 给菜单添加分割线 实例269 制作复选菜单 实例270 创建级联菜单 实例271 可收缩展开的...
  • DirectX修复工具 V3.2增强 绿色版

    万次下载 热门讨论 2014-07-01 10:06:43
    游戏将本程序内嵌 即可进行无需人工参与的快速修复 开启简约模式的方法是:打开程序所在目录下的“Settings ini”文件(如果没有可以自己创建) 将其中的“FormStyle”一项的值改为“Simple”并保存即可 ...
  • DIrectX老版本

    2019-01-04 16:21:44
    只要在主界面的“工具”菜单下打开“选项”对话框,找到“扩展”标签,点击其中的“开始扩展”按钮即可。扩展过程需要Internet连接,扩展成功后新的数据包可自动生效。扩展用时根据网络速度不同而不同,最快仅需数秒...
  • DirectX修复工具 V3.0 官方绿色增强版

    万次下载 热门讨论 2013-09-21 12:03:30
    开启简约模式的方法是:打开程序所在目录下的“Settings.ini”文件(如果没有可以自己创建),将其中的“FormStyle”一项的值改为“Simple”并保存即可。 程序有高级筛选功能,开启该功能后用户可以自主选择要修复...
  • 修改BUG:在IDE中打开源代码文件(.e)后,高级选择夹组件不能正确切换到“现行子夹”属性设定的子夹。 9. 修改BUG:矢量动画支持库中的“矢量编辑框”组件在光标位于组件右下角时按右光标键进入下一行会导致显示...
  • DirectX修复工具 V3.0标准版

    千次下载 热门讨论 2013-09-26 20:20:15
    开启简约模式的方法是:打开程序所在目录下的“Settings.ini”文件(如果没有可以自己创建),将其中的“FormStyle”一项的值改为“Simple”并保存即可。 程序有高级筛选功能,开启该功能后用户可以自主选择要修复...
  • vc++ 应用源码包_1

    2012-09-15 14:22:12
    这个例子就是查询任何可执行文件的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
  • vc++ 应用源码包_4

    2012-09-15 14:38:35
    这个例子就是查询任何可执行文件的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
  • vc++ 应用源码包_3

    2012-09-15 14:33:15
    这个例子就是查询任何可执行文件的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
  • DirectX修复工具 V3.3标准 绿色版

    万次下载 热门讨论 2015-05-03 09:43:18
    开启简约模式的方法是:打开程序所在目录下的“Settings.ini”文件(如果没有可以自己创建),将其中的“FormStyle”一项的值改为“Simple”并保存即可。 程序有高级筛选功能,开启该功能后用户可以自主选择要修复...
  • vc++ 应用源码包_5

    2012-09-15 14:45:16
    这个例子就是查询任何可执行文件的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! GMem 内存管理单元源码。GMem.cpp和GMem.h是内存管理...
  • vc++ 开发实例源码包

    2014-12-16 11:25:17
    这个例子就是查询任何可执行文件的版本信息并且 C++builder 和 VC 都通用,只需要把 AnsiString 替换成 CString 就行了。 gh0st v3.6 源码 - 可下断点调试! 如题。详细见源码。 GMem 内存管理单元源码。GMem.cpp...

空空如也

空空如也

1 2 3
收藏数 45
精华内容 18
关键字:

vb打开通用对话框