Saya mau mengubah angka decimal menjadi angka jam, misalnya:

 

[ANGKA DECIMAL]

2.50 è 2 Jam 30 menit

2.25 è 2 Jam 15 menit

2.75 è 2 Jam 45 menit

 

Tetapi ada masalah, saya memakai fungsi “\”

 

Syntax saya kurang lebih seperti ini:

 

 

Dim jam As Integer

            Dim menit As Integer

            jam = plgTlt \ 1

            menit = (Math.Abs([ANGKA DECIMAL] - jam)) * 60

            Return jam.ToString + "jam " + menit.ToString + "menit "

 

Nah… sebetulnya sintax ini berfungsi, tetapi kalau decimalnya 2.72, hasilnya 3Jam 17Menit, padahal yang saya inginkan 2Jam 43Menit, saya sudah tau sih salah saya dimana, sekarang saya tidak tau bagaimana mendapatkan hasil 2Jam 43Menit itu.. ada yang bisa menolong saya??

__._,_.___

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





SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages


YAHOO! GROUPS LINKS




__,_._,___

Kirim email ke