“5421BCD“碼是一種采用四位二進(jìn)制數(shù)表示一位十進(jìn)數(shù)的編碼，其各位的權(quán)依次為5、4、2、1，并要求大于等于5的十進(jìn)制數(shù)所對應(yīng)的編碼最高位為1（如十進(jìn)制數(shù)7所對應(yīng)的“5421BCD”碼為1010）．轉(zhuǎn)換時(shí)，將十進(jìn)制數(shù)從右至左按位轉(zhuǎn)換成對應(yīng)的“5421BCD”碼，然后依次連接．小王編寫了一個(gè)VB程序，中文本框Text1中輸入十進(jìn)制數(shù)，單擊“轉(zhuǎn)換”按鈕Command1，則文本框Text2中顯示對應(yīng)的“5421BCD”碼．程序運(yùn)行界面如圖所示．
（1）觀察代碼，單擊“轉(zhuǎn)換”按鈕觸發(fā)的事件處理過程名是 Command-ClickCommand-Click．
（2）為實(shí)現(xiàn)上述功能，請?jiān)跈M線處填入合適的代碼．①x＞0x＞0；②y=str（a1）+str（a2）+str（a3）+str（a4）+yy=str（a1）+str（a2）+str（a3）+str（a4）+y．
Private Sub Command-Click（ ?。?br />Dim x As Long,y As String,a As Integer
Dim al As Integer,a2 As Integer,a3 As Integer,a4 As Integer
x=Val（Text1．Text）
y=''''
Do While ①①
a=x Mod 10
x=x\10
a1=a\5：a=aMod5
a2=a\4：a=aMod4
a3=a\2：a=aMod2
a4=a
y=str（a1）+str（a2）+str（a3）+str（a4）+ystr（a1）+str（a2）+str（a3）+str（a4）+y
Loop
Text2．Text=y
End Sub
（3）如果輸入的十進(jìn)制數(shù)為62，則對應(yīng)的“5421BCD”碼為 1001001010010010．
【考點(diǎn)】編輯事件處理過程的代碼．
【答案】Command-Click；x＞0；y=str（a1）+str（a2）+str（a3）+str（a4）+y；①；str（a1）+str（a2）+str（a3）+str（a4）+y；10010010
【解答】
【點(diǎn)評】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/6/27 10:35:59組卷：3引用：2難度：0.3
相似題
-
1．學(xué)校舉辦了“語文作文現(xiàn)場賽”，參賽同學(xué)成績存儲在文本文件“gra.jye.ai”中，如左圖所示（每一行記錄一位同學(xué)的姓名和成績，以“：”分隔）。陳老師利用Python程序?qū)ψ魑某煽冞M(jìn)行處理，統(tǒng)計(jì)出各個(gè)分?jǐn)?shù)等級的人數(shù)，并輸出結(jié)果。程序運(yùn)行界面如右圖所示。
實(shí)現(xiàn)上述功能的Python程序如下，請?jiān)趧澗€處填入合適的代碼。
發(fā)布：2024/12/17 2:0:1組卷：6引用：2難度：0.3 -
2．有如下Python程序段：
執(zhí)行該程序段，輸入字符串“abcdefg”，則輸出的結(jié)果是（ ?。?/h2>發(fā)布：2024/12/20 6:30:1組卷：2引用：3難度：0.4 -
3．試題描述的內(nèi)容：
一個(gè)單窗體VB程序的運(yùn)行界面如圖所示。下列說法正確的是（ ）
（1）窗體內(nèi)有1個(gè)按鈕
（2）窗體內(nèi)有2個(gè)文本框
（3）窗體內(nèi)有3個(gè)標(biāo)簽
（4）該窗體的標(biāo)題（Caption）屬性值是“加法計(jì)算器”發(fā)布：2024/12/20 20:0:2組卷：1引用：1難度：0.6
把好題分享給你的好友吧~~