VS_Parse()           Parse a string for the next word

Description:

  VS_Parse() will return the first word in a string.

Syntax:     

  c_FirstWord = VS_Parse( c_Sentence )

Pass:       

  c_Sentence is a character expression containing the string to be
  parsed.

Return:     

  c_FirstWord is the first word of c_Sentence

Notes:      

  VS_PARSE() will modify the passed string if you pass it by reference
  instead of by value (i.e. preceed it with the @sign)

Example:    

  c_Temp = "This is a test"
  ? VS_PARSE(@c_Temp)
  ? c_Temp

  OUTPUT:  This
           is a test

Usage: