what am i doing wrong here?

[neodammer]

Im new to vb.net my experience is with vb 6.0 until a day or two ago. I am making an alarm program that displays the time, lets you input when you want to "wake up" and then sets the alarm in motion. having trouble with the actual alarm part here is the files. if somebody can fix and or tell me what was wrong let me know will be in your debt thanks

timer101.zipFetching info...

[georgepatotk]

use

timonoff = False

MsgBox("WAKE UP WAKE UP WAKE UP", , "WAKE UP!")

TextBox1.Text = ""

 

instead of

 

MsgBox("WAKE UP WAKE UP WAKE UP", , "WAKE UP!")

timonoff = False

TextBox1.Text = ""

[neodammer]

  Quote

use

timonoff = False

MsgBox("WAKE UP WAKE UP WAKE UP", , "WAKE UP!")

TextBox1.Text = ""

 

instead of

 

MsgBox("WAKE UP WAKE UP WAKE UP", , "WAKE UP!")

timonoff = False

TextBox1.Text = ""

 

Did that work for you?

[georgepatotk]

you problem is the message box keep repeating popup when the time is reached. Am I right?

[neodammer]

nope my problem is getting the actual message box to pop up when the alarm hits the right time.

[georgepatotk]

again again..

I am not clear what you want..

 

Change the code and comment it with your problem.

[neodammer]

here you go i put some comments into the area thats messing up

timer101.zipFetching info...

[georgepatotk]

it just works perfect over my computer.

 

the messagebox doesn't appear when the time reach in your PC?

[neodammer]

nope message box never pops up odd I am using windows xp pro and vb.net 2003

[georgepatotk]

the codes should be fine, cause it works in my place.

check it out, see what's wrong with your pc.

[neodammer]

Interesting, I wonder whats wrong on my end.

[georgepatotk]

I think it is the time system problem.

you are using 12 or 24 time system?

[neodammer]

on my pc windows is using currently displaying 1:30 AM eastern time

[georgepatotk]

12 hours diff,

mine is 1:30 pm

 

try to put this and see

 

 Dim curtime As Date = Format(Date.Now, "HH:mm:ss")
       timedisplaybox.Text = curtime

       'this next step is supposed to take the user input for the alarm time off combobox2 and combobox1 and then compare it to the current time in hours/seconds and then if it equils to be the same the message box comes up
       '
       If CStr(curtime.Hour) = ComboBox2.Text AndAlso CStr(curtime.Minute) = ComboBox1.Text AndAlso timonoff = True Then
           timonoff = False 'this stops the alarm from auto-initalizing
           MsgBox("WAKE UP WAKE UP WAKE UP", , "WAKE UP!") 'this is supposed to happen when the if statement is all true
           TextBox1.Text = "" 'clears the textbox where the alarm time was displayed
       End If

[neodammer]

Odd. That worked, whats the difference? and why would not the other code work?

[georgepatotk]

maybe your visualbasic6.0 library is not linked properly or whatsoever that I don't know and you don't know.. hehe.. :D

[neodammer]

alrighty then now i must figure out this mess lol