精华内容
下载资源
问答
  • commondialog控件 vb中commondialog控件的使用方法 vb中commondialog控件的使用方法
  • [转载]VB中CommonDialog控件的使用

    万次阅读 2011-09-01 16:52:40
    CommonDialog控件 1.添加到工具箱 执行菜单命令:工程 | 部件| 使Microsoft CommonDialog Contral 6.0复选框有效。 在工具箱双击CommonDialog图标可将控件添加到窗体去。 2.属性  因为CommonDial
     
    
    CommonDialog控件
    1.添加到工具箱

    执行菜单命令:工程 | 部件| 使Microsoft CommonDialog Contral 6.0复选框有效。
    在工具箱中双击CommonDialog图标可将控件添加到窗体中去。
    2.属性
      因为CommonDialog控件用于创建“文件打开”、“文件保存”、“文件打印”、“颜色设置”、“字体设置”、“帮助”6种对话框,所以控件的属性可分为文件、颜色与字体三类。
    (1)文件类属性
    ① FileName属性用于设置或返回要“打开”、“保存”、“打印”的文件名。
    ② Filter属性用于文件过滤器,属性格式为:
    描述1| 过滤器1| 描述2 | 过滤器2 …。例如:
    所有文件(*.*)|*.*| RTF格式(*.RTF)|*.rtf |文本文件(*.txt)|*.txt
     打开文件的文件过滤器效果如图4.12下部的文件类型所示。
      VB中CommonDialog控件的使用 - metrom -
      VB中CommonDialog控件的使用 - metrom -  
    图4.12 打开文件对话框
    ③ FilterIndex属性用于指定默认的文件过滤器。例如:FilterIndex=3;
    表示指定默认文件过滤器为*.txt,如图4.12中文件类型框首行:文本文件(*.txt)。
    (2)颜色类属性
    ① Flags属性用于设置颜色对话框中初始颜色,初值为cdlCCRGBInit;
    ② Color属性用于返回用户在颜色对话框中所选择的颜色。
    (3)字体类属性
    ① Flags属性用于设置初始字体,取值与含义如表4.6所示,常取值为:cdlCFBoth。
     

    VB中CommonDialog控件的使用 - metrom -

     
    表4.6 Flags取值与含义
    • FontSize属性用于返回字体大小;
    • FontBold属性用于返回是否选择“粗体”;
    • FontItalic属性用于返回是否选择“斜体”;
    • FontUnderline属性用于返回是否选择“下划线”;
    • FontStrikethru属性用于返回是否选择“删除线”。

    3. CommonDialog控件的方法
    CommonDialog控件用于打开对话框的6种方法如下。
    (1)ShowOpen方法用于显示打开文件对话框,打开指定目录中的文件。
    调用该方法的格式为:CommonDialog.ShowOpen
      调用打开文件对话框的效果如图4.12所示。
    当用户在对话框中选择文件名(如:ex45.txt)后,应使用控件的CommonDialog.FileName属性返回所选文件名,然后再用RichTextBox控件的LoadFile方法打开指定文件。
    语法格式为:RichTextBox.LoadFile CommonDialog.FileName
    (2)ShowSave方法用于显示保存文件对话框,将文件保存到指定目录去。
    调用该方法的格式为:CommonDialog. ShowSave
      调用效果与图4.12类似。
    当用户在对话框中选择文件名(如:ex45.txt)后,应使用控件的CommonDialog.FileName属性返回所选文件名,然后再用RichTextBox控件的SaveFile方法保存指定文件。
    语法格式为:RichTextBox.SaveFile CommonDialog.FileName
    (3)ShowPrinter方法用于显示打印对话框,打印输出文件。
    调用该方法的格式为:CommonDialog. ShowPrinter。
    (4)ShowColor方法用于显示字体颜色对话框,用户可设置字体颜色。
    用户可用“颜色”对话框在调色板中选择颜色(如图4.13),并用Color属性返回选定的颜色。

      VB中CommonDialog控件的使用 - metrom -  
      图4.13 颜色对话框  

    调用对话框设置“颜色”的步骤如下:

    • 将通用对话框控件的Flags属性设置为cdlCCRGBInit。
    • 用ShowColor方法显示颜色对话框。
    • 用Color属性返回“颜色”对话框所选颜色。
    例如:
    CommonDialog.Flags = cdlCCRGBInit
    CommonDialog.ShowColor
    RichTextBox.SelColor = CommonDialog.Color
    (5)ShowFont方法用于打开字体对话框,用户可调用字体对话框选择字体的大小、颜色等。
    调用“字体”对话框的步骤如下:
    将Flags属性设置为表4.6三种值之一;
    用ShowFont方法打开字体对话框;
    用字体类属性返回字体的设置信息。
    (6)ShowHelp方法用于打开帮助对话框,用户可获得帮助信息。

     

    CommonDialog 控件提供诸如打开和保存文件、设置打印选项、选择颜色和字体等操作的一组标准对话框。运行 Windows 帮助引擎时,控件还能够显示帮助。
    CommonDialog 控件在 Visual Basic 和 Microsoft Windows 动态连接库Commdlg.dll 例程之间提供了接口。为了用该控件创建对话框,必须要求Commdlg.dll 在 Microsoft Windows \System 目录下。
    为了在应用程序中使用 CommonDialog 控件,应将其添加到窗体上并设置属性。控件显示的对话由控件的方法决定。运行时,调用相应方法后将显示对话框或执行帮助引擎;设计时在窗体上将 CommonDialog 控件显示成一个图标。此图标的大小不能改变。
    CommonDialog 控件可以显示如下常用对话框:
    “打开”
    “另存为”
    “颜色”
    “字体”
    “打印”
    要使用 CommonDialog 控件
    1. 若未添加 CommonDialog 控件,则应从“工程”菜单中选定“部件”,将控件添加到工具箱中。在标记对话的“控件”中找到并选定控件,然后单击“确定”按钮。
    2. 单击工具箱中的“CommonDialog”控件并在窗体上绘制该控件。在窗体上绘制 CommonDialog 控件时,控件将自动调整大小。象 Timer控件一样,CommonDialog 控件在运行时不可见。
    3. 运行时,请适当使用下表所列方法显示需要的对话。
    显示“打开”和“另存为”对话框
    有了“打开”对话框就可指定驱动器、目录、文件扩展名和文件名。“另存为”对话框在外观上与“打开”对话框相同,只是对话框的标题和文件名是暗淡的。运行时选定文件并关闭对话框后,可用 FileName 属性获取选定的文件名。
    要显示“打开”对话框
    1. 指定在“文件类型”列表框中显示的文件过滤器列表。
    可用下列格式设置 Filter 属性:
    description1 | filter1 | description2 | filter2...
    Description 是列表框中显示的字符串——例如,"Text Files (*.txt)"。Filter 是实际的文件过滤器─—例如,"*.txt"。每个description | filter 设置间必须用管道符号分隔 (|)。
    2. 用 ShowOpen 方法显示对话框。
    选定文件后可用 FileName 属性获取选定文件的名称。
    对所有公共对话框,当 CancelError 属性为 True,而且用户单击了对话框的“取消”按钮时将生成一个错误。在显示对话框时捕获错误,以此检测是否按了“取消”按钮。
    下列代码显示“打开”对话框并以选定的文件名为打开文件过程的参数:
    Private Sub mnuFileOpen_Click ()
    'CancelError 为 True。
    On Error GoTo ErrHandler
    '设置过滤器。
    CommonDialog1.Filter = "All Files (*.*)|*.*|Text _
    Files (*.txt)|*.txt|Batch Files (*.bat)|*.bat"
    '指定缺省过滤器。
    CommonDialog1.FilterIndex = 2
    '显示“打开”对话框。
    CommonDialog1.ShowOpen
    '调用打开文件的过程。
    OpenFile (CommonDialog1.FileName)
    Exit Sub

    ErrHandler:
    '用户按“取消”按钮。
    Exit Sub
    End Sub

    使用“颜色”对话框
    可用“颜色”对话框在调色板中选择颜色,或者创建并选定自定义颜色。运行时,选定颜色并关闭对话框后可用 Color 属性获取选定的颜色。
    要显示“颜色”对话框
    1. 将CommonDialog控件的Flags属性设置成Visual Basic常数cdlCCRGBInit。
    2. 用 ShowColor 方法显示对话框。
    可用 Color 属性获取选定颜色的 RGB 值。单击“Command1”命令按钮时,下列代码将显示“颜色”对话框:
    Private Sub Command1_Click ()
    '将 Cancel 设置成 True。
    CommonDialog1.CancelError = True
    On Error GoTo ErrHandler
    '设置 Flags 属性。
    CommonDialog1.Flags = cdlCCRGBInit
    '显示“颜色”对话框。
    CommonDialog1.ShowColor
    '将窗体的背景颜色设置成选定的'颜色。
    Form1.BackColor = CommonDialog1.Color
    Exit Sub

    ErrHandler:
    '用户按了“取消”按钮。
    Exit Sub
    End Sub

    使用“字体”对话框
    “字体”对话框根据大小、颜色、样式选择字体。用户一旦在“字体”对话框中选定字体后,下列属性就会包含有关用户选项的信息。

    要显示“字体”对话框
    1. 将 Flags 属性设置为下述 Visual Basic 常数之一:
    cdlCFScreenFonts(屏幕字体)
    cdlCFPrinterFonts(打印机字体)
    cdlCFBoth(既可以是屏幕字体又可以是打印机字体)
    警告 在显示“字体”对话框之前必须将 Flags 属性设置为这些数值之一,否则将发生字体不存在错误。
    2. 用 ShowFont 方法显示对话框。
    下列代码根据用户在“字体”对话框中的选择来设置文本框的字体属性:
    Private Sub Command1_Click ()
    '将 Cancel 设置成 True。
    CommonDialog1.CancelError = True
    On Error GoTo ErrHandler
    '设置 Flags 属性。
    CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects
    '显示“字体”对话框。
    CommonDialog1.ShowFont
    '根据用户的选择来设置文本属性。
    Text1.Font.Name = CommonDialog1.FontName
    Text1.Font.Size = CommonDialog1.FontSize
    Text1.Font.Bold = CommonDialog1.FontBold
    Text1.Font.Italic = CommonDialog1.FontItalic
    Text1.Font.Underline = CommonDialog1.FontUnderline
    Text1.FontStrikethru = CommonDialog1.FontStrikethru
    Text1.ForeColor = CommonDialog1.Color
    Exit Sub
    ErrHandler:
    '用户按了“取消”按钮。
    Exit Sub
    End Sub
     
     
     
    楼上很详细,我不多说了,一般最经典的使用是
    commondialog1.showopen("")
    commondialog1.showsave("")
    .showcolor()
    .showfont()
    只不过它的属性可以用属性中的自定义来设置
    展开全文
  • VB中CommonDialog示例

    千次阅读 2013-12-08 19:44:16
    VB中CommonDialog示例 从project->components,选中microsoft common dialog control 6.0,点击“确定”,会有Commondialog按钮出现在控件栏中,然后拖一个到窗体,用其默认名Commondialog1。 在本程序中实现...
    VB中CommonDialog示例
    从project->components,选中microsoft common dialog control 6.0,点击“确定”,会有Commondialog按钮出现在控件栏中,然后拖一个到窗体,用其默认名Commondialog1。

    在本程序中实现如下功能:
    打开Word/Text/其它文件到Text1控件,Commondialog1.action=1/Commondialog1.ShowOpen
    保存Text1中的文本到另一个文件,Commondialog1.action=2/Commondialog1.ShowSave
    设置Text1中的字体颜色,Commondialog1.action=3/Commondialog1.ShowColor
    设置Text1中的字体属性,Commondialog1.action=4/Commondialog1.ShowFont
    打印Text1中的文本,Commondialog1.action=5/Commondialog1.ShowPrint
    打开Help文档,Commondialog1.action=6/Commondialog1.ShowHelp。
    具体代码如下:
    Private Sub cmdColor_Click()
    CommonDialog1.ShowColor  '或用CommonDialog1.Action=3
    Text1.ForeColor = CommonDialog1.Color '设置文本框的前景色
    End Sub
    Private Sub cmdFont_Click()
    With CommonDialog1
    .Flags = cdlCfScreenFonts Or cdlCFEffects '使对话框只列出系统支持的屏幕字体,使对话框允许下划线、删除线、及颜色效果
    .Max = 100
    .Min = 1
    .ShowFont '也可以用.Action=4代替
    End With
    With Text1
    .FontName = CommonDialog1.FontName
    .FontSize = CommonDialog1.FontSize
    .FontBold = CommonDialog1.FontBold
    .FontItalic = CommonDialog1.FontItalic
    .FontStrikethru = CommonDialog1.FontStrikethru
    .FontUnderline = CommonDialog1.FontUnderline
    End With
    End Sub
    Private Sub cmdHelp_Click()
    CommonDialog1.HelpCommand = cdlHelpContents
    CommonDialog1.HelpFile = "C:/Windows/help/notepad.hlp"
    CommonDialog1.ShowHelp '或使用CommonDialog1.Action=6
    End Sub
    Private Sub cmdOpen_Click()
    Dim StrText As String
    On Error GoTo Note '当出现错误时,跳转到Note语句
    With CommonDialog1
    .DialogTitle = "打开对话框"
    .InitDir = "D:/"
    .Filter = "Word文档(*.doc) |*.doc|文本文件(*.txt) |*.txt|所有文件(*.*) |*.*"
    .FilterIndex = 1
    Text1.Text = ""
    .ShowOpen '或使用CommonDialog1.Action=1
    Open .FileName For Input As #1
    End With
    If Err.Number = 0 Then '如果打开文件正确
    Do While Not EOF(1)
    Line Input #1, StrText
    Text1 = Text1 + StrText + vbCrLf 'vbCrLf是系统常量,为回车换行符
    'Text1=Text1+StrText+(Chr(13)+(Chr(10))
    Loop
    Close #1
    End If
    Note:
    End Sub
    Private Sub cmdPrinter_Click()
    Dim i As Integer
    CommonDialog1.ShowPrinter '或使用CommonDialog1.Action=5
    For i = 1 To CommonDialog1.Copies
    Printer.Print Text1.Text
    Next i
    Printer.EndDoc '结束打印
    End Sub
    Private Sub cmdSave_Click()
    With CommonDialog1
    .DialogTitle = "另存为对话框"
    .InitDir = "C:/"
    .Filter = "Word文档(*.doc)|*.doc|文本文件(*.txt)|*.txt|所有文件(*.*)|*.*"
    .FilterIndex = 1
    .DefaultExt = "*.Txt"
    .Action = 2 '或使用CommondDialog1.ShowSave
    Open .FileName For Output As #2
    End With
    For i = 1 To Len(Text1)
    Print #2, Mid$(Text1, i, 1);
    Next i
    Close #2
    End Sub
    ,Private Sub Form_Load()
    ,Dim j As Integer
    ,For j = 0 To Screen.FontCount - 1
    ,Combo1.AddItem Screen.Fonts(j)
    ,Next j
    ,End Sub

    展开全文
  • 这在VB的帮助可以找到。简单点说,这个参数就是控制公共对话框样式的参数。对不同的类型,可选参数不一样。.showopen or .showsave常数 值 描述 cdlOFNAllowMu

    这在VB的帮助中可以找到。
    简单点说,这个参数就是控制公共对话框样式的参数。对不同的类型,可选参数不一样。

    .showopen or .showsave
    常数                                                            值                                 描述 
    cdlOFNAllowMultiselect                       &H200              它指定文件名列表框允许多重选择。 
    运行时,通过按 SHIFT 键以及使用 UP ARROW 和 DOWN ARROW 键可选择多个文件。作完此操作后,FileName 属性就返回一个包含全部所选文件名的字符串。串中各文件名用空格隔开。
    cdlOFNCreatePrompt                            &H2000           当文件不存在时对话框要提示创建文件。该标志自动设置 cdlOFNPathMustExist 和 cdlOFNFileMustExist 标志。 
    cdlOFNExplorer                                      &H80000         它使用类似资源管理器的打开一个文件的对话框模板。适用于 Windows 95 和 Windows NT 4.0。 
    CdlOFNExtensionDifferent                   &H400               它指示返回的文件扩展名与 DefaultExt 属性指定的扩展名不一致。如果 DefaultExt 属性是 Null,或者扩展相匹配,或者没有扩展时,此标志不设置。当关闭对话框时,可以检查这个标志的值。 
    cdlOFNFileMustExist                             &H1000           它指定只能输入文件名文本框已经存在的文件名。如果该标志被设置,则当用户输入非法的文件名时,要显示一个警告。该标志自动设置 cdlOFNPathMustExist 标志。 
    cdlOFNHelpButton                                &H10                使对话框显示帮助按钮。 
    cdlOFNHideReadOnly                           &H4                  隐藏只读复选框。 
    cdlOFNLongNames                               &H200000       使用长文件名。 
    cdlOFNNoChangeDir                            &H8                  强制对话框将对话框打开时的目录置成当前目录。 
    CdlOFNNoDereferenceLinks               &H100000        不要间接引用外壳链接(也称作快捷方式)。缺省时,选取外壳链接会引起它被外壳间接引用。 
    cdlOFNNoLongNames                           &H40000          无长文件名。 
    CdlOFNNoReadOnlyReturn                  &H8000           它指定返回的文件不能具有只读属性,也不能在写保护目录下面。 
    cdlOFNNoValidate                                  &H100              它指定公共对话框允许返回的文件名中含有非法字符。 
    cdlOFNOverwritePrompt                     &H2                  使“另存为”对话框当选择的文件已经存在时应产生一个信息框,用户必须确认是否覆盖该文件。 
    cdlOFNPathMustExist                           &H800              它指定只能输入有效路径。如果设置该标志,输入非法路径时,应显示一个警告信息。 
    cdlOFNReadOnly                                    &H1                  建立对话框时,只读复选框初始化为选定。该标志也指示对话框关闭时只读复选框的状态。 
    cdlOFNShareAware                               &H4000           它指定忽略共享冲突错误。

     

    .showcolor
    对颜色对话框有:
    常数                                      值            描述 
    cdlCCFullOpen              &H2     显示全部的对话框,包括定义自定义颜色部分。 
    cdlCCShowHelpButton    &H8     使对话框显示帮助按钮。 
    cdlCCPreventFullOpen   &H4     使定义自定义颜色命令按钮无效并防止定义自定义颜色。 
    cdlCCRGBInit                   &H1     为对话框设置初始颜色值。

     

    .showfont
    对字体对话框有:
    常数                                 值                  描述 
    cdlCFANSIOnly               &H400      它指定对话框只允许选择 Windows 字符集的字体。如果该标志被设置,就不能选择仅含符号的字体。 
    cdlCFApply                 &H200        它使对话框中的“应用”按钮有效。 
    cdlCFBoth                      &H3          使对话框列出可用的打印机和屏幕字体。hDC 属性标识与打印机相关的设备描述体。 
    cdlCFEffects                  &H100     它指定对话框允许删除线,下划线,以及颜色效果。  
    cdlCFFixedPitchOnly    &H4000     它指定对话框只能选择固定间距的字体。 
    cdlCFForceFontExist    &H10000     它指定如果用户试图选择一个并不存在的字体或样式,显示错误信息框。 
    cdlCFHelpButton          &H4           使对话框显示帮助按钮。  
    cdlCF例mitSize             &H2000     它指定对话框只能在由 Min 和 Max 属性规定的范围内选择字体大小。 
    cdlCFNoFaceSel         &H80000     没有选择字体名称。 
    cdlCFNoSimulations     &H1000      它指定对话框不允许图形设备接口 (GDI) 字体模拟。 
    cdlCFNoSizeSel           &H200000    没有选择字体大小。 
    cdlCFNoStyleSel          &H100000    没有选择样式。 
    cdlCFNoVectorFonts    &H800       它指定对话框不允许矢量字体选择。 
    cdlCFPrinterFonts     &H2            使对话框只列出由 hDC 属性指定的打印机支持的字体。 
    cdlCFScalableOnly      &H20000     它指定对话框只允许选择可缩放的字体。 
    cdlCFScreenFonts       &H1             使对话框只列出系统支持的屏幕字体。 
    cdlCFTTOnly                  &H40000     它指定对话框只允许选择 TrueType 型字体。 
    cdlCFWYSIWYG           &H8000      它指定对话框只允许选择在打印机和屏幕上均可用的字体。如果该标志被设置,则 cdlCFBoth 和 cdlCFScalableOnly 标志也应该设置。

    展开全文
  • 利用commondialog可以进行文件的打开与存储.commondialog.showsave表示存储,并可设置存储类型, .DialogTitle = "生成Excel" .FileName = "*.xls" .Filter = "(Excel)*.xls|*.xls"对于保存操作的取消按键的操作...

    利用commondialog可以进行文件的打开与存储.

    commondialog.showsave表示存储,

    并可设置存储类型,        

             .DialogTitle = "生成Excel"
             .FileName = "*.xls"
             .Filter = "(Excel)*.xls|*.xls"

    对于保存操作中的取消按键的操作如下:

        On Error GoTo cancelError:
            Me.CommonDialog1.cancelError = True'将取消设定为一个错误,并对其进行捕捉.

            CommonDialog1.Flags = cdlOFNOverwritePrompt '当文件有重名时,进行重新命名,还是进行覆盖的选择.
       Me.CommonDialog1.ShowSave
        Exit Sub

    cancelError:
       If Err = 32755 Then
           MsgBox "cancel"
       End If

    menu菜单分隔线的添加.

    caption 填: -

    name命名随便.

    展开全文
  • object.Flags [= value] 格式都是这样~只给你贴出一个~详细的你还是下载MSDN来查吧~你要学VB 离不开它~ Value 的设置值是: value 如“设置值”所描述,是为“打开”和“另存为”对话框指...
  • CommonDialog1

    2008-10-06 22:52:00
    VB中的对话框控件不论是,打开还是保存都需要一个完整的操作过程,按了保存而没有完成了保存的操作,就会出现错误,有两种方法可以不出错(我只知道两种) CommonDialog1.Filter = "文档文件(*.txt)|*.txt|所有文件...
  • filterindex是“打开”或“另存为”对话框(CommonDialog控件的一个缺省的过滤器,来打开或者保存文件的文件扩展名 要使用这个属性值,就必须先给filter属性赋值,比如 CommonDialog1.filter=“word文档|.doc|...
  • 怎样启用控件comdlg32.ocx 2008-10-08 09:32 提问者: nefu_20061617 |浏览次数:1502次 ...)运行时发生错误ActiveX 部件不能创建对象: 'MSComdlg.CommonDialog'怎样启用控件comdlg32.ocx,不使用On...
  • 这是一个类似 Microsoft ...有了 CommonDialog 类模块后,你在用 VB 编程时,就可以完全抛开 Microsoft Common Dialog Control,不但可以极大程度地提高程序运行速度,同时也减少因控件版本不符而无法运行程序的烦恼。
  • 打开microsoft visual basic开发环境,新建一个Activex控件 设计界面如下,这是直接运行这个控件的结果。接下来我们看看如何 一个驱动器控件,一个文件夹控件,一个文件显示控件 ...CommonDialog1.ShowOpen ...
  • Dim fileDlg As Object ' 文件对话框 ' 变量初始化 Set fileDlg = CreateObject("...MSComDlg.CommonDialog") ' 打开附件 fileDlg.DialogTitle = "选择附件文件" fileDlg.F...
  • VB中从MSFlexGrid记录导出为Excel

    千次阅读 2012-08-22 17:40:18
    Excel 14.0 Object Library 引用,我的代码中用到了对话框,所以我添加了对话框CommonDialog控件。     由于机房收费系统多次用到这个功能,我把这些代码写到了模块,定义了一个公有的函数,具体代码如
  • VB打开对话框ShowOpen

    2021-01-07 20:40:29
    “ 本节课程一起学习CommonDialog控件中的ShowOpen方法——打开对话框” 一、添加CommonDialog控件 首先我们需要添加CommonDialog对话框控件。 在工具箱空白处右键,选择“部件“,进入控件选择界面。 找到...
  • 那位能将下面的代码改一下,要求不论原图多大,放进此框后,都要随此框大小相应放大或缩小:原代码如下:提示:在窗体上有二个按钮(放进图片和保存图片),另要引进一个CommonDialog控件.Dim OpenFileName As StringPrivate ...
  • VB.net 想点击button获取选择文件夹的路径,并把路径存入文本框1。网上搜的都是添加commondialog控件,可是我只看到有button,新手求解,谢谢!
  • 怎样在VB中画立体图形

    千次阅读 2002-03-25 08:49:00
    窗体布局:控件屬 性值 timer1enabledflaseinterval1Command1caption画图Command2caption保存CommonDialog1 ,各屬性不用改变。 代码: Dim i As IntegerDim a As Int
  •  Private Sub mnuFont_Click()显示“字体”对话框,使用指定的方法,CommonDialog 控件能够显示下列对话。将RichTextBox1的属性根据“字体”对话框的变化作相应设置,要改变 RichTextBox 控件中的字体特性,可以...
  • 导入Map Objects、CommandDialog 组件(这一组件在对象库Microsoft Common Dialog Control 6.0 )。添加Map控件(主地图名为Map1),Conmon Dialog 控件,将其名称改为cDlg1、添加Listbox 控件,并将其名称改为...
  •  大家都知道在Visual Basic 6可以通过ActiveX控件“Microsoft Common Dialog Control”调用WinHelp帮助文件,那么是否可以用同样的方法调用HTML帮助文件呢? I am sorry,答案是否定的。 但是 Visual Basic 6 ...
  • VB制作自己的IE网页浏览器 2011年04月23日 ... “microsoft common dialog control 6.0”控件;  “Microsoft Windows Common Control”控件;  2、在Form1窗口添加添加1个ComboBox控件,5个Comma...
  • VB.Net - 对话框

    2018-03-01 09:53:52
    VB.Net - 对话框有许多内置的对话框,用于...所有这些对话框控件类继承自CommonDialog类,并覆盖基类的RunDialog()函数以创建特定对话框。当对话框的用户调用其ShowDialog()函数时,将自动调用RunDialog()...
  • 相信大家学VB如果连记事本这东西都不知道话就很郁闷了,CG今天接到Kivi的任务,做...简要说明:记事本程序主要是要求在VB中使用Common Dialog Control控件的打开文件,打开字体,保存文件对话框的功能,实现文本的创建
  • 如何在应用程序调用帮助文件?

    千次阅读 2004-07-29 09:22:00
    新建一个工程,在窗体上加入控件CommonDialog1,然后在代码窗口添加下面代码(最好放在模块内) Option Explicit 调用帮助文件,参数:IndexIDPublic Sub ShowMeHelp(Optional IndexID As Integer) On Error Go

空空如也

空空如也

1 2
收藏数 35
精华内容 14
关键字:

vb中commondialog控件