 |
Coders' city
Nasza pasja to programowanie!
|
| Zobacz poprzedni temat :: Zobacz nastêpny temat |
| Autor |
Wiadomo¶æ |
ak
Do³±czy³: 13 Lut 2007
Posty: 165
|
 Wys³any: Nie Kwi 25, 2021 12:06 pm OP Temat postu: [VB]Zamiana minut na godziny i minuty |
  |
|
Witam
Jak z textbox45 zawieraj?cego liczb? minut wy?uska? godziny i minuty. Ró?nica dat przedstawiona jest w text45 w postaci minut.
| Kod: |   Dim z1 As Date
 Dim z2 As Date
 z1 = MaskEdBox1
 z2 = MaskEdBox2
 If z1 = z2 Then
 Text45 = 0
 Text50 = 0
 Else
 Text45 = DateDiff("n", z1, z2)
 End If
|
|
|
| Powrót do góry |
|
 |
|
|
samolot
Do³±czy³: 26 Sty 2006
Posty: 8376
Sk±d: Toru?
|
| Wys³any: Nie Kwi 25, 2021 3:55 pm Temat postu: |
|
|
| Cytat: | | Jak z textbox45 zawieraj?cego liczb? minut wy?uska? godziny i minuty |
| Kod: | Dim Minuty as Long = CLng(txtJednostki.Text)
Dim Czas As TimeSpan = New TimeSpan(Minuty * 10 ^ 7)
Dim Napis As String = Math.Floor(Czas.TotalMinutes).ToString("00") & ":" & Czas.Seconds.ToString("00")
Me.txtCzasWynikowy.Text = Napis
|
Struktura TimeSpan musi w nawiasie mie? podany czas wyra?ony w jednostkach 100-nanosekund, czyli w jednostkach Ticks
Dla podanej liczby Ticks zwraca struktur? podaj?c? liczb? jednostek czasu w poszczególnych przedzia?ach:
.TotalMilliseconds
.Milliseconds
.TotalSeconds
.Seconds
.TotalMinutes
.Minutes
.TotalHours
.Hours
.TotalDays
.Days
Nazwy mówi? same za siebie
_________________
Nie zadawaj bezcelowych pyta? / Windows 8.1 / Windows 10 / VB2008 / VB 2010 / VB 2012 / Pisz poprawnie |
|
| Powrót do góry |
|
|
|
|
Mo¿esz pisaæ nowe tematy
Mo¿esz odpowiadaæ w tematach
Nie mo¿esz zmieniaæ swoich postów
Nie mo¿esz usuwaæ swoich postów
Nie mo¿esz g³osowaæ w ankietach
Mo¿esz dodawaæ za³±czniki na tym forum
Mo¿esz pobieraæ pliki z tego forum
|
Debug: strone wygenerowano w 0.20508 sekund, zapytan = 11
|
Pomoc
Szukaj
U¿ytkownicy
Grupy
Rejestracja
Profil
Zaloguj siê, by sprawdziæ wiadomo¶ci
