Visual Basic.NET - insertar una fecha por medio de instruccion sql

Hola a todos
tengo una base de datos en acces y estoy insertando datos en ella estoy trabajando con visual studio 2012
hasta el momento no he tenido problemas al ingresar numeros y textos previamente llenados en una caja de texto


con esta linea de codigo

Me.VentasTableAdapter.InsertQueryVentas(MARCATextBox.Text,CLIENTETextBox.Text, PRECIOTextBox.text)


el problema esta cuando intento ingresar la fecha actual que esta visualizada en otra caja de texto

de esta manera
Me.VentasTableAdapter.InsertQueryVentas(MARCATextBox.Text,CLIENTETextBox.Text, PRECIOTextBox.text, Fec.text)

mensaje de arror
La conversión de la cadena "12-23-2014" en el tipo 'Date' no es válida.


favor su ayuda

Hola, supongo que el campo "fecha" de tu bbdd es del tipo Date, intenta convertir a Date tu cadena fecha antes de insertarla. Sino cambia el tipo de datos Date a String.

Saludos

Hola si, entiendo que debo convertir a String, pero ahi esta el problema no me acuerdo como se hace.

si me pudieran orientar seria genial.

(mi Campo Fecha de la BDD es de Tipo Date)

Saludos.

La clase Convert no deberia dar problemas.

Convert.toDateTime( Fec.text)

Tambien puedes probar con
DateTime.Parse( Fec.text)


Me.VentasTableAdapter.InsertQueryVentas(MARCATextBox.Text,CLIENTETextBox.Text, PRECIOTextBox.text, Convert.toDateTime( Fec.text))

si el archivo de acces se encuentra en la misma PC, no habria problemas usar Convert.toDateTime( Fec.text) pero si se encuentra en otra PC, probablemente si. en caso este en otra PC, mandarias como formato texto YYYYMMDD y lo insertas como si fuera fecha(deberia salir ya que se usa el ISO)o usas CONVERT(DATE o equivalente en Acces.

Seria bueno que veas https://social.msdn.microsoft.com/Forums/es-ES/50fb551b-a9cf-4b53-a9e7-068f3cc86321/como-insertar-fechas-en-mi-base-de-datos-desde-visual-studionet-2008?forum=vbes

Creo que deberías de convertir a formato fecha el contenido de la caja de texto con esta instrucción:
String.format("{0:dd-MM-yyyy}", convert. Todatetime(valor_caja-texto))

En lugar de Fec.text pon la linea de arriba

Muchas gracias me sirvió la información problema solucionado.