[問答題] 完成下列問題:在考生文件夾下有一個工程文件sjt4.vbp,其窗體如圖4所示。該程序用來對在上面的文本框中輸入的項字母串(稱為“明文”)加密,加密結(jié)
[問答題] 完成下列問題:
在考生文件夾下有一個工程文件sjt4.vbp,其窗體如圖4所示。該程序用來對在上面的文本框中輸入的項字母串(稱為“明文”)加密,加密結(jié)果(稱為“密文”)顯示在下面的文本框中。加密的方法是:選中一個單選按鈕,單擊“加密”按鈕后,根據(jù)選中的單選按鈕后面的數(shù)字n,把明文中的每個字母改為它后面的第n個字母(“z”后面的字母認(rèn)為是“a”,“Z”后面的字母認(rèn)為是“A”),如圖4所示。窗體中已經(jīng)給出了所有控件和程序,但程序不完整,請在程序中的橫線處填寫正確的內(nèi)容。
注意:不能修改程序中的其他部分和控件屬性,最后把修改后的文件按原文件名存盤。
[題目提供的源程序]
Private Sub Command1_Click()
Dim n As Integer, k As Integer, m As Integer
Dim c As String, a As String
For k=0 To 2
If Op1(k).Value Then
n=Val(Op1(k). (1)
End If
Next k
m=Len(Text1.Text)
a=""
For k=1 To (2)
c=Mid $ (Text1.Text, (3) ,1)
c=String (1,Asc(c)+n)
If c>"z" Or c>"Z" And c<"a" Then
c=String(1,Asc(c)-26)
En
正確答案:[操作步驟] 第1步:打開工程文件sjt4.vbp 第2步:分析并修改源程序。 第3步:調(diào)試、運行并保存程序。 [1]Caption [2]m [3]k [4]a
參考解析:根據(jù)題意,首先要確定移動的位數(shù),移動的位數(shù)由被選擇的單選按鈕決定,移動的值由單選按鈕的Caption屬性值決定;然后再確定循環(huán)加密的次數(shù),循環(huán)的次數(shù)是由輸入字符的個數(shù)Len(Text1.Text)決定的。實現(xiàn)加密方法:使用Mid()函數(shù)將字符串中的字符一一取出,利用Asc()函數(shù)轉(zhuǎn)換成字符的ASCII碼,將ASCII碼加上移動的位數(shù)后,再利用String()函數(shù)將字符ASCII碼轉(zhuǎn)換成字符。 Mid()函數(shù)的格式為Mid(字符串,p,n)。表示從字符串的第p個字符開始,向后截取n個字符,p和n都是算術(shù)表達(dá)式。Mid()函數(shù)的第三個變量可以省略,這樣將從第p個字符開始向后截取到字符串的結(jié)尾。 String()函數(shù)用于重復(fù)指定字符串中的字符,返回新的字符串。 Asc()函數(shù)用于返回一個Integer,代表字符串中首字母的字符ASCII碼。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。