codice:
 
Dim inputString As String = Codice_barraTextBox.Text

                Dim inputString2 As String = DescrizioneTextBox.Text

                Dim inputString3 As String = PrezzoVenditaTextBox.Text

                Dim inputString4 As String = PrezzoVenditaTextBox.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).PadRight(13), SPC(8)) 'aggiunge tanti caratteri a destra quanto ne sono specificati
                Print(1, inputString2.Substring(22, 51).PadRight(51))
                Print(1, inputString3.Substring(51, 54).PadRight(54), SPC(6))
                Print(1, inputString4, vbCrLf)
                FileClose(1)
sempre stesso errore.. mi sa che non ho capito cosa volessi dire.. la cosa strana è che mi evidenzia solo inputstring2 mentre il primo lo passa..