VBNet - Форум - Можно ли быстрее очистить переменные?

Вопрос: Можно ли быстрее очистить переменные? Добавлено: 21.03.08 16:52

Автор вопроса: LonerWanderer

Определяю пользовательскую переменную

Type ElementsProperties
  Name As String              ' Имя блока
  Label As String             ' Обозначение по листу
....
  Adres As String             ' Внешний адрес клеммы
End Type ' Всего 40 наименований в описании

Потом обрабатываю коллекцию объектов.
После обработки каждого элемента коллекции обнуляю все переменные:

... 'обрабатываем коллекцию
Call ClearString 'обнуляем переменные
... ' работаем дальше

Sub ClearString()
ElementsTmp.Name = ""
ElementsTmp.Label = ""
...
ElementsTmp.Adres = ""
End Sub

Можно ли как-то быстрее очистить все 40 переменных, а не присваивать им всем пустое значение "" ?
Хочется хоть немного, но ускорить работу, а то еле шевелится.
Ответить

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

Номер ответа: 1 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949	Web-сайт: domkratt.com Профиль \| \| #1	Добавлено: 21.03.08 20:00
	Private Declare Sub RtlZeroMemory Lib "ntdll" (ByVal Addr As Long, ByVal Size As Long) Private Type MyType Var1 As String Var2 As String Var3 As String VarArr(30) As String End Type Dim MyVar As MyType Private Sub Form_Load() With MyVar .Var1 = "Hello" .Var2 = ", " .Var3 = "World" .VarArr(2) = "Executioner" .VarArr(28) = "Simple text" End With Call RtlZeroMemory(VarPtr(MyVar), Len(MyVar)) End Sub Ответить

Номер ответа: 2 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949	Web-сайт: domkratt.com Профиль \| \| #2	Добавлено: 21.03.08 20:01
	З.Ы. Все срочно учимся юзать АПИ Ответить

Страница: 1 |