vb.net textboxu kelimelere ayırmak

merhab arkadaslar vb.net te bır proje uzerınde calısıyorum bır adet textbox var buraya gırılne cumleyı kelımelerıne ayırım textbox a yazmam gerekiyor

Public Class Form1
Dim kelime() As String
Dim karakterler() As Char = {., ,, }

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sayac As Integer
kelime = TextBox1.Text.Split(karakterler)
For sayac = 0 To kelime.Length 1
ListBox1.Items.Add(kelime(sayac))
Next
End Sub
End Class[/Code]

boyle bir code var fakat burada listbox a yazıyor bunu tek tek nasıl textboxlara yazırabılırım

ornek "bugun hava cok guzel" bunu textbox1 e bugun textbox2 ye hava textbox3 e cok textbox 4 e guzel yazsın