主题：如何更换ListView的当前行

With Tables("员工")
     If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改
        .Position = .Position + 1
    End If
End With

在表中我们可以用Position更换当前行，那ListView如何更换当前行？