vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Zeit Auf-/Abrunden 
Autor: wincnc
Datum: 12.04.06 10:11

Hallo, versuch´s mal so:
Private Sub Command1_Click()
Dim Zeit As Date
Dim Minuten As String
 
Zeit = Time ' bzw. Deine Zeit
 
Minuten = Mid(CStr(Zeit), 4, 1) & "," & Mid(CStr(Zeit), 5, 1)
 
Minuten = Round(Minuten, 0) & "0"
 
Zeit = CDate(Mid(CStr(Zeit), 1, 3) & Minuten & ":00")
 
MsgBox Zeit
 
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Zeit Auf-/Abrunden840Kaoyang12.04.06 09:43
Re: Zeit Auf-/Abrunden611wincnc12.04.06 10:11
Re: Zeit Auf-/Abrunden573vbtricks12.04.06 10:27

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel