avevo usato anche questo ma sbagliavo qualcosa..
codice:
 Dim inputString As String = Codice_barraTextBox.Text

                Dim inputString2 As String = DescrizioneTextBox.Text

                Dim inputString3 As String = PrezzoVenditaTextBox.Text

                Dim inputString4 As String = OffertaTextBox.Text
                Dim par As Char
                par = Convert.ToChar(" ") ' INDICA COSA METTERE SE NON SI ARRIVA ALLA LUNGHEZZA SPECIFIATA DEL "PADRIGHT
                FileOpen(1, (Application.StartupPath + "\" + "Frontalini.eti"), OpenMode.Append)
                Print(1, inputString.Substring(0, 13), SPC(8))
                Print(1, inputString2.Substring(21, 51))
                Print(1, inputString3.Substring(51, 54), SPC(6))
                Print(1, inputString4, vbCrLf)

                FileClose(1)
mi da l'errore: Index e length devono fare riferimento a una posizione nella stringa. Nome parametro: length
dove sbaglio ??