Visual Basic - formato fecha en un dbgrid

solicito me apoyen con es dbgrid no puede ejecutar la fecha actual al momento de ejecutar e declarado un Dim cadena as string, pero este aparece 30 Diciembre 1899 quiero que me indica la fecha actual DD MMMM YYYY
Gracias

grddetalle.CaptionStyle.Font.Size = 12
grddetalle.CaptionStyle.BackColor = vbWhite
grddetalle.CaptionStyle.ForeColor = vbBlack
grddetalle.Caption = "Calculo de Simulación al " & Format(cadena = Date, "DD MMMM YYYY") AQUI QUIERO QUE EJECUTE LA FECHA ACTUAL
Screen.MousePointer = vbDefault

M.Saavedra
[email protected]

hola prueba con este formato..

MsgBox Format(Date, "DD/MM/YYYY").. que hace cadena dentro de la Funcion FORMAT..??