vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
EILIG !!! Wie lautet das Gegenstück zu Exit Do also 
Autor: merlin
Datum: 14.02.02 17:08

Hallo

Do

If OnlyRuhezeitKunden = True Then
'prüfe ob Ruhezeit
If rKunden("fChkRuhe").Value = True Then
If DateDiff("d", rKunden("fRuheBegin").Value, Date) >= 0 And DateDiff("d", rKunden("fRuheEnde").Value, Date) <= 0 Then
Else
cDB.rKunden.MoveNext
"Next Do" <<<<<<<< Hier suche ich das Gegenstück zu Exit Do >>>>>>>>>
End If
End If
End If


If cDB.rKunden("fGender").Value = True Then
fParent.toolMWCount.Buttons(1).Caption = Val(fParent.toolMWCount.Buttons(1).Caption) + 1
Else
fParent.toolMWCount.Buttons(3).Caption = Val(fParent.toolMWCount.Buttons(3).Caption) + 1
End If

AddKundenItem
cDB.rKunden.MoveNext
Loop While cDB.rKunden.EOF = False

Ich weiß das es sowas geben soll.
Ich sage schon mal Danke
Merlin
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
EILIG !!! Wie lautet das Gegenstück zu Exit Do also128merlin14.02.02 17:08
Re: EILIG !!! Wie lautet das Gegenstück zu Exit Do also314unbekannt14.02.02 17:17
Re: EILIG !!! Wie lautet das Gegenstück zu Exit Do also57merlin14.02.02 17:25
Re: EILIG !!! Wie lautet das Gegenstück zu Exit Do also50Köllner14.02.02 18:29
Danke, aber ...45merlin14.02.02 19:15
Danke, aber ...45merlin14.02.02 19:16
aber Funktionieren tut's (o.T.)45Köllner14.02.02 19:21

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel