Visual Basic - Ayuda con fecha en vb y sql

hola programadores

Necesito guardar la fecha y la hora ambos en un solo campo de sql el campo es del tipo datetime.

Estoy haciendo lo siguiente:

dim fecha as date
fecha = now 'obtengo la hora y la fecha

pero cuando lo guardo en la base de datos me dice que los tipo no corresponden

Que es lo que esta mal o que otra opcion tengo????

Graxias
[email protected]

Prueba con esto:

Public Function GetFormatDateMySQL(Fecha As String) As String
GetFormatDateMySQL = Format(Fecha, "yyyy/mm/dd hh:mm:ss")
End Function

Donde:
fecha_hora = GetFormatDateMySQL(fecha)

Supuestamente seria asi verdad?

fecha= now
fecha_hora = GetFormatDateMySQL(fecha)

Aperece el "El tipo de argumento byref no coincide"
Estoy poniendo la funcion en el modulo

Ya me salio todo esta bien