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/
 



Kirim email ke