ListView 实时刷新的问题

Question

ListView 实时刷新的问题我用timer想让ListView1的第一行第一列的数字  和 第三列第三行的数字 实时变化该如何做呢？

Answer 1

Set lvi As ListViewItem
lvi = ListView1.ListItems(1)
lvi.Text = "aaa"
lvi.SubItems(2) = "bbb"

Answer 2

楼主，别人已经给你代码啦，你看不懂？得到指定行的项，然后修改列啊，当然你已经是vsReport风格。

Answer 3

Private Sub Form_Load()
    ListView1.View = lvwReport
    ListView1.ColumnHeaders.Add , , "A"
    ListView1.ColumnHeaders.Add , , "A"
    ListView1.ColumnHeaders.Add , , "A"
    ListView1.ListItems.Add , , "time"
    ListView1.ListItems.Add , , "time"
    ListView1.ListItems.Add , , "time"
End SubPrivate Sub Timer1_Timer()
    Dim li As ListItem
    Set li = ListView1.ListItems(1)
    li.Text = Str(Time)
    li.SubItems(2) = Format(Now, "hh:mm:ss")
End Sub
这下我是实践了，如果楼主这种态度，我是没有什么想法了，如果你想从别人那里复制一下代码，就想解决你的问题，那你认为你的价值是什么呢？
在这里我承认的写的vsReport是错了，应该是lvwReport(View属性)

Answer 4

给你的只能是思路。VB的自动提示和MSDN本来就把我搞傻了，又这么多年不用，再说你的上下文程序我也不知道，所以写出的代码不可能复制粘贴100%就能马上运行，请谅解。如果是什么东西都搞不清，你应该从基本的学起。不要强迫自己一下子学会编程，这不现实。

Answer 5

修正下我的代码：
Dim lvi As ListItem
Set lvi = ListView1.ListItems(1)
lvi.Text = "aaa"
lvi.SubItems(2) = "bbb"

Answer 6

从你的代码我看到我哪里错了，我的listview没有添加过任何数据，所以我每次
ListView1.ListItems(1).SubItems(2)的时候总是错误谢谢~~