將一個(gè)十進(jìn)制正整數(shù)轉(zhuǎn)化為二進(jìn)制數(shù)可以采用“除二取余法”，主要方法就是將十進(jìn)制數(shù)用2除，保存所得余數(shù)，然后將商的整數(shù)部分作為下次運(yùn)算的被除數(shù)，重復(fù)上述“除二取余”操作，直到商的整數(shù)部分為零停止．在文本框Text1中輸入一個(gè)正整數(shù)，單擊“開始轉(zhuǎn)換”按鈕（Command1）后，對(duì)應(yīng)的二進(jìn)制數(shù)在標(biāo)簽Label3中顯示出來．

算法流程圖如圖，相應(yīng)的程序如下，在程序①和②橫線處，把程序補(bǔ)充完整．

Private Sub Command1_Click （　?。?br />Dim x As Integer,s As String,r As Integer,t As Integer

①
s=““
Do While x＜＞0
r=x Mod 2
s=Str（r）+s
x=②
Loop
Label3．Caption=s
End Sub
程序中①橫線處應(yīng)填入

Text1．text=Str（x）

Text1．text=Str（x）

程序中②橫線處應(yīng)填入

x\2

x\2

開始輸入十進(jìn)制數(shù)xx≠0？輸出s的值將當(dāng)前x被2除的余數(shù)保存到變量rY結(jié)束s賦初值（空字符串）Ns←Str（r）+s將當(dāng)前x被2除所得商的整數(shù)部分保存到變量x.