帮我看看这几行VB代码．．．VB新手．

帮我看看这几行VB代码．．．VB新手． 2012-3-8 18:59

答案：
Private Sub Command1_Click()
Dim S() As String, I As Integer         定义数组s为字符型，变量i为整型
S = Split(Text1.Text, vbCrLf)          s该改为是s（），文本框1中的内容按换行符分开，分别存入数组s中。
For I = 0 To 13
    S(I) = Text2.Text & Left(S(I) & String(37, "　"), 37) & Text3.Text      为  s（i）数组重新赋值为文本框2中内容加上以前s（i）中的前37个字符（不够37个的用空格代替）再加上文本框3中的内容。
Next I
Text1.Text = Join(S, vbCrLf)       文本框1中输出s数组，并且用换行符分开数组的各个元素。
End Sub
left（c，n）是指取出c字符串中的前n个字符。string（n，c）是取c字符串的第一个字符，并复制n个。这是第二个解释怎么来的。

上一个：一道简单的VB题目关于（Array函数）
下一个：学习编程应先从C++入门还是VB？