como colocar fecha del sistema en un formulario de vb

[juanutcm]

ok te paso como podria ser:

Private sub Form_Load()
Dim MiFecha
Dim MiHora

MiFecha=Date
MiHora=Time

'Aqui lo puedes hacer de dos formas
'Con etiquetas

lblFecha.Caption=MiFecha
lblHora.Caption=MiHora

'O con TextBox

txtFecha.Text=MiFecha
txtHora.Text=MiHora
End Sub

'Ahora en el evento click del boton
Private Sub Command1_Click()
'Aqui tambien tienes dos formas depasarlo a la base de datos puedes hacer que la fecha y la hora se guarden en un campo distinto osea cada dato es un campo o bien en un solo campo lo puedes hacer todo abajo se ejemplifica mejor

'Aqui se hace cada dato por separado
CampoBaseDatosFecha=txtFecha.Text'O la etiqueta como lo prefieras
CampoBaseDatosHora=txtFecha.Text

'Aqui se hace junto todo
CampoBaseDatosFechaHora=txtFecha.Text & " " &txtHora.Text
End Sub

Bien espero te ayude... suerte