CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

hera Nybegynder

27. juni 2001 - 23:34 Der er 6 kommentarer og
1 løsning

Dato udregning

Hej
Er der nogle som har en code på hvordan udregningen er på to datoer som så skal resultere i Dage_Tilbage
Brugeren må kun skrive i StartDag og SlutDag, Dage_Tilbage skal så regne ud hvor mange dage som er tilbage og den sidste dag skal den så fjerne active funktionen
Håber en eller anden kan hjælpe

Synes godt om

jelzin101 Praktikant

27. juni 2001 - 23:36 #1

øhhh. hvad?
mener du forskellen mellem 2 datoer?

Synes godt om

hera Nybegynder

28. juni 2001 - 00:03 #2

Nej ikke forskellen mellem to datoer
Man har en StartDag den skal så trækkes fra en SlutDag resultatet bliver så en Dage_Tilbage udregningen går så ud på at Dage_Tilbage skal vise dagene tilbage for hver nye dag som kommer

Synes godt om

zeth Nybegynder

28. juni 2001 - 00:48 #3

koder ikke lige VB, men er det ikke bare DateDiff(\"d\",StartDato,SlutDato) eller sådan noget? *s*

Synes godt om

jelzin101 Praktikant

28. juni 2001 - 01:24 #4

så vidt jeg husker er det ikke engang så kompliceret... hera>> har du prøvet simpelthen bare at trække dem fra hinanden ?
noget a la :
sub bla bla bla
Dage_Tilbage =SlutDag - StartDag
print dage_tilbage
end sub

husk slf. at sætte datatypen til noget dato noget...

Synes godt om

razersedge Nybegynder

28. juni 2001 - 01:46 #5

module:

Public Function AntalDageTilJul() As Integer
Dim JuleAften As Date
JuleAften = DateSerial(Year:=Year(Now), Month:=12, _
Day:=24)
AntalDageTilJul = DateDiff(Interval:=\"d\", date1:=Now, _
date2:=JuleAften)
End Function

command1:

Private Sub Command1_Click()
AntalDageTilJul
End Sub

Synes godt om

razersedge Nybegynder

28. juni 2001 - 01:47 #6

evt:

Private Sub Command2_Click()
MsgBox prompt:=AntalDageTilJul
End Sub

Synes godt om

razersedge Nybegynder

28. juni 2001 - 01:49 #7

damm.. glemmer hele tiden noget..

husk så at rette i dit module så det bliver rigtig dato.. evt \"mixe\" det med nogle textboxe,..

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34
Opdatering af SAPgrid værdi Af dane022 i Visual Basic	3	25/04/202414:26	28/08/202419:09
overskrive datasæt hvis det allerede eksistere Af overisen i Visual Basic	0	08/12/202320:00	-
Manuel rotering af billedfil i en formular, 90 - 180 - 270 - 360 grader Af stejuu i Visual Basic	2	04/12/202320:07	09/12/202310:49
Erstat http med faktisk billede Af crjensen i Visual Basic	0	09/10/202309:14	-

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS