Print Plug-In for Office 未显示时 (Windows) iPF8410 在 Office 应用程序的禁用项目中将［ Print Plug-In for Office］ 启用 当系统、应用程序等发生了异常结束的情况时，为了安全起见，［Microsoft Office］应用程序通常会将加载项置于无 效。 这种情况下，为了使［imagePROGRAF Print Plug-In］工具栏/丝带显示，必须将处于无效的加载项恢复。 要恢复［Microsoft Office］中处于无效的加载项时，请按照以下步骤来操作。 o［Microsoft Office 2010］的情况下 1 从［文件］菜单中选择［选项］。 软件 2 从［选项］ 对话框左侧的列表中选择［ 加载项］ 。 3 从［管理］ 组合框中选择［ 禁用项目］ ，然后点击［ 转 到］ 按钮。 4 当［禁用项目］ 对话框中显示了［ 加载项 imageprograf print plug-in (ipfaddinif.dll)］ 时，请选择并点击［ 启用］ 按 钮。 284 5 关闭所有的对话框，重新启动 Office 应用程序。 o［Microsoft Office 2007］的情况下 用户使用指南 Windows Print Plug-In for Office
应用程序的禁用项目中将 ［Print Plug-In for Office］
用程序等发生了异常结束的情况时，
为了安全起见，［Microsoft Office］
应用程序通常会将加载项置于无
这种情况下，
［imagePROGRAF Print Plug-In］
丝带显示，
必须将处于无效的加载项恢复。
［Microsoft Office］
中处于无效的加载项时，
请按照以下步骤来操作。
［Microsoft Office 2010］
菜单中选择
对话框左侧的列表中选择 ［
组合框中选择 ［
禁用项目］ ，
然后点击 ［
禁用项目］
对话框中显示了 ［
加载项 imageprograf
print plug-in (ipfaddinif.dll)］
请选择并点击 ［
关闭所有的对话框，
应用程序。
［Microsoft Office 2007］
Print Plug-In for Office
(Windows) iPF8410
用户使用指南
Print Plug-In for Office
匿名用户上传于：
&2016 蟹腿&&&&粤ICP备号-2
(┯_┯)广告君被屏蔽了~~~
感谢您的支持，请按照如下步骤取消屏蔽ABBAO的广告()：
我取消屏蔽了VB编程、代码、技术问题解决方案
颜色下拉组合框。拉不下来
方案整理者：drivesunEAGLE157 &&&&&& 发布时间：
赞助商广告
为什么用WINDOS&API添加的颜色下拉组合框。拉不下来，在VB中就可以。用到EXCEL就不可以了.请高手指点。
*****类模块代码********************************************
Option&Explicit
Private&Type&VasmColorComBoxConst
&&&&ColorHDC&&As&Long
&&&&ColorName&As&String
&&&&ColorRGB&&As&Long
Private&Type&ThisClassSet
&&&&DefaultColor(0&To&17)&As&VasmColorComBoxConst
&&&&n_hWnd&&&&&&&&&&&&&&&&As&Long
&&&&n_DefaultProc&&&&&&&&&As&Long
&&&&n_CID&&&&&&&&&&&&&&&&&As&Long
&&&&n_hBurshNor&&&&&&&&&&&As&Long
&&&&n_hBurshSel&&&&&&&&&&&As&Long
Dim&PG&As&ThisClassSet
Dim&LinkProc()&As&Long
Event&ItemClick(ByVal&RGBColor&As&Long)
Private&Sub&MsgHook(Result&As&Long,&ByVal&cHwnd&As&Long,&ByVal&Message&As&Long,&ByVal&wParam&As&Long,&ByVal&lParam&As&Long)
&&&&Dim&Dit&As&DRAWITEMSTRUCT
&&&&Dim&i&As&Long
&&&&Dim&txtColor&As&Long
&&&&Dim&hBrush&As&Long
&&&&Dim&Rct&As&RECT
&&&&If&(Message&=&WM_DRAWITEM)&And&(wParam&=&PG.n_CID)&Then
&&&&&&&&CopyMemory&Dit,&ByVal&lParam&,&LenB(Dit)
&&&&&&&&If&Dit.itemID&=&-1&Then&Exit&Sub
&&&&&&&&i&=&((Dit.rcItem.bottom&-&Dit.rcItem.Top&-&12)&\&2)&+&Dit.rcItem.Top
&&&&&&&&Select&Case&Dit.itemState
&&&&&&&&&&&&Case&1,&16,&17,&4113:&hBrush&=&PG.n_hBurshSel:&txtColor&=&GetSysColor(COLOR_HIGHLIGHTTEXT)
&&&&&&&&&&&&Case&Else:&hBrush&=&PG.n_hBurshNor:&txtColor&=&0
&&&&&&&&End&Select
'&&&&&&&&Debug.Print&Dit.itemID,&Dit.itemState,&Timer
&&&&&&&&SetBkMode&Dit.hDC,&0&
&&&&&&&&FillRect&Dit.hDC,&Dit.rcItem,&hBrush
&&&&&&&&BitBlt&Dit.hDC,&Dit.rcItem.Left&+&2,&i,&12,&12,&PG.DefaultColor(Dit.itemID).ColorHDC,&0,&0,&SRCCOPY
&&&&&&&&'BitBlt&Dit.hDC,&Dit.rcItem.Left&+&2,&i,&25,&12,&PG.DefaultColor(Dit.itemID).ColorHDC,&0,&0,&SRCCOPY
&&&&&&&&Dit.rcItem.Left&=&Dit.rcItem.Left&+&20
&&&&&&&&SetTextColor&Dit.hDC,&txtColor&
&&&&&&&&DrawText&Dit.hDC,&PG.DefaultColor(Dit.itemID).ColorName,&-1&,&Dit.rcItem,&DT_SINGLELINE&Or&DT_VCENTER
&&&&&&&&Exit&Sub
&&&&End&If
&&&&Result&=&CallWindowProc(ByVal&PG.n_DefaultProc&,&ByVal&cHwnd,&ByVal&Message,&ByVal&wParam&,&ByVal&lParam&)
&&&&If&Message&=&WM_COMMAND&And&lParam&=&PG.n_hWnd&Then
&&&&&&&&i&=&ItemSelected
&&&&&&&&Dim&ps&As&Points
&&&&&&&&CopyMemory&ps,&wParam&,&4&
&&&&&&&&If&ps.Y&=&CBN_SELCHANGE&Then
&&&&&&&&&&&&If&i&=&1&Then
&&&&&&&&&&&&&&&&PG.DefaultColor(1).ColorRGB&=&UserGetColor(PG.n_hWnd,&PG.DefaultColor(1).ColorRGB)
&&&&&&&&&&&&&&&&DrawColorLabel&PG.DefaultColor(1).ColorHDC,&PG.DefaultColor(1).ColorRGB
&&&&&&&&&&&&&&&&UpdateWindow&cHwnd
&&&&&&&&&&&&&&&&
&&&&&&&&&&&&End&If
&&&&&&&&&&&&RaiseEvent&ItemClick(PG.DefaultColor(i).ColorRGB)
&&&&&&&&End&If
&&&&End&If
Function&CreateColorComboBox(hWndParent&As&Long,&ByVal&X1&As&Long,&ByVal&Y1&As&Long,&ByVal&X2&As&Long,&Optional&ByVal&cID&As&Long)&As&Long
&&&&'CBS_OWNERDRAWVARIABLE&Or
&&&&Dim&cHwnd&As&Long
&&&&cHwnd&=&CreateWindowEx(0,&&ComboBox&,&vbNullString,&WS_CHILD&Or&WS_GROUP&Or&WS_TABSTOP&Or&WS_VISIBLE&Or&WS_VSCROLL&Or&_
&&&&CBS_OWNERDRAWFIXED&Or&CBS_DROPDOWNLIST&Or&CBS_HASSTRINGS&Or&CBS_AUTOHSCROLL,&X1,&Y1,&X2,&180,&hWndParent,&cID,&0,&ByVal&0)
&&&&If&cHwnd&Then
&&&&&&&&SendMessage&cHwnd,&WM_SETFONT,&ByVal&SendMessage(hWndParent,&WM_GETFONT,&ByVal&0&,&ByVal&0&),&ByVal&0&
&&&&&&&&Dim&i&As&Long
&&&&&&&&For&i&=&17&To&0&Step&-1
&&&&&&&&&&&&SendMessageStr&cHwnd,&CB_ADDSTRING,&ByVal&0&,&PG.DefaultColor(i).ColorName
&&&&&&&&Next
&&&&&&&&PG.n_CID&=&cID
&&&&&&&&PG.n_hWnd&=&cHwnd
&&&&&&&&PG.n_DefaultProc&=&SetWindowLong(hWndParent,&ByVal&GWL_WNDPROC,&ByVal&GetWndProcAddress(11))
&&&&&&&&ColorSelected&=&PG.DefaultColor(1).ColorRGB
&&&&End&If
End&Function
Public&Property&Get&ItemSelected()&As&Long
&&&&ItemSelected&=&SendMessage(PG.n_hWnd,&ByVal&CB_GETCURSEL,&ByVal&0,&ByVal&0)
End&Property
Public&Property&Let&ItemSelected(ByVal&vnewvalue&As&Long)
&&&&SendMessage&PG.n_hWnd,&ByVal&CB_SETCURSEL,&ByVal&vnewvalue&,&ByVal&0&
End&Property
Public&Property&Get&ColorSelected()&As&Long
&&&&Dim&i&As&Long
&&&&i&=&SendMessage(PG.n_hWnd,&ByVal&CB_GETCURSEL,&ByVal&0&,&ByVal&0&)
&&&&ColorSelected&=&PG.DefaultColor(i).ColorRGB
End&Property
Public&Property&Let&ColorSelected(ByVal&vnewvalue&As&Long)
&&&&Dim&i&As&Long
&&&&For&i&=&17&To&0&Step&-1
&&&&&&&&If&i&&&&1&Then&If&PG.DefaultColor(i).ColorRGB&=&vnewvalue&Then&GoTo&l1
&&&&If&i&=&1&Then&DrawColorLabel&PG.DefaultColor(1).ColorHDC,&vnewvalue:&i&=&1:&PG.DefaultColor(1).ColorRGB&=&vnewvalue
&&&&SendMessage&PG.n_hWnd,&ByVal&CB_SETCURSEL,&ByVal&i&,&ByVal&0&
End&Property
Public&Property&Get&ColorCustom()&As&Long
&&&&ColorCustom&=&PG.DefaultColor(1).ColorRGB
End&Property
Public&Property&Let&ColorCustom(ByVal&vnewvalue&As&Long)
&&&&PG.DefaultColor(1).ColorRGB&=&vnewvalue
&&&&DrawColorLabel&PG.DefaultColor(1).ColorHDC,&vnewvalue
End&Property
Public&Property&Get&ID()&As&Long
&&&&ID&=&PG.n_CID
End&Property
Public&Property&Get&ColorDefault()&As&Long
&&&&ColorCustom&=&PG.DefaultColor(0).ColorRGB
End&Property
Public&Property&Let&ColorDefault(ByVal&vnewvalue&As&Long)
&&&&PG.DefaultColor(0).ColorRGB&=&vnewvalue
&&&&DrawColorLabel&PG.DefaultColor(0).ColorHDC,&vnewvalue
End&Property
Private&Sub&DrawColorLabel(ColorHDC&As&Long,&RGB_Color&As&Long)
&&&&Dim&hBrush&As&Long,&hBrush1&As&Long
&&&&Dim&Rct&As&RECT
&&&&SetRect&Rct,&0&,&0&,&25&,&12&
&&&&hBrush1&=&CreateSolidBrush(0&)
&&&&hBrush&=&CreateSolidBrush(RGB_Color&)
&&&&FillRect&ColorHDC,&Rct,&hBrush
&&&&FrameRect&ColorHDC,&Rct,&hBrush1
&&&&DeleteObject&hBrush
&&&&DeleteObject&hBrush1
Private&Function&UserGetColor(ByVal&hwndOwner&As&Long,&ByVal&ColorInit&As&Long)&As&Long
&&&&Dim&Tcc&As&TCHOOSECOLOR
&&&&Dim&Colors(16)&As&Long
&&&&With&Tcc
&&&&&&&&'.hInstance&=&App.hInstance
&&&&&&&&.hwndOwner&=&hwndOwner
&&&&&&&&.lStructSize&=&LenB(Tcc)
&&&&&&&&.rgbResult&=&ColorInit
&&&&&&&&.flags&=&CC_RGBINIT&Or&CC_FULLOPEN
&&&&&&&&.lpCustColors&=&VarPtr(Colors(0))
&&&&End&With
&&&&ChooseColor&Tcc
&&&&UserGetColor&=&Tcc.rgbResult
End&Function
Private&Function&GetWndProcAddress(ByVal&SinceCount&As&Long)&As&Long
&&&&Dim&mePtr&As&Long
&&&&Dim&jmpAddress&As&Long
&&&&mePtr&=&ObjPtr(Me)
&&&&CopyMemory&jmpAddress,&ByVal&mePtr,&4
&&&&CopyMemory&jmpAddress,&ByVal&jmpAddress&+&(SinceCount&-&1)&*&4&+&&H1C,&4
&&&&ReDim&LinkProc(10)
&&&&LinkProc(0)&=&&H83EC8B55
&&&&LinkProc(1)&=&&HFC8B14EC
&&&&LinkProc(2)&=&&H56FC758D
&&&&LinkProc(3)&=&&H3308758D
&&&&LinkProc(4)&=&&HFC04B1C9
&&&&LinkProc(5)&=&&HFF68A5F3
&&&&LinkProc(6)&=&&HB8FFFFFF
&&&&LinkProc(7)&=&&HFFFFFFFF
&&&&LinkProc(8)&=&&H48BD0FF
&&&&LinkProc(9)&=&&H10C2C924
&&&&CopyMemory&ByVal&VarPtr(LinkProc(5))&+&3,&mePtr,&4
&&&&CopyMemory&ByVal&VarPtr(LinkProc(7)),&jmpAddress,&4
&&&&GetWndProcAddress&=&VarPtr(LinkProc(0))
&&&&VirtualProtect&ByVal&VarPtr(LinkProc(0)),&44&,&&H40,&mePtr
End&Function
Private&Sub&Class_Initialize()
&&&&PG.DefaultColor(0).ColorName&=&&默认&
&&&&PG.DefaultColor(1).ColorName&=&&自定义&
&&&&PG.DefaultColor(2).ColorName&=&&黑色&:&PG.DefaultColor(2).ColorRGB&=&0&
&&&&PG.DefaultColor(3).ColorName&=&&深红色&:&PG.DefaultColor(3).ColorRGB&=&&H80&&'&&H800000
&&&&PG.DefaultColor(4).ColorName&=&&绿色&:&PG.DefaultColor(4).ColorRGB&=&&H8000&
&&&&PG.DefaultColor(5).ColorName&=&&橄榄色&:&PG.DefaultColor(5).ColorRGB&=&&H8080&&'
&&&&PG.DefaultColor(6).ColorName&=&&藏青色&:&PG.DefaultColor(6).ColorRGB&=&&H800000&'&&H80&
&&&&PG.DefaultColor(7).ColorName&=&&紫色&:&PG.DefaultColor(7).ColorRGB&=&&H800080
&&&&PG.DefaultColor(8).ColorName&=&&绿蓝&:&PG.DefaultColor(8).ColorRGB&=&&H808000&'&H8080&
&&&&PG.DefaultColor(9).ColorName&=&&灰色&:&PG.DefaultColor(9).ColorRGB&=&&H808080
&&&&PG.DefaultColor(10).ColorName&=&&银白色&:&PG.DefaultColor(10).ColorRGB&=&&HC0C0C0
&&&&PG.DefaultColor(11).ColorName&=&&红色&:&PG.DefaultColor(11).ColorRGB&=&&HFF&
&&&&PG.DefaultColor(12).ColorName&=&&亮绿色&:&PG.DefaultColor(12).ColorRGB&=&&HFF00&
&&&&PG.DefaultColor(13).ColorName&=&&黄色&:&PG.DefaultColor(13).ColorRGB&=&&HFFFF&
&&&&PG.DefaultColor(14).ColorName&=&&蓝色&:&PG.DefaultColor(14).ColorRGB&=&&HFF0000
&&&&PG.DefaultColor(15).ColorName&=&&紫红色&:&PG.DefaultColor(15).ColorRGB&=&&HFF00FF
&&&&PG.DefaultColor(16).ColorName&=&&兰色&:&PG.DefaultColor(16).ColorRGB&=&&HFFFF00
&&&&PG.DefaultColor(17).ColorName&=&&白色&:&PG.DefaultColor(17).ColorRGB&=&&HFFFFFF
&&&&Dim&nHDC&As&Long,&hBitmap&As&Long,&hBursh&As&Long
&&&&Dim&i&As&Long,&Rct&As&RECT
&&&&Dim&hBrush1&As&Long
&&&&nHDC&=&GetDC(0&)
&&&&SetRect&Rct,&0&,&0&,&12&,&12&
&&&&hBrush1&=&CreateSolidBrush(0&)
&&&&For&i&=&2&To&17
&&&&&&&&PG.DefaultColor(i).ColorHDC&=&CreateCompatibleDC(nHDC)
&&&&&&&&hBitmap&=&CreateCompatibleBitmap(nHDC,&25&,&12&)
&&&&&&&&SelectObject&PG.DefaultColor(i).ColorHDC,&hBitmap
&&&&&&&&DeleteObject&hBitmap
&&&&&&&&hBursh&=&CreateSolidBrush(PG.DefaultColor(i).ColorRGB)
&&&&&&&&FillRect&PG.DefaultColor(i).ColorHDC,&Rct,&hBursh
&&&&&&&&FrameRect&PG.DefaultColor(i).ColorHDC,&Rct,&hBrush1
&&&&&&&&DeleteObject&ByVal&hBursh
&&&&PG.DefaultColor(0).ColorHDC&=&CreateCompatibleDC(nHDC)
&&&&hBitmap&=&CreateCompatibleBitmap(nHDC,&12&,&12&)
&&&&SelectObject&PG.DefaultColor(0).ColorHDC,&hBitmap
&&&&DeleteObject&hBitmap
&&&&PG.DefaultColor(1).ColorHDC&=&CreateCompatibleDC(nHDC)
&&&&hBitmap&=&CreateCompatibleBitmap(nHDC,&12&,&12&)
&&&&SelectObject&PG.DefaultColor(1).ColorHDC,&hBitmap
&&&&DeleteObject&hBitmap
&&&&DeleteObject&hBrush1
&&&&ReleaseDC&0&,&nHDC
&&&&PG.n_hBurshNor&=&CreateSolidBrush(&HFFFFFF)
&&&&PG.n_hBurshSel&=&GetSysColorBrush(COLOR_HIGHLIGHT)
*******FORM代码：****************************************************
Option&Explicit
Public&WithEvents&ccBox1&As&ColorCombox
Private&Sub&ccBox1_ItemClick(ByVal&RGBColor&As&Long)
&&&&‘p1.BackColor&=&RGBColor
Private&Sub&UserForm_Initialize()
&&&&Dim&hWnd&As&Long
&&&&Set&ccBox1&=&New&ColorCombox
&&&&'ccBox1.CreateColorComboBox&hWnd,&l.Left,&l.Top,&l.Width,&9527&
&&&&hWnd&=&FindWindow(vbNullString,&Form.Caption)
&&&&&ccBox1.CreateColorComboBox&hWnd,&20,&35,&100
&&&&&ccBox1.ColorSelected&=&vbRed
推荐解决方案
人工帮顶,每天回帖即可获得10分可用分
其他解决方案
这么多代码，错误的只有一两处，你编译都通过了吗？
那里有错误请指出。
版主帮帮忙啊
确实。。。&api的声明一个都没添加，因为我用的win.tlb库...
你好，谢谢。你写的这个很好用。我想用到EXCEL里做控件。你能不能帮我改改。能在EXCEL里使用。
赞助商广告输出图形文件使用您的打印代码_普通图形技术_多媒体_或代码
| 文章 >> 多媒体 >> 普通图形技术
输出图形文件使用您的打印代码
{S0}简介你想您的应用程序保存到不同的图形文件格式支持吗？只要你有实施"打印预览"，它比你想象的要容易。这是一个小文章，周围的GDI Image.Save方法。使用代码使用代码再简单不过了。只需添加PrintControllerFile.cs文件到您的项目，并使用它像这样:（PrintDocument的DOC =新MyPrintDocument（... ...））{
的imageformat格式= ImageFormat.J
浮法规模= 1F;
长期的质量= 75L;
字符串输出="O;
PrintController控制器=
新PrintControllerFile（格式，规模，质量，产量）;
doc.PrintController =
新PrintControllerWithStatusDialog（控制器，"E）;
doc.Print（）;}的PrintControllerFile构造函数的参数是:格式:在的imageformat类的静态的格式之一。规模:一个简单的缩放比例来控制输出的大小。质量:只有JPEG编码器使用。默认为75。输出:输出文件的基础文件路径。 ET瞧！输出的图形文件的集合，每一页。它是如何工作基本上，PrintControllerFile使用PreviewPrintController生成图元文件，然后保存这些输出。这种方法的优势，输出总是会在打印预览。，也节省了我们大量的工作。如果你PreviewPrintController在反射看，你会发现，它设置了每个页面使用各种GDI方法的Graphics对象。我们希望我们的输出是相同的打印预览，所以让PreviewPrintController做好这项工作很有意义。所以PrintControllerFile从PreviewPrintController派生，并覆盖保存每一页的OnEndPage方法，因为它是生成。我可以让PreviewPrintController产生的所有网页，然后将其保存，但我想尽快，因为它是生成的，如果取消打印，那么你得到的输出，point.internal类PrintControllerFile的每一页保存: PreviewPrintController{
公共覆盖无效的OnEndPage（PrintDocument的文件，PrintPageEventArgs的发送）
; base.OnEndPage（文件，E）;
/ /获取当前的Metafile
PreviewPageInfo [] PPIA = GetPreviewPageInfo（）;
PreviewPageInfo PPI = PPIA [ppia.Length - 1];
图片形象= ppi.I
_Metafile =（图元文件）的形象;
如果（_Format == ImageFormat.Emf） 
{_Metafile.Save（PagePath，_Format）;返回;}
如果（_Format == ImageFormat.Wmf）&
{_Metafile.Save（PagePath，_Format）;返回;}
SaveViaBitmap（文件，E）;&
... ...}为增强型图元文件和Windows图元文件格式的输出保存为图元文件的实例上调用所需的格式保存容易。然而，这种方法不工作的其他图形格式，因为你没有对输出的控制。例如，一个标准的页面保存为位图超过100MB大小的文件结果。显然，这是没有什么是必需的。解决方案是创建一个具有所需属性的位图图像，发挥到它的Metafile，然后保存位图。这给了我们，我们需要对输出的控制。保护无效SaveViaBitmap（PrintDocument的文件，发送PrintPageEventArgs的）
INT宽度= e.PageBounds.W 
INT高度= e.PageBounds.H
使用（位图位图=新的Bitmap（（INT）（宽* _Scale），
（INT）（高* _Scale）））
使用（图形图形= Graphics.FromImage（位图））
graphics.Clear（Color.White）;
（_Scale = 1）graphics.ScaleTransform（_Scale，_Scale）;
逐点=新的点（0，0）;
Graphics.EnumerateMetafileProc回调=
新Graphics.EnumerateMetafileProc（PlayRecord）;
graphics.EnumerateMetafile（_Metafile，点，回调）;
保存（位图）;
60;}我需要设置Bitmap对象的唯一参数是一个尺度参数。输出的大小设置乘以尺度参数PrintPageEventArgs的PageBounds。事实上，你通常要输出到标准尺寸，但规模从约0.5至2.0的值可能是有用的的。如果一个规模设置，然后一个ScaleTransform应用于图形对象，所以你的打印代码没有被修改。从位图创建一个图形对象，并把它玩的图元文件，然后不仅仅是锅炉板的东西。保存所需的格式的位图是那么简单，除了为JPEG格式，这就要求质量参数设置编码器。此值必须在范围从0（最高压缩，质量最低），100（最低的压缩，最高质量）。默认值似乎是大约75。保护无效保存（位图位图）
如果（_Format == ImageFormat.Jpeg）
EncoderParameters参数=新EncoderParameters（1）;
EncoderParameter参数=
新EncoderParameter（Encoder.Quality，_quality）;
parameters.Param [0] =参数;
bitmap.Save（PagePath，_Codec，参数）;
bitmap.Save（PagePath，_Format）;
}的主要文件，PrintControllerFile.cs，只有约200线长，是相当不言自明的。看看，如果你有兴趣。兴趣点 Image.Save方法是非常强大的，但不能用来直接上图元文件。创建一个中介位图，然后保存该的，为我们提供了我们需要对输出的控制。将是很好，如果有更多的控制，但如果你只是想产生的图形文件，你可以在一个图像编辑器修改，那么这只是工作。历史 日 - 版本1.0
关于作者：
中国我是一名编程爱好者，谢谢为我们提供一个学习和分享的平台。有什么问题。可以就本内容回复，我看到时。会尽量回复的。
评论会员：
时间：我目前在Windows窗体上的项目，保存一个页面作为图像的PrintDocument工作。此代码，这正是我需要为我的项目。但是，我不熟悉C＃编程，不知道如何把它转换为VB.Net。是否有任何与此类似:在VB.Net
|尼克巴特勒评论会员：
时间：嗨理查德，我很高兴你喜欢它。你有两种选择:1）在VB中的反射大会和复制生成的源（可能不完全正确）。2）把我的C＃在一个单独的程序，并添加一个引用到它。心连心尼克----------------------------------{BR}是优秀的相互imgsrc=/upimg/_04_27_07_1.gif条例草案"塞登评论会员：
时间：这个小金块后。TiffManager的PDF库，这个例子是指文件可以"印"文件，而不需要安装一个打印驱动程序。精灵王评论会员：
时间：我目前在一个项目的工作转换网页，图像WebBrowser控件可以被称为打印，因此，此功能将我的项目上工作令人印象深刻的！不过，我是新手程序员和发展我的项目使用VB.netimgsrc=/upimg/_04_27_07_2.gif是否有任何与此类似，但在VB.net脚本？维诺德Moorkkan评论会员：
时间：大家好，我的工作与MFC（VC6）......现在我有一个应用程序，因为我想改变列表控件的头文字大小，请帮助我，如果你有一些示例代码也发送。预先感谢维诺德 bhalmadhukar评论会员：
时间：亲爱的主席先生这是非常好的解决方案。但我想创造multpageTIFF文件这项计划创造超过1TIFF文件如果文本文件包含更多的数据。我也想转换成tif文件是可能的。感谢问候Madhukar徐子淇格赖姆斯评论会员：
时间：，如果您尝试保存使用的imageformatWMF或EMF图元文件，Image.Save方法将实际使用ImageFormat.PNG。这是无用的，因为使用EMF/WMF的原因是希望尽量减少输出文件的大小。浪费几个小时的测试后，我发现，这种行为是由设计:imgsrc=/upimg/_04_27_06_0.jpg任何关于如何创建一个真正的EMF/WMF文件的想法吗？达格哈马舍尔豪根 | jjohn2005:我有这个问题，在CodeProject上找到答案。有在看的文章"如何使用GDI，在WMF，EXIF或EMF格式保存图像"，网址:
/vcpp/gdiplus/saveasemfexiwmf.asp
凯茜格赖姆斯评论会员：
时间：Pranfasdfasdf:​​|您好，我有一个问题，在印刷时，我画的一个控制。它显示在屏幕上正确。但我打印时，控制会出现微小的。我使用下面的代码块:私人无效PaintCtrl（CTRL控制，图形图形的RectangleFrectF）{位图位图=NULL;作为PictureBox的PictureBox的PIC=CTRL;（PIC！=NULL）{（pic.Image！=NULL）{位图=pic.Image作为位图;}}（位图==NULL）{位图=新的Bitmap（CTRL的宽度，CTRL高度。）win32.CaptureWindow（CTRL，楼盘点阵图）;}//使rectF位图的大小。的PointF[]点={新的PointF（rectF.Location.X，rectF.Location.Y）}graphics.TransformPoints（CoordinateSpace.Device，CoordinateSpace.Page，点）;点[0]X=bitmap.W点[0]:Y=bitmap.Hgraphics.TransformPoints（CoordinateSpace.Page，CoordinateSpace.Device，分）;bMapRect的RectangleF=新的RectangleF（rectF.Location，rectF.Size）bMapRect.Height点[0]Y-rectF.TbMapRect.Width=[0点]X-rectF.Lgraphics.DrawImage（位图，bMapRect）}任何一个可以帮我解决它？在此先感谢！jjohn约翰J Me2d评论会员：
时间：DOCPrintDocument的=新MyPrintDocument（......）MyPrintDocument是什么？是一个用户定义类？然后它是哪里？PLZ尽快答复。大屠杀评论会员：
时间：非常感谢u-它解决了我的许多问题！罗伯特罗德评论会员：
时间：我可以保存PCX格式？尼古拉斯巴特勒评论会员：
时间：...一个有可能成为一个真正的痛苦我的问题。你的代码的伟大工程。我永远也不会来这像你一样的想法。干得好！ Clevedon_Peanut评论会员：
时间：谢谢你-我很高兴你喜欢它imgsrc=/upimg/_04_27_07_1.gif----------------------------{BR}优秀对方imgsrc=/upimg/_04_27_07_1.gif
&桌面&网页开发&移动开发&数据库&多媒体&编程语言&平台，框架和库&编程通用&图形/设计&开发周期&一般阅读&第三方产品&作者资源&其他
快速解答标签
价值作最多拒绝访问 |
| 百度云加速
请打开cookies.
此网站 () 的管理员禁止了您的访问。原因是您的访问包含了非浏览器特征(3bcb-ua98).
重新安装浏览器，或使用别的浏览器将组合框中的各选项输出到C:\123.txt中我用的是:
Private Sub Command1_Click()
Dim i As Integer
Open "c:\123.txt" For Output As #1
For i = 0 To Combo1.ListC
将组合框中的各选项输出到C:\123.txt中我用的是:
Private Sub Command1_Click()
Dim i As Integer
Open "c:\123.txt" For Output As #1
For i = 0 To Combo1.ListCount
Print #1, Combo1.List(i)
Next i
Close #1
End Sub
那当程序启动时,将c:\123.txt中每一行的内容当做每一选项读入到组合框中,该怎么写?
Private Sub Form_Load()
Dim i As Integer
Dim str1 As String
Open "c:\boot.ini" For Input As #1
While Not EOF(1)
Line Input #1, str1
Combo1.AddItem str1
利用Combobox和Listbox的text属性完成。例如代码为：Msgbox Combo1.text或者Msgbox List1.text要想让这段代码完成...
在代码增加一句
combobox1.clear(放在你添加选项内容的代码前面)
if combobox1.value=? then
其实是什么数据类型都无所谓，只要在用的时候，转换就可以了。
一般情况下都是用字符串类型，因为字符串类型不参与运算。也可以用条件选择做这样的题，
这个很难吗？ 哪里不会？提出技术问题。总不能让别人从头写完吧
1、文件好几种
Open "C:\123.txt" For Input AS #1
Input那里还可以是Output、Random、Binary、Append...
答: 胎停了胸部还涨吗？？我对这个不是特别了解，有没有妈妈对这个比较了解的教教我好吗？
答: cisco网络技术是一个为CTO、IT技术经理、网络工程师、安全工程师、数据库工程师、网络管理员、系统工程师、开发工程师、项目管理人员等IT技术人员搭建的有关先...
答: 我想学网页制作、网络维护、电脑维护
可有比较好的学习网站或者论坛推选一下？
大家还关注
确定举报此问题
举报原因(必选)：
广告或垃圾信息
激进时政或意识形态话题
不雅词句或人身攻击
侵犯他人隐私
其它违法和不良信息
报告，这不是个问题
报告原因(必选)：
这不是个问题
这个问题分类似乎错了
这个不是我熟悉的地区
相关问答：123456789101112131415
