10個のテキストファイルにTextBox1.Textの内容を書き込みたいのでしょうか?
簡易な例ですが、以下のようなことをやりたいのでしょうか?
For i As Integer = 0 To 9
Using sw As New System.IO.StreamWriter("c:\test" & i.Tostring & ".txt", _
False, _
System.Text.Encoding.GetEncoding("shift_jis"))
sw.Write(TextBox1.Text)
End Using
Next