Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Массив Добавлено: 04.02.04 16:22  

Автор вопроса:  LamerOnLine | ICQ: 334781088 

Есть массив переменных пользовательского типа. Нужно удалить какой-либо индекс и сместить остальные чтобы заполнить пробел. Как это сделать побыстрее, не присваивая каждому следующему за удаленным элементу значение последующего? Может как-нибудь через CopyMemory или как-то еще?

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 sne



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
  Web-сайт: hw.t-k.ru
 Профиль | | #1 		Добавлено: 04.02.04 23:59 

 
    Dim ub As Long: ub = UBoundCtl
 
    
 
    If Not ub = 0 And Not ub = &HFFFF Then
 
       Call CopyMemory(ctlData(Index), ctlData(Index + 1), Len(ctlData(Index)) * (ub - Index))
 
    Else
 
        Erase ctlData
 
    End If

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам