用VB编写求句子中最长单词的程序。输入要求:句子以“.”结束;单词之间用空格分隔,单词没有缩写形式和其它特殊形式。
运行界面如图所示,程序功能:在文本框Text1中输入待统计的句子,单击“统计”按钮Command1,将结果显示在文本框Text2和Text3中。

(1) 观察程序代码,可知“统计”按钮的对象名为_______。(单选,
填字母:
A.统计 | B.TextH | C.Command1 | D.Tj) |
(2)根据题意将下列程序补充完整。
Private Sub Tj_Click()
Dim i As Integer, k As Integer
Dim s As String, ch As String
Dim max As Integer '存储句子中最长单词的长度
Dim ss As String '存储句子中最长的单词
s = Text1.Text
i = 1: k = 0: max = 0
ch = ""
Do While ch <> "." Or i <= Len(s)
ch = Mid(s, i, 1)
If ch <> " " And ch <> "." Then
___________
Else
k = 0
End If
If __________ Then
max = k
ss = ____________
End If
i = i + 1
Loop
Text2.Text = ss
Text3.Text = Str(max)
End Sub