vb6.0求助,两个Text1,Text2怎么分别输出Picture上方和下方?

窗体上分别有Text1和Text2。

问题是怎么把Text1的内容输出到Picture的上方,

而Text2内容则输出到Picture的下方?

1个回答

Private Sub Command1_Click()
Dim a() As String, b() As String, i, j As Integer
Text3 = ""
a = Split(Text1, vbCrLf)
b = Split(Text2, vbCrLf)
For i = 0 To UBound(a)
For j = 0 To UBound(b)
If a(i) <> "" And b(j) <> "" Then Text3 = Text3 & a(i) & b(j) & vbCrLf
Next
Next
End Sub

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问