Textbox schreibt ascii zeichen

Computer: Software & Programmierung Visual Basic
#1

hey!
ich versuche aus einer ini datei den inhalt in einer textbox in einer userform in excel zu lesen. und zwar folgendermaßen:

Private Sub UserForm_Activate()
Open DieseArbeitsmappe.ini$ For Input As 1
Do While Not EOF(1)
Line Input #1, mystring$
TextBox1.Value = TextBox1.Value + Chr$(13) + Chr$(10) + mystring$
Loop
Close #1
End Sub

das problem ist nur, dass er den zeilensprung als zeichendarstellt, aber nicht macht.
was mache ich falsch?
vielen dank im voraus

grüße
johannes

#2

Hi Johannes,

Open DieseArbeitsmappe.ini$ For Input As 1

wa mir neu daß dies so geht, dachte man müßte da immer „#1“ benutzen.

das problem ist nur, dass er den zeilensprung als
zeichendarstellt, aber nicht macht.

Wenn im Editor die UF sichtbar ist, drücke F4, dann siehst du das Eigenschaftsfenster, markiere die TB und setze „Multiline“ auf True.

Gruß
Reinhard

#3

danke, das problem ist behoben