The revolutionary project management tool is here! Plan visually with a single glance and make sure your projects get done.
''''''''creating csv file Dim sFileText As String Dim iFileNo As Integer Dim csvflname As String Dim origfile As String csvflname = Text1.text & ".csv" iFileNo = FreeFile 'open the file for writing Open csvflname For Output As #iFileNo 'please note, if this file already exists it will be overwritten! 'write some example text to the file Print #iFileNo, Text1.text, Combo2.text, DTPicker1.Value, 0, 0, Text4.text, Text5.text '''''close the file (if you dont do this, you wont be able to open it again!) Close #iFileNo