yvrej17 0 Junior Poster in Training

Hi, I just need some help in aligning 2 barcodes in just 1 line in receipt using epson standard (ESC/POS). I manage to print barcodes in all kinds of symbology but I can't align 2 barcodes in just 1 line. Please check my codings below. Thank you in advance.

Friend Function OpenPOSDrawer(ByVal jPrinterName As String) As Boolean
        Try
            Using cPrint As New RawPrinterHelper
                Dim nColF1 As Integer = 42

                cPrint.KickDrawer = Chr(29) & Chr(72) & Chr(50) 'HRI Position
                cPrint.KickDrawer = Chr(29) & Chr(255) & Chr(255) 'Horizontal & Vertical Motion Unit
                cPrint.KickDrawer = Chr(29) & Chr(102) & Chr(0) 'HRI Characters


                Dim xbHeight As String = Chr(29) & Chr(104) & Chr(39) 'Barcode Height
                Dim xbWidth As String = Chr(29) & Chr(119) & Chr(2) ' Barcode Width
                Dim xbarcode As String = TextPrint.TextLeft(Chr(29) & Chr(107) & Chr(2) & "1234567891230" & Chr(0), nColF1 / 2) ' Print Barcode
                Dim xpHeight As String = Chr(29) & Chr(104) & Chr(30) ' PLU Height
                Dim xpWidth As String = Chr(29) & Chr(119) & Chr(3) ' PLU Width
                Dim xPLU As String = TextPrint.TextLeft(Chr(29) & Chr(107) & Chr(5) & "030221" & Chr(0), nColF1 / 2) ' Print PLU
                cPrint.KickDrawer = TextPrint.TextLeft(xbHeight & xbWidth & xbarcode & xpHeight & xpWidth & xPLU, nColF1)

                '// Cut Paper
                cPrint.InputLine = Chr(29) & Chr(86) & Chr(66) & Chr(0)

                cPrint.RunPrint(jPrinterName)
            End Using
        Catch ex As Exception
        End Try
        Return True
    End Function
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.