Leere Arrayfelder löschen

[Merlin_78]

Hi VB?

also so wie ich das verstanden habe, mußt du nur die Print-Anweisungen in der Sub CmdTeilen_Click() in If-Abfragen einbinden.

If msarray(i) <> "" Then
Print #1, msarray(i) 'CStr(List1.Text)
End If

If sarray2(1) <> "" Then
Print #1, sarray2(1) 'CStr(List1.Text)
End If

 

[VB?]

Ja logisch,
genau so was habe ich gesucht!
So werden eben nur die Arrayfelder in denen wirklich etwas drin steht übernommen
Du hast mir echt geholfen..
Danke dir