vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 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

VB & Datenbanken
If-Then-Else Problem 
Autor: Annabelle
Datum: 18.01.05 09:22

hallo!

Ich habe ein Problem mit If Abfragen.

Ich habe meine Abfragen mal in Schritte unterteilt, bei jedem Jahr soll Schritt 1 gemacht werden außer bei 2005 da soll Schritt 2 gemacht werden.

Also müsste sozusagen If KW.Column(1)Mod2=0 erweitert werden auf
If KW.Column(1)Mod2=0 AND Jahr.Value = 2005 Then...

aber so geht das ja nicht, weiß jemand wie man die bedingung einer IF dementsprechend erweitert?

Schritt 1
If (CInt(KW.Column(1)) Mod 2 = 0) Then
Schicht1Start = 140000
Schicht1Ende = 215959
Schicht2Start = 60000
Schicht2Ende = 135959
ElseIf (CInt(KW.Column(1)) Mod 2 <> 0) Then 'ist das das Zeichen für Ungleich 0 ?
Schicht1Start = 60000
Schicht1Ende = 135959
Schicht2Start = 140000
Schicht2Ende = 215959

Schritt2

ElseIf (CInt(KW.Column(1)) Mod 2 = 0) Then
Schicht1Start = 60000
Schicht1Ende = 135959
Schicht2Start = 140000
Schicht2Ende = 215959
ElseIf (CInt(KW.Column(1)) Mod 2 <> 0) Then 'ist das das Zeichen für Ungleich 0 ?
Schicht1Start = 140000
Schicht1Ende = 215959
Schicht2Start = 60000
Schicht2Ende = 135959

t?tet keine v?gel, wir v?geln auch keine toten!

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
If-Then-Else Problem1.003Annabelle18.01.05 09:22
Re: If-Then-Else Problem926Annabelle18.01.05 09:52
ERLEDIGT734Annabelle18.01.05 09:59
Re: If-Then-Else Problem749Prian081518.01.05 10:47

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