// COPYRIGHT DASSAULT SYSTEMES 2000
...
   /**
    * Returns a string which contains a given number of characters
    * from the current position in the stream.
    * @param iNumOfChar
    *   The number of characters to read
    * @return
    *   The retrieved string
    * <dl>
    * <dt><b>Example:</b>
    * <dd>
    * This example retrieves the next fifty characters 
    * of the TextStream <tt>TestStream</tt> in the 
    * stream <tt>ReadString</tt>.
    * <pre>
    * Dim ReadString As String
    * Set ReadString = TestStream.<font color="red">Read</font>(50)
    * </pre>
    * </dl>
    */
    HRESULT Read(in long iNumOfChar, inout /*IDLRETVAL*/ CATBSTR oReadString);

...