内容正文:
算法复习专题三 字符串处理
【课前检测】
1. “字符密码破译”程序实现了如下功能:在文本框Text1中(密码位置)输入多个正整数 (以“,”为分割符和结束符),单击“破译”按钮Command1,程序以这些整数为位置信息,依次从文本框Text2中(密码本)提取字符并连接成字符串,最后将字符串显示在标签Label1中(破译后密码)。
(1)请完成一下两种方法的代码。
方法二:
Dim s As String, t As String, c As String,i As Integer
s = "": t =""
For i = 1 To Len(Text1.Text)
c = Mid(Text1.Text, i, 1)
If c <>"," Then
t =_______________
Else
s = s + ______________
t = ____________
End If
Next i
Label1.Caption = s
方法一:
Dim s As String, t As Integer, c As String,i As Integer
s = "": t = 0
For i = 1 To Len(Text1.Text)
c = Mid(Text1.Text, i, 1)
If c <>"," Then
t =_____________________
Else
s = s + _______________
t = ____________
End If
Next i
Label1.Caption = s
(2)若文本框Text1中输入内容的结束符缺失(即输入内容为1,18,9,9),单击“生成”按钮后,标签Label1中显示的内容是 ____________。
(3)要使得当结束符缺失时仍然能够实现所有密码的获取,应怎样修改?请用两种方法写出代码。
方法一:
方法二:
【课堂探究】
【课堂探究】
【考点1】表达式运算(2分)
例1: 有如下VB程序段:
n = 0
For i =