Народ Help

[Valerik]

Привет всем !
Вот прогу пишу по сети, так вот в чом ошибка, когда я пытаюсь выкинуть Client, то у меня вылетает злобная ошибка вот прямо тута.
Так что, кто знает в чом ошибка али есть какие нить соображения, пишите хотелось бы услышать.

Private Sub mnuDel_Click()
Socket(Me.Combo1.ListIndex).Close
Call socket_Close(Me.Combo1.ListIndex)
End Sub

Пасибки, что непрошли мимо

[Taras2]

Привет всем !
Вот прогу пишу по сети, так вот в чом ошибка, когда я пытаюсь выкинуть Client, то у меня вылетает злобная ошибка вот прямо тута.
Так что, кто знает в чом ошибка али есть какие нить соображения, пишите хотелось бы услышать.

Private Sub mnuDel_Click()
Socket(Me.Combo1.ListIndex).Close
Call socket_Close(Me.Combo1.ListIndex)
End Sub

Пасибки, что непрошли мимо

А зачем вторая строка? socket_Close - событие вызываемое автоматически, после исполнения первой.

[Valerik]

Допустим вторая строка ненужна !
но всётаки выдаёт ошибку !

[RayShade]

Елки палки! Ну сколько можно раз говорить ПИШИТЕ ЧТО ИМЕННО ЗА ОШИБКА У ВАС ВЫЛЕТАЕТ

Иначе на кофейной гуще гадать можно долго и безрезультатно.

[Valerik]

Базариш RayShade, неподумал !
Вот что вылетает :

Run-time error '341'
Invalid control array index

Заранее, пасибки за внимание.

[RayShade]

Корень проблемы:

Итемы в массиве контролов нумеруются с 0 а итемы в боксе с 1.

Поэтому я бы от me.combo1.listindex отнял бы единицу.