Shoutbox

put into a button or something

code:

---

open "eatme.txt" For append as 1
print #1, text1.text
close 1

---

if something is not there, vb automaticly creates it

edit :
more advance version

code:

---

Private Sub Command1_Click()
   Open "C:\Text.txt" For Ouput As #1
     Print #1,
Text1.Text
   Close #1
End Sub

---