[求助]如何象LISTVIEW中添加信息并显示？（详细）
[求助]如何象LISTVIEW中添加信息并显示？我是菜鸟，比如通过一个按钮向LISTVIEW中添加信息，能否详细说明步骤！谢谢！！
2006-04-11 17:41
Option Explicit
Private Sub Form_Load()
Dim lvwitem As ListItem
With ListView1
.View = lvwReport
.ColumnHeaders.Add , , "姓名", 1600
.ColumnHeaders.Add , , "性别", 800
.ColumnHeaders.Add , , "地址", 3600
Set lvwitem = .ListItems.Add(, , "梁嘉辉")
lvwitem.SubItems(1) = "男"
lvwitem.SubItems(2) = "广东中山"
Set lvwitem = .ListItems.Add(, , "小君")
lvwitem.SubItems(1) = "女"
lvwitem.SubItems(2) = "广东中山"
End With
End Sub
2006-04-11 19:12
2006-12-07 19:57