Cómo asignar valores a datos de tipo fecha en VB

En VB6, hay cuatro formas comunes de asignar valores a variables de tipo Fecha; consulte el siguiente código de muestra

Opción?Explícito

Privado ?Sub? Form_Click()

Dim?dt?As?Date

'Método 1: Utilice la función de fecha proporcionada por el departamento

dt=Date

Imprimir dt

'Método 2:? Utilice la función Ahora proporcionada por el sistema

dt?=?Now

Imprimir dt

'Método 3: Usar cadena

dt ?=?"2015-8-23"

Imprimir?dt

'Forma 4: ?La fecha comienza con #

dt?=?#9 /3 /2015#

Imprimir?dt

¿Fin?