关于ListView1的修改问题

Question

在ListView1中倒入一批数据
如
a   b   c
----------
A   1   3
B   2   4
C   3   6
A   2   8
现在想直接a=A的所有行，使其b=b*1.2,c=c-1
请问在VB中如何写呀？

Answer 1

Dim lngIndex As Long
    
    With ListView1
        For lngIndex = 1 To ListView1.ListItems.Count
            If .ListItems(lngIndex).Text = "A" Then
                .ListItems(lngIndex).SubItems(1) = Val(.ListItems(lngIndex).SubItems(1)) * 1.2
                .ListItems(lngIndex).SubItems(2) = Val(.ListItems(lngIndex).SubItems(2)) - 1
            End If
        Next
    End With只会用这种比较笨的方法

Answer 2

在写数据到ListView之前让它禁止更新（重画），等到所有数据都写进去之后再一次性的更新（重画）。