Попытка присвоить значение из списка в текстовое поле

Question

У меня есть приложение в VB.Net, которое отображает результаты математической операции в список. Например, у меня 12345 + 12345 = 24690. Я пытаюсь скопировать первые 2 числа (12345 и 12345) в 2 разных текстовых поля, когда выбран элемент списка. Вот код, который у меня есть:

  'Make sure that we have a selected item before continuing
   If listBox1.SelectedIndex = -1 Then
     Return
   End If

  'Get the text of the selected item
   Dim selectedtext As String = listBox1.Items(listBox1.SelectedIndex).ToString()

  'Split the item by the + and the = into an array of strings
   Dim parts As String() = selectedtext.Split("+"C, "="C)

   If parts.Length > 2 Then
     'Define a variable for each part
      Dim part1 As String = parts(0).Trim()
      Dim part2 As String = parts(1).Trim()

      txtNumberOne.text = part1
      txtNumberTwo.text = part2

   End If

Во время выполнения он работает только с индексом 1, когда он выбран. У меня отображается 10 записей (от 0 до 9). Ни один из других индексов не отображается в текстовых полях.

Подскажите, пожалуйста, что не так с этим кодом?

Спасибо.