Colocar la hora y la fecha en la barra de titulo de un MDI Form en Visual Basic 6

Vamos a darle click al objeto tipo Timer en el formulario MDI.

el valor de la propiedad Interval del objeto Timer debe ser 1000.

elimine el valor de la propiedad Caption del formulario.

en el procedimiento Timer del objeto escriba el siguiente codigo:

.Caption = "" &
Format(Date, "dd-mm-yyyy") & " " & Format(Now, "h:nn:ss AM/PM")

en NombreForm escriben el nombre de su formulario MDI y Nombre de la aplicación (o podrian poner el nombre que deseen).
En el procedimiento Load del formulario escriba el siguiente código:

timer1.Enabled = true

y al ejecutar el formulario veran que el titulo del formulario lucira asi: