Second closing braket is missing. Sorry.
This must be the correct syntax:

if Len(NZ(rst!Username,"")) > 0 then
MsgBox(rst!Username)
else
MsgBox("Empty!")
end if