以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- PrintDoc保存为pdf发生错误时,进度框如何关闭? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185655) |
-- 作者:xluoping -- 发布时间:2023/3/8 12:46:00 -- PrintDoc保存为pdf发生错误时,进度框如何关闭? Dim doc As New PrintDoc() \'定义一个报表 ......... .......... ........... Dim fl As String = file & "样品二维码000" & ".pdf" Try doc.SavePDF(fl) \'保存为PDF文件 Dim Proc As New Process \'打开PDF文件 Proc.File = file Proc.Start() Proc.File = fl Proc.Start() PopMessage("请选择40×30mm的标签纸打印,个别打印机需自定义40×30.5mm标签纸!","提示", PopIconEnum.OK,8) Catch ex As Exception MessageBox.Show("文件已经被其它程序打开,无法保存!","提示",MessageBoxButtons.OK) End Try 发生错误时,生成进度...正在保存 关不掉
|
-- 作者:有点蓝 -- 发布时间:2023/3/8 13:19:00 -- 先关闭弹出的MessageBox |
-- 作者:xluoping -- 发布时间:2023/3/8 13:36:00 -- 关闭了MessageBox,但生成进度...正在保存 没有控制按钮 关不掉 |
-- 作者:有点蓝 -- 发布时间:2023/3/8 13:39:00 -- 这个没有办法。出什么错,提示什么错误? |
-- 作者:xluoping -- 发布时间:2023/3/8 13:59:00 -- Dim fl As String = file & "样品二维码000" & ".pdf" 前面已生成过 fl ,打开未关闭,就报错
|
-- 作者:有点蓝 -- 发布时间:2023/3/8 14:07:00 -- 试试:http://www.foxtable.com/webhelp/topics/2126.htm 或者
|