สอบถามเรื่อง การบันทึกข้อมูลลงฐาน 10 วัน ข้างหน้า VB.net

	Dim date As Date = CDate("22-Sep-2015).AddDays(10)

Sub Page_Load(sender As Object, e As EventArgs)
	Dim strDate As Date
	strDate = "10/11/2008"
	Me.lblText1.Text = DateAdd(DateInterval.Day, 1, Date.Now)
	Me.lblText2.Text = DateAdd(DateInterval.Month, 1, Date.Now)
	Me.lblText3.Text = DateAdd(DateInterval.Year, 1, Date.Now)
	Me.lblText4.Text = DateAdd(DateInterval.Hour, 1, Date.Now)
	Me.lblText5.Text = DateAdd(DateInterval.Second, 1, Date.Now)
	Me.lblText6.Text = DateAdd(DateInterval.Minute, 1, strDate)
End Sub

UPDATE
    Y
SET
     รายการ=Y.รายการ, 
     วันปัจจุบัน=NOW(), 
     ข้อมูลบันทึก=DATE_ADD(NOW(), INTERVAL x.วัน DAY)
FROM Y 
JOIN X ON X.รายการ = Y.รายการ
WHERE Y.รายการ = 'A'

INSERT INTO Y (
     รายการ, 
     วันปัจจุบัน, 
     ข้อมูลบันทึก
) SELECT 
    รายการ, 
    NOW(), 
    DATE_ADD(NOW(), INTERVAL วัน DAY)
FROM X
WHERE รายการ = 'A'

Dim d1 As Date
        Dim d2 As Date
        d1 = Now
        d2 = Date.Today.AddDays(10)