با سلام.
1-Late binding:
Dim fso = CreateObject("scripting.FileSystemObject")
Dim ts As Object
2-Early binding:
از منوی project گزینه add reference را باز کرده از سربرگ com گزینه microsoft scripting runtime را به پروژه اضافه کنید و:
Dim fso As New Scripting.FileSystemObject
Dim ts As Scripting.TextStream
ولی در کل راههای بهتر و ساده تری هم در .net برای کاری که قصد انجامش را دارید وجود دارد.