異或的數(shù)學(xué)符號(hào)為“⊕”，其運(yùn)算法則相當(dāng)于不帶進(jìn)位的二進(jìn)制加法：0⊕0=0，1⊕0=1，0⊕1=1，1⊕1=0（即符號(hào)兩側(cè)數(shù)值相同時(shí)，計(jì)算結(jié)果為0；數(shù)值不同時(shí)為1）。
如果要對(duì)兩個(gè)十進(jìn)制數(shù)進(jìn)行異或運(yùn)算，可以按以下步驟進(jìn)行：
①先將要進(jìn)行異或運(yùn)算的兩個(gè)十進(jìn)制數(shù)分別轉(zhuǎn)換為二進(jìn)制；
②對(duì)兩個(gè)二進(jìn)制數(shù)按位進(jìn)行異或運(yùn)算；例：（101101）₂⊕（111）₂=（101010）₂
③再把步驟②中的運(yùn)算結(jié)果轉(zhuǎn)換為十進(jìn)制，該十進(jìn)制數(shù)即為運(yùn)算結(jié)果。
小明編寫了一個(gè)VB程序來(lái)模擬上述運(yùn)算過(guò)程，程序功能如下：在文本框Text1和Text2中分別輸入要參加異或運(yùn)算的十進(jìn)制數(shù)，單擊計(jì)算按鈕Command1，程序?qū)斎氲膬蓚€(gè)數(shù)進(jìn)行異或運(yùn)算，并將運(yùn)算結(jié)果顯示在文本框Text3中，程序運(yùn)行界面如圖所示。
（1）通過(guò)以上關(guān)于異或運(yùn)算的描述，可知10⊕6的結(jié)果是

12

12

。
（2）實(shí)現(xiàn)上述功能的VB程序如下。請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Command1_Click （　　）
Dim a As Integer,b As Integer,c As Integer
Dim a1As String,b1As String
Dim lena1As Integer,lenb1As Integer,i As Integer
Dim result As String
a=Val（Text1．Text）
b=Val（Text2．Text）
If a＞b Then
c=a：a=b：b=c
End If
result=““
a1=DtoB（a）：b1=DtoB（b）
lena1=Len（a1）：lenb1=Len（b1）
i=1
Do While i＜=lena1
If Mid（a1，lena1-i+1，1）=Mid（b1，lenb1-i+1，1）Then
result=“0“+result
Else
result=“1“+result
End If
i=i+1
Loop
result=①

Mid（b1，1，lenb1-i+1）+result

Mid（b1，1，lenb1-i+1）+result

Text3．Text=BtoD（result）
End Sub
Public Function DtoB（x As Integer） As String
Dim remainder As String
DtoB=““
Do While x＞0
remainder=CStr（x Mod 2）'如：CStr（3Mod 2）的值為“1“
DtoB=remainder+DtoB
 ②

x=x\2

x=x\2

Loop
End Function
Public Function BtoD（x As String） As Integer
Dim i As Integer
BtoD=0
For i=1To Len（x）
BtoD=③

BtoD*2

BtoD*2

+Val（Mid（x,i,1））
Next i
End Function