VB ListView其中一列的所有内容显示到另外的文本框里
窗体,ListView控件,text控件,按钮控件。listview控件view为3,设置两列单击按钮,listview第二列所有数据按顺序显示在text中谢谢达人的回答...
窗体,ListView控件,text控件,按钮控件。
listview控件view为3,设置两列
单击按钮,listview第二列所有数据按顺序显示在text中
谢谢达人的回答了!~~~~ 展开
listview控件view为3,设置两列
单击按钮,listview第二列所有数据按顺序显示在text中
谢谢达人的回答了!~~~~ 展开
1个回答
展开全部
Private Sub Command1_Click()
For i = 1 To ListView1.ListItems.Count
Text1.Text = Text1.Text & ListView1.ListItems(i).SubItems(1) & vbCrLf
Next
End Sub
Private Sub Form_load()
ListView1.View = lvwReport
ListView1.ColumnHeaders.Add , "", "第一列"
ListView1.ColumnHeaders.Add , "", "第二列"
Dim itmX As ListItem
For i = 1 To 5
ListView1.ListItems.Add.SubItems(1) = "test" & i
Next
End Sub
For i = 1 To ListView1.ListItems.Count
Text1.Text = Text1.Text & ListView1.ListItems(i).SubItems(1) & vbCrLf
Next
End Sub
Private Sub Form_load()
ListView1.View = lvwReport
ListView1.ColumnHeaders.Add , "", "第一列"
ListView1.ColumnHeaders.Add , "", "第二列"
Dim itmX As ListItem
For i = 1 To 5
ListView1.ListItems.Add.SubItems(1) = "test" & i
Next
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询