题目

向文本框Text1中输入一串包含大小写的字母，统计出现次数最多的字母（不区分大小写）并将该字母以大写方式输出到文本框Text2，如有多个字母次数相同的，则只记录最后出现的字母，部分程序如下： Dim c(1 To 26)As Integer s=Text1.Text For i=1 To Len(s)     x=Mid(s, i, 1)     If x>="a" Then         t=Asc(x)-Asc("a")+1     Else         t=Asc(x)-Asc("A")+1     End If        ①      If c(t)>=Max Then Max=c(t):   ②   Next i Text 2.Text=Chr(f+Asc("A")) 划线处应该填入的正确语句是（   ） A . ①c(t-1)=c(t-1)+1②f=t B . ①c(t)=c(t)+1②f=t C . ①c(t-1)=c(t-1)+1②f=t-1 D . ①c(t)=c(t)+1②f=t-1 答案：D

查看本题答案和解析