我想用date&amp ;;做两件事。时间计算:
第一:
我有LastSave
(日期时间格式)。
我有两个控件(NumericUpDown / Format Decimal),一个用于小时,另一个用于分钟。
我想在今天的特定时间开始另一次保存:今天的日期+小时+分钟。
我所做的不是工作,因为我无法转换为DateTime我的设置DateDernièreSauvegarde,它有一个STRING FORMAT。
Private Sub TimerSauvegarde_Tick(sender As System.Object, _
e As System.EventArgs) Handles TimerSauvegarde.Tick
Dim LastSave As DateTime = Convert.ToDateTime(My.Settings.DateDernièreSauvegarde)
Dim NextSave As DateTime
Dim Hour, Minute As Decimal
Hour = My.Settings.Heures
Minute = My.Settings.Minutes
Select Case ComboBoxA_Toutes.Text
Case "A"
NextSave = DateAdd(DateInterval.Hour, Hour, CDate(LastSave))
NextSave = DateAdd(DateInterval.Minute, Minute, CDate(NextSave))
MsgBox("Next Save at : " & NextSave)
Case "Toutes les"
MsgBox("Next Save at : " & NextSave)
End Select
End Sub
第二件事:
我想在numericUpDown字段中指定的每个(小时,分钟)开始另一次保存。
答案 0 :(得分:0)
DateTime
类包含方法AddHours
AddMinutes
等等。您可以使用它们来计算新的保存时间。