if nm <> "" then
   MsgBox("Test",0,"test")
end if