十進制轉二進制
小明利用下面的方法將十進制數x轉換為二進制數y；如果x=0，則y=“0”；如果x=1，則y=“1“；否則y等于將x除2的商轉換為二進制數，再連接上x除2余數的字符串。如此繼續，從而將十進制數x轉換為二進制數y。
從文本框TextD輸入一串不帶符號位的十進制整數，單擊“轉換”按鈕，將十進制轉換為二進制并顯示在文本框TextB中。
程序界面如圖所示：
Private Sub Convert_Click）
DIMx as integer X=val（TextD．Text）
TextB．Text=①

DToB（x）

DToB（x）

End Sub Function DToB（m As Integer）As String
IF m=0 then
②

DToB=“0“

DToB=“0“

ELSEIF ③

m=1

m=1

then
DTOB=″1″
ELSE
 ④

DTOB=DTOB（m\2）& m Mod 2

DTOB=DTOB（m\2）& m Mod 2

END IF
End Function
（1）觀察以上程序代碼，可知“轉換”按鈕的對象名為

D

D

（單選，填字母：A．TextD/B．TextB/C．Commandl/D．Convert/E．轉換）
（2）請在橫線處填入合適的代碼。
第①處代碼為

DToB（x）

DToB（x）

第③處代碼為

m=1

m=1

第④處代碼為

DTOB=DTOB（m\2）& m Mod 2

DTOB=DTOB（m\2）& m Mod 2

（3）若在文本框TextD中輸入“10”，則單擊“轉換”按鈕后的輸出結果為：

1010

1010

。