Double click item from Listbox to textbox not working???

[kre1973]

I'm loading a Listbox with a textfile and splitting the record into array, only adding the "Grp_elements(1)" into the listbox. That part works ok, but when I doubleclick an item in the Listbox I want to add the "Grp_elements(0)" to a textbox this part doesn't work...

It says that Grp_elements(0) is not declared...Wht am I doing wrong???

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 Dim Group As New IO.StreamReader(AlphaFileGroup)
        While Group.Peek > -1
            Dim Grp_line As String = Group.ReadLine()
            Dim Grp_elements() As String = Grp_line.Split(("|"))
            ListBox1.Items.Add(Grp_elements(1))
        End While
 Group.Close()
End Sub

Private Sub ListBox1_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
        TextBox1.Text = ListBox1.SelectedItem(Grp_elements(0))
End Sub

 

[TipGiver]

What you are doing wrong is that the 'Grp_elements' array is declared in the form1_load event. Therefore, it is visible only in that code block.

To make it 'class' visible write:
Private Dim Grp_elements() As String = {}
in the class.

Then replace 'Dim Grp_elements() As String = Grp_line.Split(("|"))'
with: Grp_elements = Grp_line.Split(("|"))

 

[TipGiver]

To do what you want, there are some ways. I'll point 2.

#1. (suggested ?)
Have an other string array variable (example name: abc) where you will save the Grp_elements(0). Do that in your while/loop. Note that you have to dim that new variable sameway as the previous... in the class so it is visible to all code blocks.

In the 'ListBox1.DoubleClick' event write:

  dim ind as integer = ListBox1.SelectedIndex
  if ind = -1 then
    TextBox1.Text = abc(ListBox1.SelectedIndex)
  else
    TextBox1.Text = "Double click something..."
  end if

#2. (not suggested ?)
. Get the selected index of the listbox
. Open again your file containing the data
. 'ReadLine' until the selectedIndex value
. 'ReadLine' again but now store somewhere the the '.ReadLine.Split("|")(0)'. This should be the textbox's text.

Note that it will not return something, or crach (i am not sure) if the selected index is -1. Take care of it as shown above.


Hope these help