2011-11-24 154 views
0

我想要做的两件事情与日期&时间计算:计算起始日期和时间

第一:

我有一个LastSave(日期时间格式)。 我有两个控件(NumericUpDown/Format Decimal),一个用于小时,另一个用于分钟。

我想在今天的特定时间开始另一次保存:今天的日期+小时+分钟。

我所做的不是工作,因为我无法转换为DateTime我的设置DateDernièreSauvegarde,它有一个字符串格式。

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

DateTime类具有方法AddHoursAddMinutes等等。您可以使用这些来计算新的保存时间。