Tjekke om variabel er tom

Jeg har en stump kode, som bruger nogle data jeg får ud fra Active Directory (AD). Disse bruges til at lave en afsenderperson på et brev.

Jeg vil derfor godt lave et tjek, der sørger for at der ikke opstår tomme linier i mellem kontaktoplysningerne på afsenderen af brevet.

Opbygningen er så følger:
navn
stilling
telefon
mobil
email

Hvis telefon og mobil er tomt for en person, så vil jeg få 2 tomme linier, dem vil jeg undgå.

Jeg har denne kodestump, der ligger data fra AD over i nogle variabler.

While (Not found) And (Not rs.EOF)
  If LCase(cbAfsender.Value) = LCase(rs.Fields("name")) Then
    found = True

    Me.afsName = rs.Fields("name")
    Me.afsTlf = rs.Fields("telephoneNumber")
    Me.afsMail = rs.Fields("mail")
    Me.afsTitle = rs.Fields("title")
    Me.afsMobile = rs.Fields("mobile")
    Me.afsDistName = rs.Fields("distinguishedName")
                   
  End If
 
  rs.MoveNext
Wend


Senere når jeg opretter brevet, ved klik på OK, så har jeg følgende:

    'afsender
    Dim strAfsender As String
    strAfsender = Me.afsName & vbCrLf & _
                  Me.afsTitle & vbCrLf & _
                  Me.afsMail & vbCrLf & _
                  Me.afsTlf & vbCrLf & _
                  Me.afsMobile
                 
   
    If IsEmpty(Me.afsTlf) Then
   
        Debug.Print strAfsender
   
    End If

Den fanger ikke på IsEmpty for afsTlf er åbenbart ikke tom, men hvordan sikre jeg mig så imod tomme linier.