Gelandang Internet yang mencoba melewati lorong sempit tanpa batas ruang dan waktu
Joint Venture Adsense

Tutorial visual Basic Menghitung umur dengan VB

· · 0 comments
Assalamu'alaikum, wr.wb

Alhamdulillah ini adalah posting pertama saya tentang bahasa pemograman Visual Basic, semoga kedepannya dapat memberikan lebih banyak tutorial dasar VB bagi sobat yang ingin menekuni dunia pemomgraman atau bercita-cita menjadi seorang programmer. Pada tutorial VB ( visual basic ) dasar untuk pemula kali ini kita akan mencoba membuat software atau program menghitung umur (sambil muhasabah diri ya,,,, hehe) dengan menggunakan VB 6.0 secara mudah dan cepat. logika alur programnya (ini poin penting dalam dunia pemograman) adalah komputer membaca input data tanggal, bulan dan tahun lahir selanjutnya memproses data tersebut dengan pengurangan (value) data tanggal, bulan dan tahun sekarang dikurangi dengan data yang di inputkan tadi. bingung ya ????? sama dong, hehe. ga usah dipikirin terlalu dalam om, karena belajar pemograman harus dengan pikiran enjoy dan fresh.

untuk melancarkan, memuluskan, memudahkan atau apapun namanya itu, kita memerlukan component tambahan DTPicker yang sebenarnya telah tersedia di Visual Basic walau secara default component ini belum tampak di deretan tool standarnya. silahkan aktifkan componennya dengan menekan Ctrl + T

software hitung umur dengan VB 6
















Buat desain programnya seperti gambar dibawah ini.  (untuk style sesuai selera, mau dibuat warna pink juga boleh)















ketikan listing program ke commad button dengan cara klik dua kali.
Jika malas ngetikan codingnya silahkan copas dengan cara seksama dan dalam tempo yang sesingkat-singkatnya, karena saya tahu mahasiswa sekarang agak sedikit malas kalau berhubungan dengan bahasa dewa ini. hehe.

Private Sub Command1_Click() // ini comand 1
    Dim jumlahhari As Integer
    Dim umur As Integer
    Dim hari As Integer

    jumlahhari = DateDiff("d", DTPicker1.Value, Date)
    umur = jumlahhari / 365
    hari = jumlahhari - (umur * 365)
    Text1.Text = umur // proses hasil
End Sub

Private Sub Command2_Click() // ini commad 2
   End
End Sub






Dan hasil Program menghitung umur dengan VB 6.0 seperti dibawah ini.





Nahh .... ituh! tutorial membuat software menghitung umur dengan VB 6.0 semoga bermanfaat. download book gratis belajar visual basic di tutorial vb.



 

0 comments:

Post a Comment

- Komentar yang mengandung hujatan, negatif akan dianggap spam
- Komentar link akan dilaporkan ke posyandu terdekat & tidak akan ditampilkan