学进去

在Visual Basic中，数值型的数据并不是无限范围的，比如integer类型表示数的范围为﹣32768至32767；long类型表示数的范围大约为±21亿，当我们需要表示的数超过这一范围时，我们通常借助数组来存储。小明同学为此设计了一个加法运算器，用来处理大数据。部分界面如图所示，在Text1和Tex2中输入两个大数据，单击Conmand1按钮，可实现两个数的相加，并将运算结果输出到Text3中。程序运行界面如图所示：

实现上述功能的VB程序如图，请在划线处填入合适的代码。
Privale Sub Command1_Click()

Dim datal, data2 As String Dim lenl, len2 As Integer

Dim i, j, k, max, t As Integer

Dima(1To100)AsInteger，b(1 To 100) As Integer,c(1To 100) As Integer

datal = Text1.Text: data2 = Text2. Text

len1 = Len(datal ):len2 = Len(data2)

i=1

Do while i<=50
a(i) =0
b(i) = 0
i=i+1
Loop
For i =1 To lenl

a(i) = Val( Mid( datal , len1 - i + 1,1))

Next i

For j=1 To len2
b(j) = Val( Mid(data2, len2 - j + 1, 1))
Next j
If len1 > len2 Then max = lenl Else max = len2
k =1
Do while k< = max
①______
If c(k) > = 10 Then
②________
t=1
Else
t=0
End If
k=k+1
Loop
If t>0 Then

max =max+1

c(max)=1

End If

For i =1 To_③______
Tex13.Text=Trim(c(i)) + Text3. Text

'trim()的作用是去除字符串中的空格符

Next i
End Sub