Premium Only Content
Learn Visual Basic 6 VB6 Alarm Clock Part 2
Welcome to part 2 of project 2 making a alarm clock ..
My name is Gym and today were going to be moving on with the coding part of our second project
Ok lets got on with it,, this line of code is only 1 of 2 most complicated lines in the whole program,, and ill try to explain to you what its saying.
If Time = (Text1.Text) & ":" & (Text2.Text) & ":00 " & (Text3.Text) Then
we use brackets because then it means the object text1..
if we used quotation marks then it means that exact thing written,, in other words it would only sound the alarm when the time read text1.text..
lol and I'm not shore what hr of the day that is..lol.
Ok after the then its timer4.enabled = true and timer4.intervull = the length of you wav file you have selected,, now remember that 1 second = 1000 so if you have file is 3 secs long you want the interval to be 3000.. to find out the leant of your wav file right mouse click then properties .
then finish i of with end if
Ok now in Timer 3 we want to right
if option1 ="1" then
Text3.text = "AM" 'in capitals
else
Text3.text = "PM" 'in capitals
Okays now in form load we need to have timer 3 switched on from load up so instead of typing it all out again just copy timer 1 enabled with interval and past it below and change t it from timer 1 to timer 3
Now we have to do the on and off button so in the on button we right timer2 enabled = true and then interval =1 and then we want the caption to change in our status label so we right label 2 caption = "Alarm is on" don't forget the quotations
Then in the off button we need it to say timer 2 enabled = false and then
Label 2 caption = "alarm is off"
and we also what to have that button to not only turn off the timer that tells wether the times mach we want to use it to turn off our wav file once it has sounded so we right timer4. Enable = false
Ok now here is the hardest bit of them all... we want to use the drop down box to find general and then make shore it sees dilacerations,,,
And in their we going to right
Private Declare Function Playwave Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Call Playwave("Alarm.WAV", 3)
-
2:07:27
TheSaltyCracker
4 hours agoTrump Tower Bombed w/ Cybertruck ReeEEeE Stream 01-01-25
120K228 -
LIVE
FreshandFit
10 hours agoTerrorist Attack In New Orleans And Elon Musk's Mass Censorship On X!
10,339 watching -
2:25:43
Darkhorse Podcast
11 hours agoLooking Back and Looking Forward: The 258 Evolutionary Lens with Bret Weinstein and Heather Heying
119K196 -
5:50:16
Pepkilla
10 hours agoRanked Warzone ~ Are we getting to platinum today or waaa
81.1K7 -
LIVE
BrancoFXDC
8 hours ago $5.67 earnedHAPPY NEW YEARS - Road to Platinum - Ranked Warzone
827 watching -
5:53
SLS - Street League Skateboarding
5 days agoBraden Hoban’s San Diego Roots & Hometown Win | Kona Big Wave “Beyond The Ride” Part 2
85.7K13 -
6:03:57
TheBedBug
12 hours ago🔴 LIVE: EPIC CROSSOVER - PATH OF EXILE 2 x MARVEL RIVALS
90.3K5 -
1:12:45
The Quartering
10 hours agoTerror In New Orleans, Attacker Unmasked, Tesla BLOWS UP At Trump Tower! Are We Under Attack?
153K250 -
1:32:08
Robert Gouveia
12 hours agoNew Year TERROR; Trump Speaks at Mar-a-Lago; Speaker Johnson FIGHT
124K104 -
22:21
Russell Brand
1 day agoVaccines Don't Cause Autism*
194K737