PDF是可移动的文档格式，这种格式可以在任何操作系统上运行，它将成为在文档移植的标准默认格式。
现在的问题是VB6中并没有标准的PDF函数。因此过去想要在VB中创建PDF是非常困难的事。希望读完本教程你会明白创建PDF是件很容易的事，并能做出来。
PDF具有很复杂的数据格式。因此你有时不得不去购卖第三方的控件并花时间来熟悉PDF格式才能访问PDF。本教程将教会你如何不利用第三方控件去创建一个简单的PDF。
首先，你必须要下载mjwPDF类和PDF字体。这个类可以让你简单地创建PDF文件，复制类和字体文件夹到你的VB工程文件夹中。
接下来添加类到工程中，工程\添加，选择mjwPDF类。
然后添加一个按钮到你的窗体中，双击按钮，添加如下事件代码：
Private Sub Command1_Click()
    ' 使用mjwPDF 类创建对象
    Dim objPDF As New mjwPDF
   
    ' 设置 PDF 标题和文件名

    objPDF.PDFTitle = "Test PDF Document"
    objPDF.PDFFileName = App.Path & "\test.pdf"
   
    ' 告诉PDF对象字体的位置
    objPDF.PDFLoadAfm = App.Path & "\Fonts"
   
    ' 创建PDF文件后打开
    objPDF.PDFView = True
   
    ' 开始创建PDF文档
    objPDF.PDFBeginDoc
        ' 设置字体类型，大小，样式
        objPDF.PDFSetFont FONT_ARIAL, 15, FONT_BOLD
       
        ' 设置字体颜色
        objPDF.PDFSetTextColor = vbBlue
       
        ' 设置需要在PDF中的文本
        objPDF.PDFTextOut _
            "Hello, World! From mjwPDF (www.vbkbase.com)"
   
    ' 结束PDF创建(真正写入文件)
    objPDF.PDFEndDoc
End Sub

我们应当知道这些代码是如何工作的。我在每一部分加上了注释。首先创建mjwPDF类对象，我们给PDF文档设置一个标题，这些将在查看属性时显示出来。接下来设置文档的存放位置，我们只是把它保存为当前目录的test.pdf。然后我们告诉它字体文件夹的位置，这就是为什么要复制字体文件夹的原因。这个类在需要时使用这些信息来添加字体到文件。

下一行（13行）是可选的，除非明确指出，我们的PDF文件在完成写入时将是打开的，很显然很多程序中你只是想简单地保存文档并不想让用户看到。如果是这样可以把本属性设置为false.

从16行开始是教程中的重点。PDF文档的创建是一个简单的按步骤的处理。首先我们要决定我们想要哪种字体，字体多大以及是否需要特别的字体样式（像加粗和倾斜）。下一步我们设置字体的颜色。最后我们调用PDFTextOut来执行写入文本到PDF文件。

注意：我刚才说写入PDF文件，但其实它是简单地保存在了一个缓冲区中，直到你调用了PDFEenDoc.这样做的目的是在第7行中指定的所有缓冲区已经确定地保存在文件中。因此，从我们设置PDFView属性为true时，PDF文档就会自动打开，你会看到一个简单的具有我们的文本的文件已经添加上了。

PDF类和字体下载