Il y pas mal de solution à ton problème mais le plus simple est de décomposer lettre par lettre le mot et d'inclure un saut à la ligne entre chaque lettre:
"""""""""""""""
mot="votre var"
For a=0 to len(mot)
label.caption=label.caption+mid$(mot,a,1)+chr$(13)+chr$(10)
next a
"""""""""""""""
(il y a peut-être un hic dans mid$... mais le sens général y est).