Cara Membuat Aplikasi Penghitung Komputer

Oke langsung ke tutorialnya aja deh :

1. Buka dulu Visual Basic 6.0.
2. Buat satu project Standart exe.

 

3. Setelah terbuka lembar kerja form1. Lalu tambahkan 1 timer dan buat intervalnya menjadi 1000. lihat gambar :

 

4. Setelah menambahkan timer, lalu tambahkan 2 label ( untuk judul dan terserah anda ), dan 1 ListBox. lihat gambar dibawah ini :

 

5. Setelah menambahkannya, lalu buat 1 module, caranya : Add Module - OPEN

 

6. Setelah terbuka lembar module lalu masukan code dibwah ini :

Public Declare Function GetTickCount Lib "kernel32" () As Long
Public nTime As Long

7. Setelah memasukan code ke module, langkah selanjutnya masukan code dibwah ini ke dalam FORM1 tadi :

Private Sub Form_Load()
nTime = GetTickCount()
End Sub

Private Sub Timer1_Timer()
Dim Wektu As Long
Dim detik As Long
Dim menit As Long
Dim jam As Long

Wektu = GetTickCount()
detik = Round(Wektu / 1000)
menit = Round(detik / 60)
jam = Round(menit / 60)

List1.Clear
List1.AddItem ("")
List1.AddItem (jam & " Jam, utawa " & menit & " Menit, atau " & _
detik & " Detik")
List1.AddItem ""
List1.AddItem "Wektu awet Program iki di lakokne wis " & Round((Wektu - nTime) / 1000) & " Detik iki"

End Sub

8. Setelah dimasukan semua, kemudian di coba dengan menkan tombol F5.
9. Jika tidak eror lalu jadikan program/save dengan cara KLIK FILE - MAKE PROJECT EXE1 - SAVE
10. SELESAI !!! 

Sekian dulu post kali ini.
Semoga Bermanfaat :)
Selamat Mencoba :)

HAPPY ENJOY :)

Sumber

• Facebook
• Twitter
• GPlus
• Reddit
• Digg
• Linkedin
• Stumbleupon
• Technorati
• Delicious
• Friendfeed
• Pinterest

Title : Cara Membuat Aplikasi Penghitung Komputer

Labels :

Author : Boyz

Rating: 100% based on 10 ratings. 5 user reviews.