zipaiyou
2019-03-02 11:26
采纳率: 80%
浏览 385

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

窗体上分别有Text1和Text2。

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

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

  • 写回答
  • 关注问题
  • 收藏
  • 邀请回答

1条回答 默认 最新

  • 崔灬鹏 2019-03-02 11:29
    已采纳

    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

    已采纳该答案
    打赏 评论

相关推荐 更多相似问题