[RESOLVED] Changing an open path for saving depending on the number in a textbox?

Hi there everyone. Last year I was working on an attendance prog that would give students the option of adding their birthdays. That prog would only hold one roster of students.

This is the code I use to save to a textfile.


Now the program has 6 rosters, so I was wondering. Is there a way to change the save path, to something else depending on what number is in a textbox called RosNumChosen.text?

Like could I change the line
Open App.Path & "\StudentRosters\Roster1\StudentBdaysROSTER1\StudentBday1.txt" For Output As #iFileNo

to

if RosNumChosen.text = "1" then
Open App.Path & "\StudentRosters\Roster1\StudentBdaysROSTER1\StudentBday1.txt" For Output As #iFileNo
end if

if RosNumChosen.text = "2" then
Open App.Path & "\StudentRosters\Roster2\StudentBdaysROSTER2\StudentBday1.txt" For Output As #iFileNo
end if

Rather than do the same sort of save code over and over in a repetitive way?

THANKS!