Visual Basic.NET - Consulta de fecha

Hola amigos del foro, quisiera consultarles como lo hago para ocupar la fecha en una etiqueta, yo lo estoy haciendo así, pero me manda un error en el format.

Dim HOY As Date
HOY = Now
LABELFECHA = Format(HOY, "DD/MM/YYYY")
TXTNOMBRE.Focus()
Favor de ayudarme con este pequeño código, desde ya muchas gracias.

tienes que convertir la fecha as string para poder darle formato

Dim HOY As Date
Dim fecha As String
HOY = Now
fecha = Format(HOY, "dd/MM/yyyy") '
Labelfecha.Text = fecha
TXTNOMBRE.Focus()