■実行時バインディングによる参照
Dim オブジェクト変数 As Object Set オブジェクト変数 = CreateObject("Scripting.FileSystemObject")
■事前バインディングによる参照
「参照設定」ダイアログボックスで「Microsoft Scripting Runtime」への参照を有効に設定する
Dim オブジェクト変数 As FileSystemObject Set オブジェクト変数 = New FileSystemObject
または
Dim オブジェクト変数 As New FileSystemObject