小李在學(xué)習(xí)漢字的編碼后，了解到漢字區(qū)位碼由2個(gè)字節(jié)組成，前面1個(gè)字節(jié)表示區(qū)碼，后面1個(gè)字節(jié)表示位碼，將區(qū)位碼（十進(jìn)制）分別加上160就得到了該漢字的內(nèi)碼。
小李編寫了一個(gè)查看漢字區(qū)位碼的VB程序，實(shí)現(xiàn)如下功能：在Text1中輸入一個(gè)漢字，單擊“查看”按鈕Commandl,在Label2中顯示該漢字的區(qū)位碼。程序運(yùn)行界面如圖所示。
（1）程序編寫調(diào)試后，生成如下相關(guān)文件：A．zbc.jye.ai/B．zbc.jye.ai/C．zbc.jye.ai/D．zbc.jye.ai,其中屬于Windows系統(tǒng)可抗行文件的是

D

D

（單選，填字母）。
（2）實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)?jiān)诋嬀€處填入合適的代碼。
Private Sub Commandl_Click （　?。?br />Dim a As Long,h As Long,t As Long,v As Long,ch As Long
Dim s As String,x As String,y As String
s=″″：t=0：v=0
h=65536+Asc（Text1．Text）'將漢字的十進(jìn)制內(nèi)碼賦值給h
Do While h＜＞0
a=h Mod 2
h=h\2
s=CStr（a）+s
Loop
x=

Mid（s,1，8）或Mid（s,1，Len（s）-8）

Mid（s,1，8）或Mid（s,1，Len（s）-8）

y=Mid（s,Len（s）-7，8）
For i=Len（x） To 1Step-1
ch=Va10Mid（x,i,1））

t=t+ch*2^（Len（x）-i）或t=t+ch*2^（8-i）

t=t+ch*2^（Len（x）-i）或t=t+ch*2^（8-i）

Next i

Labe12．Caption=“該漢字的區(qū)位碼為：″+Str（t-160）+″位碼為：″+Str（v-160）
End Sub
（3）若經(jīng)過Do While循環(huán)后，s的值為“1010101111001100”，則畫框處循環(huán)內(nèi)的語句執(zhí)行了

8

8

次。