小紅編寫了一個(gè)將5位以內(nèi)的十六進(jìn)制正整數(shù)轉(zhuǎn)化成十進(jìn)制數(shù)的VB程序,功能如下:在文本框Text1中輸入一個(gè)十六進(jìn)制正整數(shù),單擊“轉(zhuǎn)換”按鈕Command1,在標(biāo)簽Label3中顯示結(jié)果。程序運(yùn)行界面如圖所示。
(1)要使窗體Form1標(biāo)題顯示“數(shù)制轉(zhuǎn)換”,則需該窗體的(單選,填字母:A.Font/B.Caption/C.BackColor)屬性。
(2)要實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)跈M線處填入合適的代碼。
PrivateSubCommand1_Click ( ?。?br />DimxAsString,chAsString
DimflagAsBoolean,iAsInteger,resultAsLong
x=
①i=1
result=0
flag=True
ch=Mid(x,1,1)
DoWhilei<=Len(x)Andflag=True
Ifch>=″0″Andch<=″9″Then
result=result*16+Val(ch)
ElseIfch>=″A″Andch<=″F″Then
result=result*16+(Asc(ch)-Asc(″A″)+10)
ElseIfch>=″a″Andch<=″f″Then
result=result*16+(Asc(ch)-Asc(″a″)+10)
Else
flag=False
EndIf
i=i+1
ch=
②Loop
Ifflag=TrueThen
Label3.Caption=Str(result)
Else
Label3.Caption=″輸入錯(cuò)誤″
EndIf
EndSub
(3)若在文本框Text1中輸入5+9,單擊“轉(zhuǎn)換”按鈕后,標(biāo)簽Label3中顯示的內(nèi)容是
C
C
。(單選,填字母:A.14/B.E/C.輸入錯(cuò)誤)。