خطا در invalid double

[dr.mohammad 68]

سلام این خطا برا چیه؟

Sub Button7_Click
	Panel1.Visible = False
	
	a = DateTime.Time(DateTime.Now)
	
	d = DateTime.Date(DateTime.Now)
	sql.ExecNonQuery("INSERT INTO tb1 (Id,name,ghad,d1,d2) VALUES (null,'"&EditText1.Text&"','"&EditText2.Text&"','"&a&"','"&d&"')")
End Sub

[مهدی ایزدی 9,203]

درود

فکر کنم متغیر a و d رو شما از نوع int تعریف کردید

این رو به string تغییر بدید مشکل حل میشه 

[dr.mohammad 68]

من اونو درست کردم خطاش عوض شدhttp://s6.picofile.com/file/8259216626/Screenshot_36_.png