【正确答案】正确答案：审题分析 程序设计思路：从文本框的第一个字符开始依次检查其后面的每一个字符，若发现空格则将其之前或两个空格之间的字符串作为一个单词添加到列表框中。在Do循环(指内循环)，循环条件为：取出的字符为非空格字符且取字符的起始位置没有超出文本框的总字符数，表达式为：Mid(S1，I1，1)◇" "And Il＜=Len(S1)，其中S1=Text1．Text，将Mid函数从文本框中取出的非空格字符，逐个连接成一个单词，语句为：S2=S2＆Mid(S1，I1，1)，每执行一次循环体取字符的起始位置加1，即I1=l1+1。当遇到空格时结束循环，将得到的单词(即变量S2的值)用AddItem方法添加到列表框中，并且清空变量S2，将取字符的起始位置加1。 之后继续执行内循环以得到下一个单词，直到取字符的起始位置(即变量I1的值)超过文本框的总字符数为止，外循环的条件为：11＜=Len(S1)。 操作步骤 步骤1：打开考生文件夹下的工程文件sjt3．vbp。 步骤2：打开代码编辑窗口，去掉程序中的注释符“′”，将问号“?”改为正确的内容。 参考代码： S1=Text1．Text Do While Mid(S1，I1，1)<>" "And I1 ＜=Len(S1) List1．AddItem S2 S2=" " 步骤3：按要求将文件保存至考生文件夹中。 考点链接 多重循环、选择控件、常用内部函数。