alarm maken vb 2010

[wakmen]

ik wil een alarm maken die bv op 1november is ingesteld als het 1 november is dat hij dan een bericht weergeeft bv happy halloween.

 

[The Mighty Atom]

Sorry hoor, maar wat is daar het nut van?

 

[m4dc0w344]

dat maakt toch niet uit als hij daar nou gelukkig van wordt

en srry ik weet het antwoord niet

 

[JoZ1]

Ik zie het nut er ook niet van in, behalve dat-ie goed kan oefenen met VB.NET als-ie de source snapt.
Maar daar gaan wij niet over

Even een paar vragen:

1. Is dit huiswerk?
2. Wat heb je tot nu toe?

 

[wakmen]

nee het is geen huiswerk en het heeft wel nut ik wil leren programmeren.
ik heb als behalve de code dat een venster weergeeft met bv gelukkige verjaardag enz... dus het ontwerp van mijn programma heb ik alle en de andere code ook.

 

[JoZ1]

[cpp]Dim Datum As Date
If IsDate("23/1/05") Then Datum = "23/10/11"
If Date.Today = Datum Then MsgBox("Het is vandaag 23/10/11")[/cpp]

 

[wakmen]

bedankt

 

[mastermindzh]

dit klopt alleen gaat dit niet zomaar werken

je moet wel even je programma laten opstarten met windows.
anders controlleerd hij de datum alleen als je het programma daadwerkelijk aanzet.

 

[m4dc0w344]

Nou heb ik hier een vraag op, hoe kan je het af laten tellen?

 

[mastermindzh]

met dit stukje code

Dim date1,date2,date3 as Date

date1 = Date()
date2 = ingevoerde datum hier naartoe

date3 = CStr(date2.Date.Subtract(date1.Date).Days)

of i.p.v date3 kan je het op een label toepassen.

 

[JoZ1]

je moet wel even je programma laten opstarten met windows.
anders controlleerd hij de datum alleen als je het programma daadwerkelijk aanzet.

Dat stond anders niet in de vraagstelling. Bij het openen van het programma lijkt mij geen probleem. Dus ik zie niet in waarom 'het niet zou werken'

 

[mastermindzh]

Het lijkt mij nogal logisch dat een alarm continue aanstaat (net als op je telefoon). als je alarm (prgoramma) uitstaat zal je ook geen melding krijgen.

PS: met je code was ik het wel eens hoor

 

[JoZ1]

Klopt inderdaad. Een alarm hoort continu aan te staan, alleen ik dacht dat de TS daar wel aan zou hebben gedacht.

Als de TS aandringt zal ik code geven (waarvoor wel administratorrechten nodig zijn) om op te starten met Windows. Het is echter makkelijker dit in een setup te doen.

 

[mastermindzh]

mee eens ik blijf ook nog even geabboneerd op deze thread om te kunnen helpen indien nodig (als jij niet weer eerder bent lol)

 

[huijb]

@mastermindzh Zou je willen stoppen met het onnodig quoten van berichten.

 

[mastermindzh]

Sorry, mijn fout =)

 

[CoD_NL]

http://msdn.microsoft.com/en-us/library/aa383614(v=VS.85).aspx

Persoonlijk zou ik gewoon voor de task scheduler van Windows gaan.

 

[wakmen]

en als ik er meerdere er bij wilt toevoegen?
als ik deze code nog een keer typt dan krijg ik deze bericht.

Dim Datum As Date
        If IsDate("3/1/05") Then Datum = "23/10/11"
        If Date.Today = Datum Then MsgBox("Het is vandaag 23/10/11")

dan krijg ik deze bericht
Error	1	Local variable 'Datum' is already declared in the current block.	C:\Users\wakmen\AppData\Local\Temporary Projects\test\Form1.vb	8	13	test

 

[CoD_NL]

Het volgende zou gewoon moeten werken:

[cpp]
Dim Datum As Date

Datum = "23/10/11"
If Date.Today = Datum Then MsgBox("Het is vandaag 23/10/11")

Datum = "24/10/11"
If Date.Today = Datum Then MsgBox("Het is vandaag 24/10/11")
[/cpp]

(het aanroepen van de functie IsDate op "3/1/05" heeft uiteraard geen nut)

 

[JoZ1]

@CoD_NL: Natuurlijk heeft het wel nut om IsDate erin te zetten. Dat voorkomt fouten als de gebruiker gewoon maar iets invult.

Jammer dat wakmen dat niet ziet, hij zet daar twee verschillende data in...