VB_Python代码对照算法百题(013)

VB_Python代码对照算法百题(013)

VB代码: (2017年11月浙江)14. 编“字符串生成”程序,实现如下功能:在文本框Text1中(字符位置)输入多个正整数 (以“,”为分割符和结束符),单击“生成”按钮Command1,程序以这些整数为位置信息,依次从文本框Text2中(字典内容)提取字符并连接成字符串,最后将字符串显示在标签Label1中(生成内容)。程序运行界面如下图所示。 

VB_Python代码对照算法百题(013) 

(1) 要使程序运行时,窗体Form1标题显示“字符串生成”,可在FormLoad事件过程中添加语句 (单选,填字母:A.Form1 = “字符串生成” / B.Form1.Text=”字符串生成”/ C. Form1.Caption=”字符串生成”)。

(2)实现上述功能的VB程序如下,请在划线处填入合适的代码。

Private Sub Command1_Click()

Dim s As String, t As String, c As String

Dim i As Integer, p As Integer

s = “”: t = “”

For i = 1 To Len(Text1.Text)

  c = Mid(Text1.Text, i, 1)

  If c = “,” Then

    p = Val(t)

    s = s + Mid(Text2.Text, p, 1)

    t = “”

  Else

    t =     
  End If

Next i

Label1.Caption =     
End Sub

(4)若文本框Text1中输入内容的结束符缺失(即输入内容为1,18,9,9),单击“生成”按钮后,标签Label1中显示的内容是     

参考答案:

(1)C

(2)① t+c ②s
(3)pas

Python代码:

t1=input(‘字符位置:’)

t2=’python is a programming language.’

s = ”

t = ”

for i in range(len(t1)):

  c=t1[i]

  if c==’,’:

    p=int(t)

    s=s+t2[p-1]

    t = ”

  else:

    t=t+c

print(‘生成内容:’,s)

Python代码运行结果:

VB_Python代码对照算法百题(013)