讨论一下类似“功能”是怎么写的？

[fffddd]

Set fso = Server.CreateObject("Scripting.FileSystemObjectct")
Set fout = fso.CreateTextFile("sss.txt")
fout.WriteLine "123"
fout.close
不知道怎么描述，就是set fout=fso.CreateTextFile好象fout有点象继承fso。这种在COM中是怎么写的？而且fout还有WriteLine 和close属性！请各位指点！奇怪中。。。