vb等級考試題目與評析63-閱讀頁
2024-09-24 10:04本頁面
【正文】 密規(guī)則： 對于第奇數(shù)個(gè)字符，若是字母，則把它變?yōu)樗竺娴淖址ㄈ魹?39。則變?yōu)?39。），不是字母則不變；對于第偶數(shù)個(gè)字符，若是字母，則把它變?yōu)樗懊娴淖址? 若為 39。則變?yōu)?39。），不是字母則不變。 例如： 若原有的字符是： AbbaZG HaMnnK Yzx 則加密后的字符是 ： BaczAF GbNmoj Xaw 已經(jīng)給出 存結(jié)果 按鈕的 Click事件過程和函數(shù) isletter，函數(shù) isletter（ a As String) 判斷變量 a中是否為一個(gè)字母，是則返回 True，否則返回 False，可以直接調(diào)用。（ 文單詞和空格，不分段落和行） 注意： 考生不得修改已經(jīng)存在的程序，必須用 存結(jié)果 按鈕存儲加密結(jié)果，否則無成績。 本題主要考查了一個(gè)簡單的加密算法 及文件的基本操作。 Chr(Asc(Mid(s, i, 1)) + 25) Else result = result amp。 Chr(Asc(Mid(s, i, 1)) 25) Else result = result amp。 Mid(s, i, 1) End If Next i = result End Sub Function isletter(a As String) As Boolean If A = a And a = Z Or a = a And a = z Then isletter = True Else isletter = False End If End Function Private Sub Command3_Click() Open For Output As 1 Print 1, Close 1 End Sub
公司管理相關(guān)推薦
鄂ICP備17016276號-1