Melihat Tahun Kabisat Dengan Vb 6.0
Buatlah Form Seperti dibawah ini
Lalu Masukanlah Listing Di Bawah
Ini
Private Sub Command1_Click()
List1.Clear
For h = Text1 To Text2 Step 4
List1.AddItem h
Next h
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub P_Click()
Text1 = "": Text1.SetFocus
Text2 = ""
List1.Clear
End Sub
Program
ini dibuat oleh Heri Afrizal di Bireuen
Komentar
Posting Komentar
Tulis komentar anda disini.....