vb通用对话框在哪里，我只想知道它的图标是啥样的_百度知道
vb通用对话框在哪里，我只想知道它的图标是啥样的
提问者采纳
设置打印选项，CommonDialog 控件在运行时不可见，则应从“工程”菜单中选定“部件”。单击工具箱中的“CommonDialog”控件并在窗体上绘制该控件，将文本框中的字体属性设置为所选定的，控件将自动调整大小.dll 在 Microsoft Windows &#92.CancelError = TrueOn Error GoTo ErrHandler' 设置 Flags 属性CommonDialog1.FromPageEndPage = CommonDialog1.ColorExit SubErrHandler.BackColor = CommonDialog1；设计时在窗体上将 CommonDialog 控件显示成一个图标, NumCopies。Private Sub Command1_Click()Dim BeginP 设置窗体的背景颜色为选定的颜色Form1; 显示“字体”对话框CommonDialog1.*|Text Files&quot，然后单击“确定”按钮，以及选择颜色和字体等操作.ShowPrinter&#39.CancelError = TrueOn Error GoTo ErrHandler&#39，调用相应方法后将显示对话框或执行帮助引擎.FontSizeText1.Flags = cdlCCRGBInit&#39：'设置 Flags 属性CommonDialog1.Bold = CommonDialog1。运行时.ForeColor = CommonDialog1，请适当使用下表所列方法显示需要的对话; 设置标志CommonDialog1.FilterIndex = 2&#39。为了在应用程序中使用 CommonDialog 控件; 用户按了“取消”按钮Exit SubEnd Sub－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－下面的示例显示“颜色”对话框并设置窗体的 BackColor 为选定的颜色.CopiesFor i = 1 To NumCopies' 此处放置将数据发送到打印机的代码Next iExit SubErrHAll Files (*：&#39。通过运行 Windows 帮助引擎控件还能显示帮助.Font.FontStrikethru = CommonDialog1; 显示“打印”对话框CommonDialog1。控件显示的对话由控件的方法决定.Italic = CommonDialog1.ShowOpen&#39：
&#39.*)|*, i&#39, EndPage.FontNameText1：&#39CommonDialog 控件提供一组标准的操作对话框; 用户按了“取消”按钮Exit SubEnd Sub－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－下例显示“打印”对话框.FontUnderlineText1; 设置“CancelError”为 TrueCommonDialog1。运行时; 设置“取消”为 TrueCommonDialog1.Font.Font.Name = CommonDialog1.ColorExit SubErrHandler：Private Sub Command1_Click()&#39，应将其添加到窗体上并设置属性.CancelError = TrueOn Error GoTo ErrHandler&#39.bat)|*;(*，必须要求 Commdlg.filenameExit SubErrHandler.CancelError = TrueOn Error GoTo ErrHandler' 显示“打开”对话框CommonDialog1.dll 例程之间提供了接口;System 目录下; 从该对话框取得选定的值BeginPage = CommonDialog1.F 设置过滤器CommonDialog1.FontBoldText1：Private Sub Command1_Click()&#39。 在窗体上绘制 CommonDialog 控件时.txt|Batch Files (*; 显示“颜色”对话框CommonDialog1。此图标的大小不能改变; 设置“取消”为TrueCommonDialog1，进行诸如打开和保存文件.Flags = cdlCFEffects Or cdlCFBoth&#39。象 Timer 控件一样。为了用该控件创建对话框;&#39.Flags = cdlOFNHideReadOnly' 指定缺省的过滤器CommonDialog1; 设置“取消”为 TrueCommonDialog1.Underline = CommonDialog1; 显示选定文件的名字MsgBox CommonDialog1：Private Sub Command1_Click()&#39.ShowColor&#39。要使用 CommonDialog 控件 若未添加 CommonDialog 控件。 方法 显示的对话 ShowOpen 打开 ShowSave 另存为 ShowColor 颜色 ShowFont 字体 ShowPrinter 打印 ShowHelp 调用 Windows“帮助” 示例代码; & _&quot.ToPageNumCopies = CommonDialog1.bat&quot。 CommonDialog 控件可以显示如下常用对话框.Size = CommonDialog1.Filter = &quot，将控件添加到工具箱中：下例显示“打开”对话框然后在信息框中显示所选的文件名.ShowFontText1： “打开”“另存为”“颜色”“字体”“打印” 注意 无法指定对话框显示在什么地方。在标记对话的“控件”中找到并选定控件.FontStrikethruText1.Font.txt)|*.FontItalicText1; 用户按了“取消”按钮End Sub－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－下面的示例显示“字体”对话框。CommonDialog 控件在 Visual Basic 和 Microsoft Windows 动态连接库 Commdlg
提问者评价
其他类似问题
为您推荐：
其他2条回答
至于图标通用对话框不是VB自带的控件;控件&工程\部件&#92，可以通过&中添加 microsoft common dialog control 6.0 来添加
一点一点截的图又一点一点拼成的
您可能关注的推广回答者：
图标的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁vbdialogs 适用于VB6.0的通用对话框自定义模块，不 控件，对Windows 进行 ，核 Develop 238万源代码下载-
&文件名称: vbdialogs
& & & & &&]
&&所属分类:
&&开发工具: Visual Basic
&&文件大小: 71 KB
&&上传时间:
&&下载次数: 0
&&提 供 者:
&详细说明：适用于VB6.0的通用对话框自定义模块，不使用控件，对Windows通用对话框进行自定义，核心包括一个封装的类和两个模块。CCommonDialog.cls功能：使用 Windows 通用对话框，实现了调用文件属性对话框、打开对话框（可以提供某些文件预览）、保存对话框的功能；MDrawWaves.bas给定一个Wave文件，画出其波形；MCDHook.bas对话框预览核心模块，实现回调函数，消息截取处理和其他功能。它里面的变量、函数等，一般不需要在外部调用，所有功能基本封装在 CCommonDialog 类中；frmMain.frm程序主窗体，演示 CCommonDialog 类的各种属性和方法-Suitable for VB6.0 common dialog custom module, do not use the controls on the Windows common dialog box to customize, including a package of core classes and two modules. CCommonDialog.cls Function: Use Windows common dialog to achieve the calling file Properties dialog box, the Open dialog box (can provide some file preview), save function of the dialog box
MDrawWaves.bas given a Wave file, draw the waveform
MCDHook.bas preview dialog core module to implement callbacks, message interception processing and other functions. It is inside the variables, functions, etc., generally do not need to call in outside, all the basic functions encapsulated in CCommonDialog class
frmMain.frm program s main window, demonstrating various properties and methods CCommonDialog class
文件列表(点击判断是否您需要的文件，如果是垃圾请在下面评价投诉):
&&通用对话框\VB 取得图片大小\Form1.frm&&..........\...............\VB取得图片大小.vbp&&..........\...............\VB取得图片大小.vbw&&..........\模块\MCDHook.bas&&..........\....\MDrawWaves.bas&&..........\窗体\frmMain.frm&&..........\....\frmMain.frx&&..........\类模块\CCommonDialog.cls&&..........\说明.txt&&..........\贺兰_通用对话框.vbp&&..........\贺兰_通用对话框.vbw&&..........\VB 取得图片大小&&..........\模块&&..........\窗体&&..........\类模块&&通用对话框
&输入关键字，在本站238万海量源码库中尽情搜索：vb如何用通用对话框打开图片文件_百度知道
vb如何用通用对话框打开图片文件
在应用程序所在目录下，有若干个图片文件，要如何用通用对话框控件选择其中的一个文件，然后在把文件名返回给窗体上的一个image控件？ 我的源代码是这样的： Private Sub Form_Load() cdg1.InitDir = App.Path & &\\image& cdg1.DialogTitle = &选择背景图片& cdg1.Filter = &图片文件(*.jpg)|*.jpg& cdg1.FileName = App.Path & &\\image\\11.jp哗触糕吠蕹杜革森宫缉g& image1.picture=cdg1.filename End Sub （cdg是通用对话框在我的工程中的名称） 以上代码运行后vb报错说“类型不匹配” 不知道高手们都是怎么打开的？
Image1.Picture = LoadPicture(cdg1.filename)
image1.picutre的属性是图片属性，你不能直接拿字符串赋值，应该用LoadPicture函数加载图片。MSDN帮助如下： LoadPicture 函数将图形载入到窗体的 Picture 属性、PictureBox 控件或 Image 控件。
LoadPicture([filename], [size], [colordepth],[x,y])
LoadPicture 函数语法有下列部分：
filename 可选的。字符串表达式指定一个文件名。可以包括文件夹和驱动器。如果未指定文件名，LoadPicture 清除图象或 PictureBox 控件。
size 可选变体。如果 filename 是光标或图标文件，指定想要的图象大小。
colordepth 可选变体。如果 filename 是一个光标或图标文件，指定想要的颜色深度。
x 可选变体，如果使用 y ，则必须使用。如果 filename 是一个光标或图标文件，指定想要的宽度。在包含多个独立图象的文件中，如果那样大小的图象不能得到时，则使用可能的最好匹配。只有当 colordepth 设为 vbLPCustom 时，才使用X 和 Y值。For icon files 255 is the maximum possible value
y 可选变体，如果使用 x， 则必须使用。如果 filename 是一个光标或图标文件，指定想要的高度。在包含多个独立图象的文件中，如果那样大小的图象不能得到时，则使用可能的最好匹配。For icon files 255 is the maximum possible value设置值
size 的设置值为：
常量 值 描述
vbLPSmall 0 系统小图标。
vbLPLarge 1 系统大图标，由视频驱动程序决定。
vbLPSmallShell 2 外壳小图标大小，由“控制面板”中的 Display Properties 对话框中 Appearance 选项卡上的 Caption Buttons 的大小设置决定。哗触糕吠蕹杜革森宫缉
vbLPLargeShell 3 外壳大图标大小，由“控制面板”中的 Display Properties 对话框中 Appearance 选项卡上的图标大小设置决定。
vbLPCustom 4 自定义大小，由 x 和 y 参数提供值。colordepth 的设置值为：
常量 值 描述
vbLPDefault 0 如果使用指定文件，则为最佳可用匹配。
vbLPMonochrome 1 2 色。
vbLPVGAColor 2 16 色。
vbLPColor 3 256 色。
其他类似问题
为您推荐：
对话框的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁