问题:编写VB程序,在文本框中输入一个简单的英文句子,找出这个句子中最长的单词
答案:↓↓↓ 方正的回答: 网友采纳 '不用这么复杂,你的代码太长没有看,如果一定用你的代码,我再给你修改一下OptionExplicitPrivateSubCommand1_Click()DimiAsLong,arr,nAsLongIfInStr(Text1,"")>0Thenarr=Split(Text1)Fori=0ToUBound(arr)IfTrim(arr(i))""ThenIfLen(Trim(arr(i)))>nThenn=iEndIfNextMsgBox"最长单词:"&arr(n)EndIfEndSub |