Error1 \t Значение типа «Строка» не может быть преобразовано в «System.Windows.Forms.Control»

Question

Вот мой код:

Private Sub tvw1_AfterSelect(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles tvw1.AfterSelect 
    Dim MPath As String 
    MPath = "D:\VB6_Projects\ChurchPresentation\ChurchPresentation\Bible_TH\Bible1971\" 
    Dim str As String 
    Dim strArr() As String 
    Dim count As Integer 
    If tvw1.Nodes(0).Nodes(0).Nodes(0).IsSelected = True Then 
     rtbThai.LoadFile(MPath & "genesis1.txt", RichTextBoxStreamType.PlainText) 
     str = rtbThai.Text 
     strArr = str.Split(ChrW(10)) 
     For count = 0 To strArr.Length - 1 
      lstThai1971.Controls.Add(strArr(count)) 
      'MessageBox.Show(strArr(count)) 
     Next 
    End If 
End Sub 

Это работает, если я показываю MessageBox, ЬиМ это не если Я использую lstThai1971.Controls.add(strArr(count)).

Что не так в этом коде?

Answer 1

Предполагая lstThai1971 является ListBox рода, я ожидаю, что вы хотите:

lstThai1971.Items.Add(strArr(count)) 

Вы также можете добавить весь массив, используя AddRange

lstThai1971.Items.AddRange(strArr)