题目

编写了一个寻找最长连续相同子串的程序，功能如下：程序运行时，在文本框Text1中输入一个非降序字符串。单击输出按钮Command1后，在文本框text2上显示最长相同子串。程序运行界面如图所示。 （1） 实现上述功能的VB程序如下，请在划线处填入合适的代码。Private Sub Command1_Click()Dim a(1 To 100) As String, s As StringDim i As Integer, m As Integer, n As Integer, pos AsIntegerDim L As Integer, R As Integer, length As Integer, MaxAs Integers = Text1.Textn = Len(s)For i = 1 To n a(i) = Mid(s, i,1) Nex——I reminded you not to forget the appointment.   ——  ______A.So did IB.So I didC.So did youD.So you did