una stringa di lunghezza vuota non è null, ne consegue che
null <> ""

per risolvere puoi implementare il controllo in questo modo:

codice:
if Trim(rs("messaggio") & "") = "" then


ps: attento ai titoli dei threads!