【正确答案】正确答案：【操作步骤】 GetWords＝m m＝GetWords(Text1．Text，ch) '－－－－－－－考生编写的程序代码从这里开始 k＝0 For i＝1 To m If Len(ch(i))＝5 Then k＝k＋1 End If Next i Labe11．Caption＝k '－－－－－－－考生编写的程序代码到这里结束 步骤2：按＜F5＞键运行程序，单击各个按钮测试验证。 步骤3：按要求将文件保存至考生文件夹中。