有vb中怎样把listbox里的内容复制出来

Posted 2023-03-11

我想让文本框中显示listbox的全部内容，是多行，不是一行

参考技术A Private Sub Form_click()
For i = 0 To List1.ListCount - 1
Text1.Text = Text1.Text & List1.List(i)
Next i
End Sub
再把text1的一个属性muitiun（好像是这一个单词了，反正也意思是设置多行的意思了)本回答被提问者采纳 参考技术B Private Sub Form_click()
For i = 0 To List1.ListCount - 1
Text1.Text = Text1.Text & List1.List(i)
Next i
End Sub