vb6.0多个文本框按照要求合并成一个txt文档
发布网友
发布时间:2022-05-14 00:27
我来回答
共1个回答
热心网友
时间:2023-11-11 22:31
Private Sub Command1_Click()
Dim AA
AA = Split(Text3, Chr(13))
If UBound(AA) > 0 Then
For i = 0 To UBound(AA)
Text4 = Text4 & Text1 & AA(i) & Text2 & vbCrLf
Next
End If
End Sub
加了一个文本框text4用来保存运行结果。