編寫“字母出現(xiàn)頻率測(cè)試”程序，實(shí)現(xiàn)如下功能：在文本框 Text1 中輸入英文句子，單擊“統(tǒng)計(jì)”按鈕，在列表框 List1 中顯示小寫字母出現(xiàn)的次數(shù)，同時(shí)顯示字母出現(xiàn)頻率最高的次數(shù)。程序運(yùn)行界面如題16圖所示。

（1）在設(shè)計(jì)程序界面時(shí)，使應(yīng)使用題16圖所示“控件工具箱”中的

3

3

（填寫相應(yīng)編號(hào)）添加“統(tǒng)計(jì)”按鈕。
（2）實(shí)現(xiàn)“統(tǒng)計(jì)”功能的 VB 程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub CmdTJ_Click （　　）
Dim count（25）As Integer
Dim ch,ch2As String
Dim m As Integer
ch=Text1．Text
For k=1To Len（ch）
①
n=Asc（ch2）-Asc（“a”）
If  n＞=0And n＜=25Then
count（n）=count（n）+1
List1．AddItem“字母“+ch2+“出現(xiàn)“+Str（count（n））+“次“
End If
Next k
m=count（0）
For k=1To 25
If②Then  m=count（k）
Next k
Label1．Caption=“字母最高出現(xiàn)“+Str（m）+“次“
End Sub