[单项选择题] 下列程序是将两个文本框(text1和text2)的内容进行组合，组合后的结果在图片框(Pic1)显示出来。 Private Sub Command1_Click() Dim sl

19 查阅

[单项选择题] 下列程序是将两个文本框(text1和text2)的内容进行组合，组合后的结果在图片框(Pic1)显示出来。

Private Sub Command1_Click()

Dim sl As String，s2 As String

S1=Text1.Text

S2=Text2.Text

For i=Len(s1)To 1 Step-1

s3=s3+Mid(s1，i，1)+Mid(s2，i，1)

Next i

Pic1.Print s3

End Sub

程序运行后，在Text1文本框中输入“ABCDE”，在Text2文本框中输入“12345”，单击命令按钮，则在Pic1图片框中显示的内容是

A．E5D4C3B2A1

B．ABCDE12345

C．12345ABCDE

D．A1B2C3D4E5

参考答案:

A解析：[分析]： Len()函数是计算字符串的长度，用“ABCDE”的长度来确定循环次数。两个Mid函数从右至左逐个取两个字符串中的单个字符，然后重新进行组合。