با سلام.
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 برای کاری که قصد انجامش را دارید وجود دارد.