ต้องการบันทึกข้อมูล DateTime กับ Textbox ต้องใช้คำสั่งไหนครับ พอดีลองทำแล้วไม่ได้ไม่ทราบว่าต้องใช้วิธีไหน รบกวนช่วยสอนผมหน่อยครับ^^

sql = "INSERT INTO c1(C_DATE,C_DATA)VALUES(@C_DATE,@C_DATA)"

Imports System.Globalization

DateTimePicker1.Value.ToString("yyyy-MM-dd", CultureInfo.CreateSpecificCulture("en-US"))

 cmd.Parameters.AddWithValue("@C_DATE", DateTimePicker1.Value.ToString("yyyy-MM-dd", CultureInfo.CreateSpecificCulture("en-US")))
 cmd.Parameters.AddWithValue("@C_DATA", Me.textbox1.Text)

 strSQL = "INSERT INTO sale_id(sale_id,fix_id,customer_id,customer_name,date_in,datetime_save) " _
                       & " VALUES(@sale_id,@fix_id,@customer_id,@customer_name,@date_in,@datetime_save)"
        cmd = New MySqlCommand(strSQL, ConnectionDB)
        With cmd
            .Parameters.AddWithValue("@sale_id", Me.txtPWsaleID.Text)
            .Parameters.AddWithValue("@fix_id", "ขายสินค้า")
            .Parameters.AddWithValuer("@customer_id", Me.txtScusID.Text)
            .Parameters.AddWithValue("@customer_name", Me.txtScusName.Text)
            .Parameters.AddWithValue("@date_in", Me.txtPWdateNow.Text)
            .Parameters.AddWithValue("@datetime_save", DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss", CultureInfo.CreateSpecificCulture("en-US")))
            Call open_connection()
            .ExecuteNonQuery()
        End With

strSQL = "INSERT INTO customer (CustomerID,Name,Email,CountryCode,Budget,Used,CreateDate) " & _
"VALUES (@sCustomerID,@sName,@sEmail,@sCountryCode,@sBudget,@sUsed,@CreateDate)"
With objCmd
	.Parameters.Add("@sCustomerID", SqlDbType.VarChar, 5).Value = "C005"
	.Parameters.Add("@sName", SqlDbType.VarChar, 250).Value = "Weerachai Nukitram"
	.Parameters.Add("@sEmail", SqlDbType.VarChar, 250).Value = "[email protected]"
	.Parameters.Add("@sCountryCode", SqlDbType.VarChar, 2).Value = "TH"
	.Parameters.Add("@sBudget", SqlDbType.Decimal).Value = 2000000.00
	.Parameters.Add("@sUsed", SqlDbType.Decimal).Value = 1000000.00
	.Parameters.Add("@CreateDate", SqlDbType.DateTime).Value = dateTime
End With

strSQL = "INSERT INTO sale_id(sale_id,fix_id,customer_id,customer_name,date_in,datetime_save) " _
                      & " VALUES(@sale_id,@fix_id,@customer_id,@customer_name,@date_in,@datetime_save)"
       cmd = New MySqlCommand(strSQL, ConnectionDB)
       With cmd
           .Parameters.AddWithValue("@sale_id", Me.txtPWsaleID.Text)
           .Parameters.AddWithValue("@fix_id", "ขายสินค้า")
           .Parameters.AddWithValuer("@customer_id", Me.txtScusID.Text)
           .Parameters.AddWithValue("@customer_name", Me.txtScusName.Text)
           .Parameters.AddWithValue("@date_in", Me.txtPWdateNow.Text)
           .Parameters.AddWithValue("@datetime_save", DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss", CultureInfo.CreateSpecificCulture("en-US")))
           Call open_connection()
dim s as integer    'ตรวจสอบสถานะการ Insert 
        s =   .ExecuteNonQuery()
'ตรวจสอบสถานะการ Insert 
if s= 0 Then
MsgBox("Error")
 else
MsgBox("บันทึกแล้ว")
end if
       End With

If txtXXX.Text = "" Then
'...
'...
'...
End If

Imports System.ComponentModel
Imports System.ComponentModel.DataAnnotations
Public Class FullModelSampleWithoutEF
    ''' <summary>
    ''' ชื่อ|Name
    ''' </summary>
    <Required(ErrorMessage:="FirstName {0} is required")> _
    <StringLength(100, MinimumLength:=1, ErrorMessage:="ชื่อควรจะมีความยาว 1 ถึง 100 ตัวอักษร|Name Should be minimum 1 characters and a maximum of 100 characters")> _
    <DataType(DataType.Text)> _
    Public Property FirstName As String

    <RegularExpression("([0-9]+)", ErrorMessage:="กรุณาป้อนข้อมูลให้ถูกต้อง|Please enter valid Number")> _
    Public Property LastName As String

    <Range(1, 13, ErrorMessage:="อายุเมียน้อยต้องอยู่ระหว่าง 1 - 13 ปี|Age Should be 1 and 13 years old.")> _
    Public Property Age As Integer
End Class