Very simple:
VB Code:
  1. Private Sub Form_Load()

  2.     Open "c:\test.txt" For Output As #1

  3.         'file is empty

  4.     Close #1

  5. End Sub