主题：打印不出数据

我点击“进账单修改”窗体中的"打印"按钮，打印机有反应，但是“进账单”中所有录入数据都不能打印，不知什么原因？请指教，谢谢！

经检查，所有控件都不在控件里面，请帮看看，谢谢！！

容器里

请帮看看，谢谢！！

附件不好上传，啥原因？
谢谢!!

我点击“进账单修改”窗体中的"打印"按钮，打印机有反应，但是“进账单”中所有录入数据都不能打印，不知什么原因？请指教，谢谢！

https://pan.baidu.com/s/1oPeIMs0dhO85UBZQmorHWQ

“进账单修改”窗体中的“打印”按钮的代码： Forms("进账单维护B").open Forms("进账单维护B").Controls("打印").PerformClick Forms("进账单维护B").close   预览后有数据，点击“打印”按钮后，打印机有反应，但是“进账单”中所有录入数据都不能打印打印，不知什么原因？请指教，谢谢！

"进账单维护B"窗体的“打印”按钮的代码为：

If Forms("进账单修改").Opened = True Then
Dim p As WinForm.ComboBox = Forms("进账单修改").Controls("指定打印机")
    If p.Value <> "默认" Then
        Dim doc As PrintDoc = e.Form.GernatePrintDoc()
        Doc.PrinterName = p.value
        Doc.Print
    End If
Else
Dim p As WinForm.ComboBox = Forms("进账单新增").Controls("指定打印机")
    If p.Value <> "默认" Then
        Dim doc As PrintDoc = e.Form.GernatePrintDoc()
        Doc.PrinterName = p.value
        Doc.Print
    End If
End If

https://pan.baidu.com/s/1oPeIMs0dhO85UBZQmorHWQ