カテゴリ

VBA/ASPなど

Send to Kindle
Option Explicit
' オブジェクト生成
Sub objSet(ByRef obj As Object, strType As String)
    Set obj = CreateObject(strType)
End Sub
' オブジェクト廃棄
Sub objUnSet(ByRef obj As Object)
    Set obj = Nothing
End Sub

コメント