Question

我正在寻找一种方法，我可以使用POS打印机在屏幕上打印内容（例如在RichTextBox中）。

我现在使用的方法如下：我将字符串发送到方法，然后将此字符串粘贴到RichTextBox，但文本框无法识别ESCAPE POS代码。所以我必须用其他东西替换这些代码。如果我可以将字符串（使用ESCAPE POS代码）直接打印到屏幕或文本框中会更容易。

解释我的问题的一些代码：

Dim ESC As String = Chr(&H1B)
Dim newLine = ESC + "|1lF"

printstring = "Omzet per Locatie-groep/artikel" + newLine
printstring += gTouchSettings.CompanyName + newLine
printstring += newLine
printstring += "Periode: " + Format(fromdate, "dd/MM/yyyy") + " - " +    
                    Format(todate, "dd/MM/yyyy") + newLine
printstring += newLine
printstring += "LocatieGr  Omschrijving   Aantal Ontvangen"
printstring += newLine
printstring += newLine

我可以删除换行符，我找到了解决方法。但现在我有这个布局问题：

printstring += Left(MySqlDR!description & Space(27), 27) & 
                   Right("      " &    Format(MySqlDR!quantity, "###0"), 7)
printstring += Right("      " & Format(MySqlDR!item_price, "######0.00"), 8) + 
               newLine

当我在POS打印机上打印时，这看起来很棒，但在TextBox中它很糟糕。

Answer 1

您可能希望使用String.Format，它有助于对齐字符串和设置填充等。请查看These Examples

是否可以使用POS打印机打印到屏幕上？

1 个答案: