Public Sub Write( _
   ByVal Text As String _
)