对用户输入的字符串进行解密的VB程序段如下：s=Text1.TextFori=1ToLen(s)ch=Mid(s,i,1)nk=Asc(ch)-iIfnk&lt_刷题宝

题干

对用户输入的字符串进行解密的VB程序段如下：
s = Text1.Text
For i = 1 To Len(s)
ch = Mid(s, i, 1)
nk = Asc(ch) - i
If nk < 0 Then nk = nk + 127
Text2.Text = Text2.Text + Chr(nk)
已知大写字母A的ASCII码值为65，小写字母a的ASCII码值为97，在文本框Text1中输入内容“yhT5”，执行程序段后，文本框Text2显示的内容为（）

A．YHt5

B．xgS4

C．zjW9

D．xfQ1

上一题下一题 0.99难度选择题更新时间:2020-03-30 10:42:52

答案(点此获取答案解析）

同类题1

在VB中，下列函数式的值为5的是 ( )

C．Len(“five”)

同类题2

输出的结果为。

同类题3

某Visual Basic程序如下：
Private Sub Command1_Click()
Dim a(1 To 10) As Integer
Dim i As Integer
a(1) = 1
For i =" 2" To 10
a(i) =" a(i-1)" + i
Next i
Text1.Text = Str(a(5))
End Sub
运行程序，单击命令按钮Command1后，在文本框Text1中显示的内容为（）

同类题4

在 VB 中，若 s="Welcometoyunfun",取出字符"yunfun"，则函数应为（）

A．mid(s,10,6)	B．len(s,10,6)
C．len(s, 6 ,10)	D．mid(s, 6 ,10)

同类题5

设计一个VB程序，使其具有下列功能：在文本框Text1.Text输入字符串，单击“开始”按钮Command1，将输入的字符串中小写字母转换成大写字母后，在标签Label2中输出。界面设计如图所示。

（1）在应用程序界面设计时，要为窗口添加标题，需要修改图2所示的属性窗口中的____________项为“字符转换”。
（2）为实现上述功能, 请在划线处填入合适代码或选项。
Private Sub Command1_Click()
Dim ch As String, sh As String
Dim i As Integer, j As Integer
ch = Text1.Text
For i = 1 To _______ '从第一个字符到最后一个字符进行循环判断
j = Asc______________) '(填字母:从下列A、B、C三个选项中选取一项)
If j > 96 And j < 123 Then
sh = sh + Chr(j - 32)
Else
sh = sh + Chr(j)
End If
_________ '(填字母:从下列A、B、C三个选项中选取一项)
Label2.Caption = sh
End Sub
划线②、③的选项:

C．Mid(ch, i, 1)

相关知识点