Vatansever
Asistan
- Katılım
- 23 Ağustos 2007
- Mesajlar
- 405
- Reaksiyon puanı
- 1
- Puanları
- 18
Hazırladığım projede saat ve dakika olarak iki değer giriliyor eğer bu değerler arasındaki süre 8 saatten fazlayla kaç dakika fazla bunu elde etmek istiyorum internetten bir kod buldum işimi görücek gibi bir iki kusuru var mesela 20:00 07:00 değerleri girildiğinde -13:00 değeri gösteriyor yani akşam 20:00 'de işe gidip sabah 07:00'de işten çıktığımda 3 saat mesai yapmış olurum ama kod -13:00 diyor bilmem anlatabildimmi
Kod:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim startDate As Date = Convert.ToDateTime(TextBox1.Text)
Dim endDate As Date = Convert.ToDateTime(TextBox2.Text)
Dim diff As TimeSpan = endDate.Subtract(startDate)
TextBox3.Text = diff.Hours.ToString() + ":" + diff.Minutes.ToString()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TextBox1.Text = Date.Now.ToString()
TextBox2.Text = Date.Now.AddHours(0).AddMinutes(-30).AddSeconds(-20).ToString()
End Sub