YWDDif                              (XAPI2000)

Deklaration VB 6.0
Sub YWDDif (Y1 As Long, WNr1 As Long, WDay1 As Long, ByVal Y2 As Long, ByVal WNr2 As Long, ByVal WDay2 As Long)

Deklaration VB.NET
Sub YWDDif (ByRef Y1 As Integer, ByRef WNr1 As Integer, ByRef WDay1 As Integer, ByVal Y2 As Integer, ByVal WNr2 As Integer, ByVal WDay2 As Integer)

Beskrivning
Beräknar differensen mellan två datum av typ år-veckonummer-veckodag. Datumen specificeras via parametrarna Y1, WNr1, WDay1 och Y2, WNr2, WDay2. Funktionen subtraherar Y2, WNr2, WDay2 från Y1, WNr1, WDay1. Differensen returneras via Y1, WNr1, WDay1. Utparametrarna kommer ha följande betydelse:

Y1 : Antal år.
WNr1 : Antal veckor.
WDay1 : Antal dagar.

Funktionen utför ingen test att datumen är riktiga. Vill du ha en sådan utförd bör funktionen YWDValid anropas först. 

Se även
YWDAdd, YWDSub, YWDValid
.
    
 
 
  
SamLogic