【加試題】李雷收到了朋友發(fā)給他的一封奇怪的郵件，里面有段內(nèi)容是由一些數(shù)字和符號(hào)組成，信上面說了，這段內(nèi)容是加密后的內(nèi)容，并給出了具體加密方法（假定原文的英文字母都是大寫的），具體方法如下：
（1）“A”變?yōu)橐粋€(gè)1到100內(nèi)的隨機(jī)數(shù)*27+1，“B”變?yōu)橐粋€(gè)1到100 內(nèi)的隨機(jī)數(shù)*27+2，…，“Z”變?yōu)橐粋€(gè) 1 到 100 內(nèi)的隨機(jī)數(shù)*27+26；
（2）每個(gè)字母變?yōu)閿?shù)字后會(huì)加上一個(gè)“-”用來分割數(shù)字；
（3）其他空格和標(biāo)點(diǎn)字符都按原來的表示．
李雷利用VB 編寫了一個(gè)解密程序，功能如下：將郵件中密文的內(nèi)容復(fù)制到文本框Text1中，點(diǎn)擊“解密”按鈕Command1后，程序會(huì)將密文解密并將解密后的內(nèi)容顯示在文本框 Text2 中．
程序運(yùn)行界面如圖所示：
（1）根據(jù)描述，若密文為“1905-1442-”，則表示的是：OKOK．
（2）實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)?jiān)跈M線處填入合適代碼．
Private Sub Command1_Click（ ?。?br />Dim s As String,yw As String,t As String
Dim value As Integer'用于存儲(chǔ)某字母在密文中對(duì)應(yīng)數(shù)值的臨時(shí)變量
s=Text1．Text
value=0
yw=””
For i=1 To Len（s）
t=Mid（s,i,1）Mid（s,i,1）
If t＞=“0“And t＜=“9“Then
value=value*10+Val（t）
ElseIf t=“-“Then
yw=yw+Chr（Asc（“A“）+value Mod 27-1）
value=0value=0
Else
yw=yw+t
End If
Next i
Text2．Text=yw
End Sub.
【考點(diǎn)】編輯事件處理過程的代碼．
【答案】OK；Mid（s，i，1）；value=0
【解答】
【點(diǎn)評(píng)】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/6/27 10:35:59組卷：7引用：2難度：0.1
相似題
-
1．學(xué)校舉辦了“語(yǔ)文作文現(xiàn)場(chǎng)賽”，參賽同學(xué)成績(jī)存儲(chǔ)在文本文件“gra.jye.ai”中，如左圖所示（每一行記錄一位同學(xué)的姓名和成績(jī)，以“：”分隔）。陳老師利用Python程序?qū)ψ魑某煽?jī)進(jìn)行處理，統(tǒng)計(jì)出各個(gè)分?jǐn)?shù)等級(jí)的人數(shù)，并輸出結(jié)果。程序運(yùn)行界面如右圖所示。
實(shí)現(xiàn)上述功能的Python程序如下，請(qǐng)?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)行界面如圖所示。下列說法正確的是（ ?。?br />（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
把好題分享給你的好友吧~~