问题 单项选择题

下列程序是将两个文本框(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函数从右至左逐个取两个字符串中的单个字符,然后重新进行组合。

单项选择题
问答题 简答题