進(jìn)制轉(zhuǎn)換。將一個(gè)K進(jìn)制數(shù)（K＜=10）x轉(zhuǎn)換成十進(jìn)制數(shù)可采用如下方法：從右向左，依次取數(shù)x的各位數(shù)字，分別計(jì)算出該數(shù)從右邊數(shù)起的第i位數(shù)字與k^（i-1）的積，再將其累加，直到所有的數(shù)字取完為止。例如，將二進(jìn)制數(shù)1101轉(zhuǎn)換成十進(jìn)制數(shù)的方法如下：
（1101）₂=1×2⁰+0×2¹+1×2²+1×2³=（13）₁₀
下列Visual Basic程序的功能是將K進(jìn)制數(shù)x轉(zhuǎn)換成十進(jìn)制數(shù)。程序運(yùn)行界面如圖所示，在文本框Text1中輸入數(shù)制k,在文本框Text2中輸入數(shù)x,單擊“轉(zhuǎn)換“按鈕（Command1）后，在標(biāo)簽Label1中輸出轉(zhuǎn)換的結(jié)果。
（1）代碼“Command1_Click （　?。敝械腃lick是

B

B

（選填字母：A．屬性名/B．事件名/C．方法名/D．事件處理過程）
（2）實(shí)現(xiàn)上述功能的VB程序如下，請?jiān)趧澗€①處填入合適代碼，②處代碼有誤，請修改。
Private Sub Command1_Click （　?。?br />Dim b As Long,i As Integer,k As Integer,x As String,t As String
b=0
k=Val（Text1．Text）
x=Text2．Text
n=     ①
i=1
Do While i＜=n
t=Val（Mid（x,n-i+1，1））
b=b+k^（i-1）‘②處
i=i+1
Loop
Label1．Caption=Str（k）+“進(jìn)制數(shù)“+Text2．Text+“轉(zhuǎn)換成十制數(shù)為“+Str（b）
End Sub
（3）運(yùn)行該程序，在文本框Text1中輸入5，文本框Text2中輸入1423，單擊“轉(zhuǎn)換”按鈕，則Label1中顯示的值是

238

238

。