Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Abfrage Textfeldinhalt
Autor: schnalbi
Datum: 09.05.04 19:34
Dim feldmitaktuellendatum() As String Dim feldmitanderendatum() As String Dim a As Integer Dim heute As Date ReDim feldmitaktuellendatum(1) ReDim feldmitanderendatum(1) For a = 1 To 10 If txtFields(1).Text = CStr(heute) Then feldmitaktuellendatum(UBound(feldmitaktuellendatum)) = txtFields(a).Text ReDim Preserve feldmitaktuellendatum(UBound(feldmitaktuellendatum) + 1) Else feldmitanderendatum(UBound(feldmitanderendatum)) = txtFields(a).Text ReDim Preserve feldmitanderendatum(UBound(feldmitanderendatum) + 1) End If Next a

Abfrage Textfeldinhalt	640	Ueli	09.05.04 12:39
Re: Abfrage Textfeldinhalt	385	schnalbi	09.05.04 19:34
Re: Abfrage Textfeldinhalt	361	Ueli	09.05.04 20:07

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