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
2006/05/24 水曜日 18:19:34
[ VBA/ASPなど ]新ページ[2006/05/24] | 共通的に利用
コメント (0)
この記事にはまだコメントがついていません。