Есть структура инфы о клиенте
Type UserInfo
IP As String 'IP адрес клиента
Nik As String 'Ник клиента
OS As String 'Система
Status As Integer 'Текущий режим
SDescr As String 'Описание режима
SocketNum As Integer 'Номер соккета, подключения клиента
End Type
и переменная - массив Public OnLineUsers() As UserInfo
Как при подключении нового клиента добавить в OnLineUsers новый индекс. С контролами всё понятно: Load CmdOK(UBound)+1
А как быть с массивом?