Ausgabe einer kette von zahlen

[chas]

hi leute, ich möchte in einer for schleifen ganz einfach hochzählen bis zu einem endwert und dann die schleife beenden.
das ist alles kein problem und er zählt auch richtig, aber ich würde die Zahlen gerne nacheinander ausgeben -> 9, 10, 11, 12, 13, 14... <- so in etwa, wie ich die TextBox einstellen muss, damit sie einen Zeilenumbruch macht, weiß ich schon, aber ich bekomm das mit der ausgabe nicht hin

gruß
chas

[ARCUS_L]

Hi !
Weis zwar nicht ob ich dich richtig verstanden habe. Aber ich mach mal ein bsp:

dim x as integer

For x = 1 To 10

If x = 5 Then Exit For

MsgBox (x)

Next x

[chas]

das sieht schonmal gut aus, aber ich will es in eine TextBox ausgeben nicht in eine MsgBox

[ARCUS_L]

Hi !

Dim x as integer

For x = 1 To 10

If x = 5 Then Exit For

Textbox1.Text = Textbox1.Text + x + ","

Next x

[chas]

For x = start To endwert Step 1
            
TextBox2.Text = TextBox2.Text + x + ","

Next x

es will irgendwie nicht funktionieren....
sowohl x, start als auch endwert sind als integer deklariert.

[ARCUS_L]

• es will irgendwie nicht funktionieren....
  sowohl x, start als auch endwert sind als integer deklariert.

Was will nicht funktionieren ?

Hast du s start und endwert auch Werte zugewiesen ?
zb:
start = 1
endwert = 10

[chas]

start ist constant auf 1 und endwert kann man eingeben

[ARCUS_L]

Hi !

sorry mein Fehler !!!

Kommte ein Fehler Typen unverträglich ?

Du musst integer in String wandeln (Cstr)

Dim x As Integer
Dim ende As Integer
ende = CInt(TextBox1.Text)

For x = 1 To ende

If x = 5 Then Exit For

TextBox2.Text = TextBox2.Text + CStr(x) + ","

Next x

[chas]

Danke, läuft einwandfrei...

war echt ne schnelle hilfe