Gak ada Henti2nya Berbagi Source Code Visual BAsic yaa Sobat :D
Nahh Kali ini saya mau berbagi sedikit trik membuat Program Menghitung Masa Berlaku KTP dengan Menggunakan Microsoft Visual Basic 6.0.
Program Kecil2an ini emang sengaja mau di share aja biar sobat bisa coba-coba bikin di rumah :D
Oke Sob Langsung Aja Liat Cara Bikinnya..
Maff Juga nie Sobat, saya ga jadikan unduhan, Lagi Males Buka PhourShared,.
1. Seperti Biasa Masuk Ke Aplikasi VB
2. Pilih STANDART,EXE
3. Sobat Desaign Ya Sesuka Sobat, yg Penting Field-field'snya Persis seperti ScreenShoot di Bawah Ini :
4. Kemudian Masukan Source Code Berikut ini ke dalam Form tadi yg kamu desaign :
Option Explicit
Private Sub Command1_Click()
Dim x As Date
Dim y As Integer
Dim hitung As Date
x = awal.Text
y = lama.Text
hitung = x + (y * 365) + 1
akhir.Text = hitung
sekarang.Text = Date
MsgBox "Jangan Telat Perpanjang KTP Anda!!", vbOKOnly + vbExclamation, "Pesan"
Image1.Visible = True
End Sub
Private Sub Command2_Click()
awal.Text = ""
lama.Text = ""
akhir.Text = ""
sekarang.Text = ""
Image1.Visible = False
awal.SetFocus
End Sub
Private Sub Command3_Click()
Unload Me
End Sub
* * *
nah cukup mudah kan soba ??
Selamat Mencoba Tutorial ini. :-)
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :