gracias y te mantento al tanto...
Código
Private Sub lstadd_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) 'el tc1 es un tabcontrol, tc1.SelectedIndex con esto obtengo el pag actual que es tiene el mismo indice que el 'del listbox.... If VerifyItem(lstname(tc1.SelectedIndex).SelectedItem.ToString) = False Then lst1.Items.Add(lstname(tc1.SelectedIndex).SelectedItem) GetInformation(lstname(tc1.SelectedIndex).SelectedItem) Suma() End If End Sub Private Sub lstselect_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) If lstname(tc1.SelectedIndex).SelectedIndex <> -1 Then lsttime(tc1.SelectedIndex).SetSelected(lstname(tc1.SelectedIndex).SelectedIndex, True) End If Next End Sub