用这个试试： ----------------- REGEDIT HKEY_CLASSES_ROOT\Licenses = Licensing: Copying the keys may be a violation of established copyrights.// Dialog objects license key HKEY_CLASSES_ROOT\Licenses\DC4D7921-6AC8-11cf-8ADB-00AA00C00905 = kqmqwjnqqjtqljkjvpqqkqmqokypoqjquoun以下是说明： \DlgObjMicrosoft Dialog Automation Objects ===================================The Microsoft Dialog Automation Objects component provides Common Dialog functionality without requiring that you place a control on a form. To use install the Microsoft Dialog Automation Objects:1. Copy DLGOBJS.DLL from VB98\Wizards\PDWizard to your \Windows\System directory (or \System32 directory on Windows NT).2. Register the design time license by merging the Registry file DLGOBJS.REG into your registry. - Under Windows NT 4.0 and Windows 95/98, right click on \Tools\Unsupprt\DlgObj\DLGOBJS.REG and choose 'Merge' - Under Windows NT 3.51, copy \Tools\Unsupprt\DlgObj\DLGOBJS.REG to your hard drive and merge it into the registry using RegEdt32.Exe3. Register DLGOBJS.DLL by either using RegSvr32.Exe found in \Tools\RegUtils or by Browsing for the DLGOBJS.DLL in the Project|References Dialog in Visual Basic and clicking 'Open'.4. Once the DLL is registered, select "Microsoft Dialog Automation Objects" in the Project|References Dialog in Visual Basic.
object 对象表达式，其值是“应用于”列表中的对象。
value 如“设置值”中所描述，为“打印”对话框指定选项的常数或值。
设置值value 的设置值是：常数 值 描述
cdlPDAllPages &H0 返回或设置全部页选项按钮.的状态。
cdlPDCollate &H10 返回或设置分页复选框的状态。
cdlPDDisablePrintToFile &H80000 使打印到文件复选框无效。
cdlPDHelpButton &H800 要求对话框显示帮助按钮。
cdlPDHidePrintToFile &H100000 隐藏打印到文件复选框。
cdlPDNoPageNums &H8 使页选项按钮和相关的编辑控件无效。
cdlPDNoSelection &H4 使选择选项按钮无效。
cdlPDNoWarning &H80 防止没有缺省打印机时显示警告信息。
cdlPDPageNums &H2 返回或设置页选项按钮的状态。
cdlPDPrintSetup &H40 使系统显示“打印设置”对话框而不是“打印”对话框。
cdlPDPrintToFile &H20 返回或设置打印到文件复选框的状态。
cdlPDReturnDC &H100 为该对话框中选择的打印机返回一个设备描述体。设备描述体返回到对话框的 hDC 属性中。
cdlPDReturnDefault &H400 返回缺省的打印机名称。
cdlPDReturnIC &H200 为该对话框中选择的打印机返回一个信息上下文。信息上下文提供了一个不用建立设备描述体就能得到设备信息的快速方法。信息上下文返回到对话框的 hDC 属性中。
cdlPDSelection &H1 返回或设置选择选项按钮的状态。如果 cdlPDPageNums 或 cdlPDSelection 均未指定，全部选项按钮就处于被选状态。
CdlPDUseDevModeCopies &H40000 如果打印机驱动程序不支持多份数打印，则设置该属性将使打印对话中的份数微调控件的数值无效。如果驱动程序支持多份数打印，则设置该属性指示对话框将所要的份数值存放在 Copies 属性中。
-----------------
REGEDIT
HKEY_CLASSES_ROOT\Licenses = Licensing: Copying the keys may be a violation of established copyrights.// Dialog objects license key
HKEY_CLASSES_ROOT\Licenses\DC4D7921-6AC8-11cf-8ADB-00AA00C00905 = kqmqwjnqqjtqljkjvpqqkqmqokypoqjquoun以下是说明：
\DlgObjMicrosoft Dialog Automation Objects
===================================The Microsoft Dialog Automation Objects component provides Common Dialog
functionality without requiring that you place a control on a form. To use install the Microsoft Dialog Automation Objects:1. Copy DLGOBJS.DLL from VB98\Wizards\PDWizard to your \Windows\System
directory (or \System32 directory on Windows NT).2. Register the design time license by merging the Registry file DLGOBJS.REG
into your registry. - Under Windows NT 4.0 and Windows 95/98, right click on
\Tools\Unsupprt\DlgObj\DLGOBJS.REG and choose 'Merge' - Under Windows NT 3.51, copy \Tools\Unsupprt\DlgObj\DLGOBJS.REG to your
hard drive and merge it into the registry using RegEdt32.Exe3. Register DLGOBJS.DLL by either using RegSvr32.Exe found in \Tools\RegUtils
or by Browsing for the DLGOBJS.DLL in the Project|References Dialog in
Visual Basic and clicking 'Open'.4. Once the DLL is registered, select "Microsoft Dialog Automation Objects"
in the Project|References Dialog in Visual Basic.