Bagaimana kalau cara begini :
waktu = TimeValue(Text2.Text) - TimeValue("16:00")
Text3.Text = Hour(waktu) * 60 + Minute(waktu)
gunakan format jam untuk text1 dan text2 jangan gunakan 8.00 (gunakan ":")
text1 = 8:00
text2 = 18:20
thoyib wrote:
>> Dear VB-ers,
>>
>> SEbelumnya sorry mo nanya lagi nich..
>>
>> Aku punya kasus seperti ini:
>>
>> Jam Masuk : 8.00
>> Jam Keluar : 16.00
>>
>> Jika ada karyawan yg lembur dan pulang jam 17.00 maka dia terhitung lembur
>> 60 menit.
>> Dan begitu strusnya, jika dia pulang jam 18.00 maka dia terhitung lembur 120
>> menit.
>>
>> Nah, yg mo saya tanya bgmana cara menghitungnya...?
>> Tampilan program saya sbb:
>>
>> Jam Masuk : 8.00 --> text1
>> Jam keluar : 18.00 -->text2
>> Total Jam lembur : 120 menit -->text3 ....???
>>
>> Tolong bantuin ya, gimana cara mendapatkan nilai Total Jam Lembur (text3)
>>
>> maap kalo p'tanyaannya bikin bingung
>>
>>
>> Salam,
>>
>> Thoy
__________________________
Stops spam 100% for your email accounts or you get paid. http://www.cashette.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/