Bwat All Vber

Aku ada maalah dengan prog penghitung hari ku,dgn
coding sbt:

===============awal coding================
   Dim tahun As Integer
   Dim bulan As Integer
   Dim hari, temp As Integer
   Dim angka As Integer
       
       angka = lab_jmlhari.Caption
   
   '   Untuk dapatkan tahun
       tahun = angka / 365
       temp = angka Mod 365
  
  '   Untuk dapatkan bulan
      bulan = temp / 30
   
  '   Untuk dapatkan hari
      hari = temp Mod 31
    
'    Print tahun & " Tahun " & bulan & _
'           " Bulan " & hari & " Hari"
    lab_tahun.Caption = tahun
    Lab_bulan.Caption = bulan
    lab_hari.Caption = hari
=============akhir coding=========================

aku hitung jml hari dari tgl 01/10/2005 s/d 21/02/2006
adalah 143 hari. 143 hari yg seharusnya kalo dijabarin
menjadi 0 tahun, 4 bulan, 21 hari. Tp kanapa kok yg
aku dapetin 0 tahun, 5 bulan, 19 hri. Apa ada
kekeliruan pada logic. Buat rekan2 saya sangat
mengharapkan pencerahannya.

alam
Joni

Send instant messages to your online friends http://uk.messenger.yahoo.com 


Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-VB/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Kirim email ke