Visual Basic Filestream Write String