Game Sederhana Pada VB (Tebak Angka)

Minggu, 10 Juni 2012

Game Sederhana Pada VB (Tebak Angka)

Sebenarnya game ini sudah di buat sebulan yang lalu tapi admin baru bisa post hari ini hehe :D

buat yang lagi nyari-nyari game sederhana pake Bahasa Pemrograman VB 6 silahkan di pelajari
khususnya yg lagi nyari buat tugas nih hehe

listing Programnya Sangat Sederhana kok
Cek It :
Private Sub Command1_Click()
a = Int(Rnd * 10)
Text1.Text = a
Text2.SetFocus
If Text2.Text = Text1.Text Then
Label1.Caption = "SELAMAT TEBAKAN ANDA BENAR"
MsgBox "JACTPOT", vbOKOnly + vbInformation, "HASIL"
Else:
Label1.Caption = "TEBAKAN ANDA SALAH"
MsgBox "SILAHKAN COBA LAGI" + vbCrLf + "By :" + vbCrLf + "'djuneardy.blogspot.com'", vbExclamation, "HASIL"
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Timer1_Timer()
Label1.ForeColor = QBColor((Rnd) * 15)
Label1.BackColor = QBColor((Rnd) * 15)
End Sub
ini Preview Gamenya :



 

kalo butuh Source Code nya silahkan hubungi saya di akun-akun atau email yang sudah di pasang diblog ini , semoga dapat bermanfaat aamiin ^^:LC

4 komentar:

  1. bank ada yang bisa di download gak nih.

    BalasHapus
    Balasan
    1. kalau mau source code nya ,, bisa minta lewan email , atau akun saya yg lainnya

      Hapus
  2. bang logikanya ini gimana

    BalasHapus
    Balasan
    1. kalau mau source code nya ,, bisa minta lewan email , atau akun saya yg lainnya

      Hapus

Thanks For Your Comment !! ^^:LC

LinkWithin

Related Posts Plugin for WordPress, Blogger...