
正文
vbnet打开pdf visual basicnet pdf
提示:扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
vb.net如何将excel指定的sheet生成pdf 我里面有sheet1~5,只想将sheeet2、3转成PDF,并且转完后打开预览?
你可以使用Spire.Xls来实现。Spire.Xls可以让你方便地将excel中指定的sheet导出为pdf文件,并且支持在导出时指定sheet2和sheet3。同样可以使用该框架来快速预览生成的pdf文件。
相关问答
Q1: 求解:(VB6.0)如何在程序中调用打开PDF文件?
下面的代码是调用系统默认程序打开PDF,注意修改文件路径D:\help.pdf
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOWNORMAL = 1
Private Sub Command1_Click()
Dim result
result = ShellExecute(0, vbNullString, "D:\help.pdf", vbNullString, vbNullString, SW_SHOWNORMAL)
If result = 32 Then
MsgBox "打开失败!", vbOKOnly + vbCritical, "错误:", 0
End If
End Sub
Q2: 请问VB如何打开pdf文件并读取其内容?
分类: 电脑/网络 操作系统/系统故障
问题描述:
请问VB如何打开pdf文件并读取其内容?我要用VB读取PDF的部分文件内容到变量中,以便给另一个程序使用.谢谢.
解析:
vbgood/viewthread.php?tid=36133
book.21/info/vb/api/4057
参考一下吧
Q3: vb中,怎么打开一个PDF文件,仅仅是打开
Shell函数是VB中的内部函数,它负责执行一个可执行文件,返回一个Variant(Double),如果成功的话,代表这个程序的进程ID,若不成功,则会返回0。Shell的语法:Shell(PathName[,WindowStyle])。PathName为必需参数。类型为String,它指出了要执行的程序名,以及任何需要的参数或命令行变量,也可以包括路径名。WindowStyle为可选参数。Integer类型,指定在程序运行时窗口的样式。WindowStyle有以下这些值。常量值描述VbHide0窗口被隐藏,且焦点会移到隐式窗口。VbNormalFocus1窗口具有焦点,且会还原到它原来的大小和位置。VbMinimizedFocus2窗口会以一个具有焦点的图标来显示(缺省值)。VbMaximizedFocus3窗口是一个具有焦点的最大化窗口。VbNormalNoFocus4窗口会被还原到最近使用的大小和位置,而当前活动的窗口仍然保持活动。VbMinimizedNoFocus6窗口会以一个图标来显示,而当前活动的窗口仍然保持活动SHELL函数的第一个参数是可以设定为相对路径的。举个例子,在程序同一目录下有个文件example.exe:PrivateSubForm_Load()DimaAsIntegera=Shell(App.Path"\example.exe",vbNormalFocus)EndSub打开一个example.exe文件在VB中SHELL函数的使用仅限制于*.exe*.com*.bat等类型的文件。对于你的问题,可以写成a=shell("E:\Keil\UV4\Uv4.exe",3)
Q4: vb.net 导出PDF
利用DataWindow.net在 vb.net 下导出PDF格式文件
利用datawindow.net,导出PDF文件,实现前提:
1.安装Acrobat Distiller虚拟打印机,注意要用datawindow.net提供的打印驱动,在c:\program files\sybase\datawindow.net2.0\driver中,在文章最后,我会提供一个静态安装虚拟打印机的批处理文件,方便安装。
2.安装Ghostscript 7.05 ,在网上找,免费的。
3.导出PDF文件前,一要指定虚拟打印机名,其次导出格式为PDF(Export.PDF.Method=Distill!),另外还要指定 PDF.Distill.CustomPostScript=Yes。
具体代码如下:
''' summary
''' 导出文件
''' /summary
''' param name="sender"/param
''' param name="e"/param
''' remarks/remarks
Private Sub btnExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExport.Click
Try
Dim strFilename, strPrinter As String
Dim saveDg As New SaveFileDialog
strPrinter = Me.dwPrint.Describe("DataWindow.Print.PrinterName")
saveDg.FileName = Me.dwPrint.Tag.ToString
saveDg.Filter = "Pdf文件|*.pdf|Excel文件|*.xls|所有文件|*.*"
If saveDg.ShowDialog = Windows.Forms.DialogResult.OK Then
strFilename = saveDg.FileName
If strFilename.IndexOf(".pdf") 0 Then
Me.dwPrint.Modify("DataWindow.Print.PrinterName='Acrobat Distiller'")
Me.dwPrint.Modify("DataWindow.Export.PDF.Method=Distill!")
Me.dwPrint.Modify("DataWindow.Export.PDF.Distill.CustomPostScript=Yes")
Me.dwPrint.SaveAs(strFilename, Sybase.DataWindow.FileSaveAsType.Pdf, True)
ElseIf strFilename.IndexOf(".xls") 0 Then
Me.dwPrint.SaveAs(strFilename, Sybase.DataWindow.FileSaveAsType.Excel, True)
End If
Me.dwPrint.Modify("DataWindow.Print.PrinterName='" + strPrinter + "'")
MessageBox.Show("导出成功!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
Catch ex As Exception
MessageBox.Show(ex.Message, "提示", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
4 批处理文件(实现静默安装)
Q5: 急求vb.net pdf静默打印问题
你现在的默认打印机是Adobe PDF,修改一下默认打印机为你现在需要的打印机即可。
关于vbnet打开pdf和visual basicnet pdf的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。






