編寫一個“二進制加法”程序，算法是從低位到高位逐位相加，逢二進一。程序運行界面如圖所示。
（1）要使程序運行時，文本框Text1的width屬性值為1500，可在Form_Load事件處理過程中添加語句

A

A

（單選，填字母：A．Text1．width=1500/B．Text1．width str（1500）/C．Text1．AddItem 1500  ）
（2）實現(xiàn)上述功能的VB程序如下，請在橫線處填入合適代碼。
Private Sub Command1_Click （　?。?br />Dim m1 As String,m2 As String,sum As String,t As String
Dim n1 As Integer,n2 As Integer,k As Integer,x As Integer
m1=Text1．Text：m2=Text2．Text
If

Len（m1）＜Len（m2）

Len（m1）＜Len（m2）

Then t=m1：m1=m2：m2=t
x=Len（m1）-Len（m2）
Do While x＞0
m2=“0“+m2
x=x-1
Loop
n=Len（m1）：sum=““：k=0
Do While n＞0
n1=Val（Mid（m1，n,1））
n2=Val（Mid（m2，n,1））
sum=Str（（n1+n2+k） Mod 2）+sum

k=（n1+n2+k）\2

k=（n1+n2+k）\2

n=n-1
Loop
If k＜＞0 Then sum=Str（k）+sum
Label4．Caption=sum
End Sub
（3）若在文本框Text1和Text2中分別輸入數(shù)據(jù)1101和101，單擊“計算”按鈕，計算結果顯示為

10010

10010

。