最大回文子串?；匚淖址蔷哂谢匚奶匦缘淖址杭丛撟址畯淖笙蛴易x，與從右向左讀都一樣。如：鳳落梧桐梧落鳳，abcba 等?！白畲蠡匚淖哟笔侵敢粋€字符串中長度最大的回文字符串，其基本算法思想如下：
（1）每個回文都有一個“中心”，當(dāng)回文字符數(shù)為奇數(shù)時，中間的那個字符就是回文中心；但是當(dāng)回文的字符數(shù)為偶數(shù)時，回文的中心是最中間的那兩個字符，且這兩個字符相同。
（2）對任意一個字符或者相同的兩個連續(xù)字符，我們都可以假設(shè)它為回文的“中心”，向它的左右兩邊擴展出盡可能長的回文。對于每種假設(shè)，我們都能得到一個回文，而最長回文必定由其中的某個假設(shè)中得到。
現(xiàn)編寫一個 VB 程序，在 Text1 中輸入一串字符，單擊“統(tǒng)計”按鈕，在 Text2 中顯示該字符串中的最大的回文子串（長度相同時，輸出最左邊的子串）。運行界面如圖所示。
請回答下列問題：
（1）當(dāng) Text1 中輸入“123321344332423112113123”時，則輸出的結(jié)果為

3112113

3112113

 。
（2）請在橫線處填入合適的代碼。
Dim n As Integer
Dim a（0To 100）As String
Private Sub Command1_Click（　　）
Dim s As String
Dim left As Integer,right As Integer,i As Integer
Dim max As Integer,m As Integer,b1As Integer
'變量 b1 用于記錄回文子串的左端起點
Text2．Text=““
s=Text1．Text
n=Len（s）
For i=1To n
a（i）=Mid（s,i,1）
Next i
max=0：left=0：right=0
For i=1To n
left=i
right=i
m=longest（left,right）
If m＞max Then

①

①

max=m
End If
left=i
right=i+1
If a（left）=a（right） Then
m=longest（left,right）+1
If m＞max Then
b1=i-m\2+1
max=m
End If
End If
Next i
For i=b1To

②

②

Text2．Text=Text2．Text+a（i）
Next i
End Sub
Function longest（left As Integer,right As Integer） As Integer
Dim p As Integer
p=1
Do While left＞1 And right＜n And

③

③

left=left-1
right=right+1
p=p+2
Loop
longest=p
End Function