vb中怎么把列表框的所有内容显示到文本框

Question

如题所述

Answer 1

dim s as string, i as long
for i=0 to list1.listcount-1
s=s & list1.list(i) & vbcrlf
next
text1.text=s本回答被提问者采纳