编一子过程MaxLength(s，MaxWord)，在已知的字符串s中，找出最长的单词MaxWord。假定字符串s内只含有字母和空格，空格分隔不同的单词。程序运行界面如图2.6.3所示。
算法思想：
(1) 首先利用InStr函数从S中从左开始找第一个出现的空格，利用Left函数分离出空格左边的单词，与最长单词比较；
i=InStr(s,” “) ‘ 找第一个出现的空格
Word=Left(s,i-1) ‘ 分离出空格左边的单词
（2）取S中剩余字符串，重复（1），直到S为空。
s=Mid(s,i+1) ‘ 取S中剩余字符串

www.baidu.com

可以用splite(s，“ ”)字符串到string数组，再用 Length获取字符个数，进行比较。一定要用你写的那个算法来么？