The only way to really format data in notepad, is to use tabs. Say,
name <tab><tab>Position<tab><tab>Counseled by date
which is easy enough with:
lineoftext = txtname.text & vbtab & vbtab & txtpos.text & vbtab & vbtab & txtcname.text & vbtab & vbtab & DateTimePickerdoc.Value.ToShortDateString