VB6 printer 报错

cuiyong35 2012-08-14 09:24:42

我用vb6写的一个小的MIS，用printer打印或者PictureBox 预览后，再打开其他串口时就提示 “下标越界”

...全文

70 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

cqq_chen 2012-08-20

打赏
举报

回复

printers.count大概、好像是这样吧

DataGridView打印控件5.3版窗口程序使用演示包含多个打印控件在窗口程序使用的实例及源代码(有C#的,也有VB的),有源代码打印控件实际的打印控件(含.NET4.0的专用打印控件) 网页中使用演示打印控件在网页中使用的演示程序(有源代码) 1、DGVPrint和VB2008Print 组件在分组打印时，可以在标题中打印当前组名（使用变量“$组名$”）； 2、对DGVPrint组件的打印参数设置界面进行了重新排版，并去掉了说明页； 3、增加了DrawTitle和DrawTitleEx函数，方便打印标题行； 4、打印DGV表格时单元格的边距完全按DGV本身的设置进行打印（原来只能按DGV的DefaultCellStyle.Padding设置的大小打印）； 5、DGVPrint组件增加了多个属性用于控制弹出的打印参数设置窗口中允许进行更改的项（请参数以EnableChange开头的属性，有9个）； 6、解决在64位操作系统下无法弹出打印对话框的问题，去掉了打印处理进度窗口中的“.NET轻松打印控件”字样； 7、彻底解决了调用Excel后（导出为excel文件）Excel进程未关闭问题； 8、多表头组件MulHeaderDataGridView具有单元格内容合并显示功能； 9、新增DrawExpression函数，结合ExpressionDrawer类可以很方便对单变量表达式进行绘图打印 10、增加了网中使用的打印控件WebPrintServer的水印打印功能和装订线打印功能 11、增加了将报表文件（you结尾的文件）和报表模板生成的报表（用EasyReport组件的GetReportString方法得到的字符串）添加到VB2008Print组件的当前打印作业中的方法（详见AddReport和AddReportByString方法） 12、删除了PrintDataGrid函数（若要打印DataGrid，请先调用ConvertDataGridToDGV函数将DataGrid转换为DataGridView再以打印DGV的形式打印）和ChartGraph图表组件（图表打印请使用功能更强大且不依赖Excel的Chartlet图表组件） 13、其他一些完善，比如对DrawTextEx函数进行了完善，解决了有时出现“同一依赖程序集的不同版本之间出现冲突”警告的问题(如果出现，这个问题也并不影响程序的编译和运行，您不用太在意），如果电脑上未安装打印机驱动，程序会给出友好提示而不是像以前一样报错，对部分帮助文件内容进行了完善（如PrintDGV等函数）。使用说明：只需要把dll引用到项目、添加打印事件 Private Sub Btn_Printer_Click(sender As System.Object, e As System.EventArgs) Handles Btn_Printer.Click '调用打印 DgVprint1.Alignment = StringAlignment.Center '表格居中 DgVprint1.MainTitle = "监控系统报表记录打印" DgVprint1.SubTitle = "苏州市华工照明科技有限公司" DgVprint1.TableHeaderLeft = "编制单位：路灯管理所" DgVprint1.TableFooterLeft = "制表：苏州市华工照明科技有限公司" DgVprint1.PrintType = VBprinter.DGVprint.mytype.GeneralPrint '在此还可以设置其他属性，当然，也可以DGVPRINT1的悔改窗口中进行设置，效果完全一样的 DgVprint1.Print(Me.DataGridView, False) End Sub 以下为导出excel方法实例： Private Sub BtnToExcel_Click(sender As System.Object, e As System.EventArgs) Handles BtnToExcel.Click 'Dim To_Excel As New To_Excel(Me.DataGridView) '方法一：导出excel Dim ToExcel As New VBprinter.DGVprint '方法二：导出excel ToExcel.ExportDGVToExcel(Me.DataGridView) ToExcel.Dispose() End Sub

公告：为响应国家净网行动，部分内容已经删除，感谢读者理解。话题：vb用printform打印不出全部窗体内容,怎么办?回答：我来告诉你标准!用数据报表设计器设计数据报表话题：VBform打印缩放的问题,想把form扩大打印到A4纸问题详情：不管怎么设置,都不管用,很郁闷~ 码如下: Printer.Zoom =回答：FORM的大小不是无大的,是不能超过屏幕分辨率的范围的。这种情况可以在form...

我是一个VB初学者，最近苦恼于VB的窗体和控件的ScaleMode问题，VB里默认的ScaleMode是twip，而往往我们希望它是pixel，虽然在属性面板里面能够将ScaleMode改为"3-Pixel"，但是我发现在程序中返回某个窗体或控件的属性时还是返回为很大的twips值，比如有一个PictureBox控件picMyPic，那么假如在程序中用另一个变量iWidth来接收控件的宽度:iWi...

在用vb.net实现选择打印机这个功能的开发过程中，遇到了问题，查了很多文章，都没有解决，最终试出来了一个。标注的地方是重点。 Dim MyProcess As New Process MyProcess.StartInfo.CreateNoWindow = False MyProcess.StartInfo.Verb = "print" ...

Visual Basic（VB）给用户提供了可视化编程环境，因其简单易学、功能强大而得到了广泛的应用。VB提供了两种实现打印的方法。一般在对打印质量要求不高的场合，或者是编程项目的早期开发过程中，可以直接使用VB窗体的Printform方法实现打印。用这种方法实现打印具有编程简单、易用并且功能强大的优点，它只需要通过一行代码，几乎能打印所有内容。实现的方法就是：首先将要打印的内容在屏幕上显示出来,

数据库(包含打印，安装，报表)

1,216

社区成员

55,954

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章