2016-09-28 7 views
1

Мне нужна помощь для сохранения даты и времени в 1 переменную для сохранения в параметрах SQL.VB.NET переменная дата и время

I have textbox (txBulan) = "1", 
textbox (txTahun) = "2016", 
double (k) = "2", 
string (time) = "13:00:00" 

И я хочу сохранить в 1 переменную с форматом "MM/dd/yyyy HH:mm:ss".

dim CI as datetime 

CI = CDate(Format((txBulan.Text & "/" & k-1 & "/" & CDbl(txTahun.Text) & " " & time), "MM/dd/yyyy HH:mm:ss")) 

ответ

1

Хотя я не совсем понимаю, как делает эти текстовые поля и k работы, я рекомендую вам может использовать new DateTime(year, month, day, hour, minute, second) создать переменную DateTime.

Dim txYear as TextBox ' Assume Text = 2016 
Dim txMonth as TextBox ' Assume Text = 1 
Dim txDay as TextBox ' Assume Text = 2 
Dim time as String = "13:00:00" 
Dim Hour as Integer = -1 
Dim Minute as Integer = -1 
Dim Second as Integer = -1 

For Each piece as String in time.Split(":") 
    ' For safety, add try-catch 
    If (Hour < 0) Then 
     Hour = Integer.Parse(piece) 
    Else If (Minute < 0) Then 
     Minute = Integer.Parse(piece) 
    Else 
     Second = Integer.Parse(piece) 
    End If 
End For 

' For safety, cast .Text to integer value 
Dim Ci AS New DateTime(
    Integer.Parse(txYear.Text), 
    Integer.Parse(txMonth.Text), 
    Integer.Parse(tx.Day.Text), 
    Hour, Minute, Second 
) 
Dim DateString as String = Ci.ToString("MM/dd/yyyy HH:mm:ss") 
+0

Не существует перегрузки конструктора для 'DateTime', которая берет' string' за год, месяц и день. – Enigmativity

+0

Извините, слишком ленив, чтобы бросить его, а также VB.net принять его в любом случае: P –

+2

VB будет приниматься только в том случае, если вы не используете Option Strict, что является плохой практикой. –