Если я устанавливаю переменную с помощью `CreateObject()`, мне нужно ее очистить, установив ее в "Nothing" после использования?

Если я устанавливаю переменную с помощью CreateObject(), мне нужно ее очистить, установив ее в Nothing после использования?

Dim foo
Set foo = CreateObject("SomeAssembly")
foo Bar
Set foo = Nothing

Я только что нашел этот пост Эрик Липперт:

Механизм script автоматически очистит эти переменные, когда они выйдут из области видимости, поэтому очистка их утверждения до того, как они выйдут из области видимости, кажется бессмысленной.

Ответ 1

Если я устанавливаю переменную с помощью CreateObject(), нужно ли ее очищать, не устанавливая ее после использования?

Обычно вы этого не делаете, но это стало известно в сообществе VB. Если вы - сверхспособный человек, вам не помешает отразить дурной глаз, установив переменные в Nothing, когда вы закончите с ними, но он тоже ничего не помогает.

Редкими случаями, когда вам нужно установить переменную в Nothing, являются те случаи, когда:

вы создали круговую ссылку, которую сборщик мусора не может очистить.
объект стоит дорого, но переменная долговечна, поэтому вы хотите, чтобы она была очищена раньше.
для реализации объекта требуется конкретный порядок выключения, который должен поддерживаться
и т.д.

Если я не в одном из этих случаев, я не устанавливаю переменные в Nothing. У меня никогда не было проблем с этим.

Ответ 2

Я редко делаю это: -

Set foo = Nothing

Вот почему...

Рассмотрим: -

Function DoStuff()
    Dim foo : Set foo = CreateObject("lib.thing")
    ''# Code that uses foo
    Set foo = Nothing
End Function

Так как foo вот-вот выйдет из области действия, в любом случае назначение Nothing в foo является излишним, поэтому я не беспокоюсь.

Рассмотрим: -

Function DoStuff()
    Dim foo : Set foo = CreateObject("lib.thing")
    ''# Code that uses foo
    Set foo = Nothing
    ''# Loads more code that doesn't use foo
End Function

Теперь это случай, когда назначение Nothing имеет смысл, поскольку в противном случае оно удерживается потенциально намного дольше, чем это необходимо. Однако в таких случаях код является кандидатом на рефакторинг. Тот факт, что функция продолжает делать гораздо больше материала, не нуждающегося в foo, указывает, что блок foo -using-кода действительно принадлежит в своей собственной функции: -

Function DoStuff()
    ''# Code that calls FooUsage
    ''# Loads more code that doesn't use foo
End Function

Function FooUsage(someParams)
    Dim foo : Set foo = CreateObject("lib.thing")
    ''# Code that uses foo
    FooUsage = someResult
End Function

Есть случаи, когда назначение Nothing для целей освобождения памяти целесообразно, но я делаю это в особых случаях. В нормальном коде я считаю, что это редко необходимо.

Возможно, одним из драйверов, стоящих за лагерем "Всегда задано ни к чему", является то, что многие VBScripters записывают последовательные сценарии, которые не учитываются в процедурах Function и Sub.