主题：我做了一个打印预览，预览是出来了，可是预览的确实一片空白，请问这是为什么啊？

我做了一个打印预览，预览是出来了，可是预览的确实一片空白，请问这是为什么啊？代码如下：

If Functions.Execute("ShouQuan","A-材料出库单","7-打印")   Then
    Dim Book As New XLS.Book(ProjectPath & "Attachments\材料出库单.xls")
    Dim fl As String = ProjectPath & "Reports\材料出库单.xls"
    Book.Build() '生成细节区
    Book.Save(fl) '保存工作簿
    Dim doc As New PrintDoc
    doc.Preview()
Else
    Messagebox.Show("对不起,你没有操作权限")
End If

请大家帮我看一下