Visual Basic - TEXTBOX quien lo domina bien AYUDA .......

Life is soft - evento anual de software empresarial
 
Vista:

TEXTBOX quien lo domina bien AYUDA .......

Publicado por Rod (69 intervenciones) el 27/01/2002 05:41:07
Solo quiero que un textBox me presente la fecha actual y que cuando el usuario almacena el REGISTRO que este CAMPO llamado fecha se guarde tambien

Alguien me envio este ejemplo pero no funciona

txtFe.text=format(Now, "0#0#0#")
pero no funciono
Ayudad por favor
Rod
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE: TEXTBOX quien lo domina bien AYUDA .......

Publicado por Josep (5 intervenciones) el 27/01/2002 13:52:50
Prueba con esto:
Form1.text1.text=date

Con esto pondras la fecha del sistema en le TextBox y en el mismo formato que tengas definido en el Windows.

Si quieres cambiar el format puedes hacerlo asi:

Form1.text1=format(Now, "dd-mm-yyyy")

Espero haberte sido de ayuda.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE: TEXTBOX quien lo domina bien AYUDA .......

Publicado por Jose (3 intervenciones) el 27/01/2002 16:35:45
Para mostrar datos tipo Date/Time en un TextBox asignale a la propiedad Text las funciones que te devuelven estos datos.

Date
Devuelve un tipo Variant (Date) que contiene la fecha actual del sistema.

Time
Devuelve un valor de tipo Variant (Date) indicando la hora actual del sistema.

Now
Devuelve un valor de tipo Variant (Date) que especifica la fecha y hora actuales de acuerdo con la configuración de la fecha y la hora del sistema de su equipo.

Text1.text = Date

Así mismo, si el control esta enlazado con algún control proveedor de datos, éstos se actualizarán mediante el método Update, después de ejecutar los métodos del control AddNew o Edit.

Si lo que quieres es guardar los datos directamente en un Objeto Recordset tienes que hacer esto:

'Se supone que el Recordset (rst) ya está creado y abierto.

rst.AddNew
rst("Campo1") = "valorCampo1"
rst("CampoFecha") = Date
rst.Update
rst.Bookmark = rst.LastModified
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar