Hvordan beregne antall uker mellom to datoer

Lære å manipulere datoer i programmene gir deg muligheten til å manipulere tidssensitive data. Mange programmer som er avhengige av shipping, salg og til og med produktmarkedsføring stole på nøyaktig datoberegninger. Et nyttig beregning innebærer å bestemme antall dager eller uker mellom to kalenderdatoer. Microsofts Visual Basic programmering verktøyet har en innebygd funksjon som bestemmer dette for deg.

Bruksanvisning

1 Start Visual Studio. Klikk på "File". En rullegardinmeny vises. Klikk "New Project". The "New Project" åpnes.

2 Klikk på "Visual Basic" og dobbeltklikk på "Windows Forms Application" for å opprette en ny Visual Basic-prosjekt. En ny form vil vises i utformingen vinduet.

3 Dobbeltklikk på skjemaets tittellinjen. En kode vindu åpnes og viser følgende kode:

"Private Sub Form1_Load (ByVal sender As System.Object, ByVal e As System.EventArgs) Håndtak MyBase.Load

End Sub "

4 Legg til følgende kode før "End Sub" statement:

Dim date1Year As Long

Dim date1Month As Integer

Dim date1Day As Integer

Dim date2Year As Long

Dim date2Month As Integer

Dim date2Day As Integer

Dim DAYCOUNT As Integer

Dim weekCount som desimal

'Sett DATE1 og date2 verdier under

date1Year = 2000

date1Month = 1

date1Day = 1

date2Year = 2009

date2Month = 2

date2Day = 2

'Bestem antall dager mellom to datoer

Dim date1 som ny System.DateTime (date1Year, date1Month, date1Day)

Dim dato2 som ny System.DateTime (date2Year, date2Month, date2Day)

DAYCOUNT = date2.Subtract (DATE1) .Days

weekCount = DAYCOUNT / 7

MessageBox.Show (weekCount.ToString ())

5 Finn kommentaren som har denne etiketten:

"Set DATE1 og date2 verdier under."

De seks linjer med kode som følger den kommentaren at du kan stille inn date1 og date2 verdier. I dette eksempelet er date1Year 2000, er date1Month en og date1Day er 1. Det tilsvarer 1. januar 2000. date2Year er 2009 date2Month er 2 og date2Day er 2. Som oversetter til februar 2, 2009.

Når denne koden kjøres, beregner det antall uker mellom date1 og dato 2 og lagrer verdien i variabelen som heter "weekCount." Den endelige MessageBox.Show uttalelse åpner et pop-up vindu og viser resultatet.

6 Trykk på "F5" tasten for å kjøre prosjektet. Den pop-up vindu vil vise antall uker mellom de to datoene. I dette eksempel er den verdi 474,28.

Hint

• Det eneste du trenger å endre er verdiene av de seks variablene som følger kommentaren merket, "Set DATE1 og date2 verdier under."