編寫“幸運數(shù)字”程序，功能如下：在文本框Text1中輸入出生日期，單擊“算一算”按鈕Command1，將日期中所有的數(shù)字按位相加，若結(jié)果為兩位數(shù)則繼續(xù)按位相加，直到結(jié)果為一位數(shù)，如出生日期為2003/08/11，數(shù)字按位相加2+0+0+3+0+8+1+1=15，15按位相加1+5=6．運行界面如圖所示。
（1）程序窗體中共有 33類對象。
（2）請在橫線處填入合適的代碼。
Private Sub Command1_Click （ ?。?br />Dim luck As Integer
Dim sr,c As String
luck=0
sr=Text1．Text
If Len（sr）=10 Then′輸入的格式長度符合條件
For i=1 To Len（sr）
c=①①
If c＞=“0“And c＜=″9″Then
luck=luck+Val（c）
End If
Next i
Do While luck＞9
luck=luck Mod 10+②②
Loop
Label2．Caption=″你的幸運數(shù)字是：″+str（luck）
Else
Label2．Caption=″輸入有誤，請重輸！″
End If
End Sub
（3）若在文本框Text1中輸入“2004/08/18”，Label2中顯示的內(nèi)容為 你的幸運數(shù)字是：5你的幸運數(shù)字是：5。
【考點】編輯事件處理過程的代碼．
【答案】3；①；②；你的幸運數(shù)字是：5
【解答】
【點評】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/4/20 14:35:0組卷：1引用：1難度：0.5
相似題
-
1．學(xué)校舉辦了“語文作文現(xiàn)場賽”，參賽同學(xué)成績存儲在文本文件“gra.jye.ai”中，如左圖所示（每一行記錄一位同學(xué)的姓名和成績，以“：”分隔）。陳老師利用Python程序?qū)ψ魑某煽冞M(jìn)行處理，統(tǒng)計出各個分?jǐn)?shù)等級的人數(shù)，并輸出結(jié)果。程序運行界面如右圖所示。
實現(xiàn)上述功能的Python程序如下，請在劃線處填入合適的代碼。
發(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)容：
一個單窗體VB程序的運行界面如圖所示。下列說法正確的是（ ?。?br />（1）窗體內(nèi)有1個按鈕
（2）窗體內(nèi)有2個文本框
（3）窗體內(nèi)有3個標(biāo)簽
（4）該窗體的標(biāo)題（Caption）屬性值是“加法計算器”發(fā)布：2024/12/20 20:0:2組卷：1引用：1難度：0.6
把好題分享給你的好友吧~~