邏輯方法來獲得夜班差的總時間在vb.net

需要幫助...邏輯方法來獲得夜班差的總時間在vb.net

我有場景..

注：我想要一個合乎邏輯的方法來解決，並得到了時間差夜間時間表。用於考勤監控。

第一，夜班時間表（下午十點00分00秒 - 上午06時○○分00秒）第二，我的出勤定期排班是：

[3PM - 6PM]

[休息時間：下午6時 - 下午7點]

[下午7點 - 下午11點]

由於差動..從10 PM-6AM ..我有從下午10點總（1小時）的夜班差動 - 下午11點

有人會給我一個想法，使用哪些代碼可以得到1小時的答案。

我使用時間跨度和計算時間的小時..但我不知道的邏輯或方法。

謝謝

來源

2013-02-09 Deorwin Bensurto

阻止我們幫助你的就是語言的唯一障礙。試着讓其他人重新提出你的問題。 – Ahmad 2013-02-09 06:53:32

請解釋我的想法是否正確。你從下午3點到晚上11點有一個正常的班次，從下午6點休息到下午7點，從晚上10點到上午6點的夜班，你想知道晚上11點和晚上10點之間的區別嗎？ – Steve 2013-02-09 10:16:53

是的，先生..這是正確的。我需要得到時差，即1小時是夜班差速器。問題是我不知道如何得到1的值。 – 2013-02-10 23:24:51

Sub TimeIN_TimeOut() 

    Dim timeIn(4), timeOut(4) As DateTime 

    Dim days As String() = {"Monday", "Tuesday", "Wednesday", "Thursday", "Friday"} 
    Dim totalHours, subTotal(4) As Double 

    For x As Integer = 0 To 4 
     WriteLine() 

     Write("Enter Time-In for {0}:", days(x)) 
     timeIn(x) = ReadLine() 

     Write("Enter Time-Out for {0}:", days(x)) 
     timeOut(x) = ReadLine() 


     subTotal(x) += timeOut(x).Subtract(timeIn(x)).TotalHours 

     totalHours += subTotal(x) 


    Next 
    WriteLine() 
    WriteLine() 
    WriteLine("__________________________________________________") 
    WriteLine("Total work Hours from {0} to {1}:{2}", days(0), days(4), totalHours) 



End Sub

來源

2013-02-21 03:18:38 user2093837

邏輯方法來獲得夜班差的總時間在vb.net

回答

相關問題