Cara Membuat Alarm Di Visual Basic

Pagi gini mau posting dulu tentang Bahasa pemrogramman kesukaan ane neh apa lagi klw bukan tentang Visual Basic, Sebelumnya ane udah posting tentang caramembuat Sentencase Karakter Di Visual Basic sekarang ane mau share tentang cara membuat alarm di visual basic, OK langsung aja ane jelasin cara kerja ya

1. Siapin Komponen 2 label, 2 option button, 1 textbox

2. Desain form ya terlihat pada gambar di bawah ini



3. Setelah di desain masuk ke jendela kode kemudian tulisakan syntax ini
Dim AlarmOn As Boolean

4. Kemudian Sytax ini letakkan di form Load
Timer1.Interval = 1000
Text1.Text = ""
Option2.Value = True

5. Di option1 letakkan syantax ini
AlarmOn = True

6. Di Option 2 letakkan syntax ini
AlarmOn = False

7. Dan yang terakhir letakkan syntax berikut di timer
If (Time$ > Text1.Text And AlarmOn) Then
Beep
End If
Label2.Caption = Time$

8. Setelah selesai coba kalian Running dan masukan di text 1 jam berapa alarm akan di bunyikan jika sudah melebihi jam di text1 maka secara otomatis alarm akan berbunyi
 

OK Mudah kan, Selamat mencoba ya gan ...Semoga berhasi ...^-^



Artikel Terkait :

11 komentar

Click here for komentar
RayZ
admin
19 March 2012 at 22:36 ×

Mas, mau tanya nih
Bagaimana jika alarm sudah di set lalu bisa berbunyi "beep" ?

Reply
avatar
Admin
admin
22 March 2012 at 14:28 ×

Itu udah berbunyi om klw alarm sudah di set.... lihat lg sourcode ya

Reply
avatar
Redaksi
admin
2 September 2012 at 22:29 ×

Dicobah dech tipnya mas moga saya bisa sukses dengan melihat totorial from blog amihtc

Reply
avatar
Unknown
admin
6 November 2012 at 08:04 ×

kalau nada alarm nya gak beep boleh gak ?

Reply
avatar
admin
admin
14 November 2012 at 09:23 ×

Ya boleh aja gan,

Reply
avatar
Unknown
admin
24 October 2014 at 19:24 ×

nadanya bisa di ganti pakai lagu gk gan?

Reply
avatar
Unknown
admin
21 November 2014 at 21:10 ×

gimna ganti nadanya

Reply
avatar
17 October 2015 at 11:55 ×

gan suaranya cman itu and ngatur suaranya gmana ko pelan

Reply
avatar

Silhakan memberi Komentar, Kritik, atau Saran ConversionConversion EmoticonEmoticon