Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Textboxes
Autor: Dell
Datum: 23.04.02 18:03
Hi Andy, das müsste wie folgt gehen: Du erstellst am Anfang eine TextBox "Text1" und gibst ihr den Index 0. Dann schreibst du an die Stelle wo die TextBoxes erstellt werden sollen folgendes: Sub Erstellen() Dim TextBoxAnzahl As Integer Dim a As Integer On Error Goto 1 TextBoxAnzahl = InputBox ("Wieviele TextBoxes sollen erstellt werden?") Goto 2 1 TextBoxAnzahl = 5 2 For a = 1 To TextBoxAnzahl Load Text1(a) Text1(a).Height=Text1(a-1).Height+100 Next a End Sub Nun werden soviele TextBoxes erstellt wie du eingibst. Eine TextBox ist genau 100 Pixel weiter unten als die vorherige.

Textboxes	46	Andy	23.04.02 15:50
Re: Textboxes	83	Dell	23.04.02 18:03
Re: Textboxes	17	Andy	24.04.02 12:25
Re: Textboxes	20	Andy	24.04.02 12:29
Re: Textboxes	45	Andy	24.04.02 12:33
Re: Textboxes	215	Dieter	24.04.02 12:38
Re: Textboxes	20	Andy	24.04.02 13:54
Re: Textboxes	19	Dell	24.04.02 19:04
Re: Textboxes	19	Andy	28.04.02 19:20

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen