Vb.net 有可能吗。？

关于这件事，我查了很多。但没有完全的解决办法。 在我的表格中，我想打印文档，直到包含在 我的打印文档页面（避免浪费纸张，而不是打印整个页面）。 同时，我应该只通过一页[即，我想说纸张高度为 只要我的数据存在。因此不可能进入下一页]

使用的方法：

1。使用打印文档：

在OnBeginPrint事件中

  Dim xCustomSize As New PaperSize("Custom",820, 100)
        xCustomSize.PaperName = PaperKind.Custom

        With Me.DefaultPageSettings
            .PaperSize = xCustomSize
        End With

2。不使用打印文档：

我遵循下面的参考

在方法2中，我没有初始化纸张高度，但默认高度为 某物如果数据超过，则在下一页中继续

我正在使用：

 Microsoft Visual Studio 2008
  Printer : Roll Paper Printer (Model : Bar Code Printer TT033-50)

---

任何人都可以帮助解决此问题。

最接近请求的实现可能是执行以下操作之一

A

输入（并存储/跟踪）卷的长度1更换时，重新打印收据（由于审核、撕裂或堵塞，或“墨水”用完等，需要B）和/或纸张“手动”提前（可能只是在加载时）

跟踪您打印了多少磁带2

当下一张要打印的收据超过磁带剩余量时，请用户加载更多磁带

B

• 实现N个事务的内存存储，以便您可以重新打印它们。

最接近vb.net的“as Any”是“as Object”。vb.net不再具有变量类型

第1页，共

---

2.在我使用vb.net编码的HansPassant中，每英寸有一个“pt（s）”。。我对你发送的链接中的编码有一些疑问。。在下面的编码私有声明函数WritePrinter Lib“winspool.drv”中，vb.net中“any”的等效数据类型是什么（ByVal\hPrinter尽可能长，pBuf尽可能长，ByVal cdBuf尽可能长，pcwrited尽可能长）Long@HansPassant我已将“any”改为“object”。但是它不起作用。它说这种编码适用于visual basic版本。。那么我可以在vb.net中使用这种编码吗？@HansPassant我也使用了上面的链接编码。。此处未打印文本文档。如果打开打印机属性，则该文档将显示打印状态。。但我想什么都没有。你说的纸张质量。这里我有大量的磁带。所以问题不在磁带上。我认为你理解错了问题。请在打印的每一行上使用点（例如，12磅Arial将打印1/6英寸，无填充）。您必须根据需要调整前导。要计算现有数据的高度以避免浪费吗？不管你使用的字体大小是多少，你都可以计算你使用的英寸数（或英寸的分数）。你能给一些编码来检查一下吗？我不能告诉你需要打印什么。只有如何计算它将使用多少空间。12点处的X#行数=X/6英寸的纸张。