Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Eingabecontrols farbig bei Got Focus
Autor: manyki
Datum: 30.01.04 11:22
Hallo, ich würde das auch wie daylight beschrieben hat machen. Das Steuerelementefeld kannst Du auch zur Laufzeit erstellen. Eben nur eine Textbox zur Entwurfszeit auf die Form ziehen und ihr bei Eigenschaften ->Index den Index 1 geben.   Option Explicit Private Sub Form_Load() 'Habe zur Entwurfszeit 1 Textbox mit Index 1 angelegt Dim i As Integer For i = 2 To 5 Load Text1(i) Text1(i).Top = Text1(i - 1).Top + 495 'hier evtl. noch weitere Eigenschaften setzen Text1(i).Visible = True 'sichtbar machen Next i End Sub Private Sub Text1_GotFocus(Index As Integer) Färber Text1(Index) End Sub Private Sub Text1_LostFocus(Index As Integer) EntFärber Text1(Index) End Sub Sub Färber(T As TextBox) T.BackColor = vbBlue T.ForeColor = vbWhite End Sub Sub EntFärber(T As TextBox) T.BackColor = vbWhite T.ForeColor = vbBlack End Sub   Gru? aus dem Norden manyki

Eingabecontrols farbig bei Got Focus	992	B.Jones	29.01.04 16:18
Re: Eingabecontrols farbig bei Got Focus	496	daylight321	29.01.04 16:37
Re: Eingabecontrols farbig bei Got Focus	491	RalfH	29.01.04 20:38
Re: Eingabecontrols farbig bei Got Focus	480	manyki	30.01.04 11:22

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