Texte girilen cümleyi kelime kelime istenen karakterle listboxa ekleme VB.NET


[code lang=”vbnet”]Public Class Form1
Dim kelime() As String
Dim karakter() As Char
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sayac As Integer
karakter = TextBox2.Text
kelime = TextBox1.Text.Split(karakter)
For sayac = 0 To kelime.Length – 1
ListBox1.Items.Add(kelime(sayac))
Next
End Sub
End Class[/code]