vb6.0中如何判断datagrid是否为选中状态,也就是上面有个小箭头,不是判断为空

[chuting1]

RT

[Tiger_Zhao]

重复了：http://topic.csdn.net/u/20081203/10/87d223a9-4aba-4754-82b4-0edc0fae4874.html?seed=2085180735
发帖、回复后不要刷新页面，否则会重复。

[jhone99]

Private Sub Command1_Click()
    Adodc1.Recordset.MovePrevious
    If IsNull(DataGrid1.Bookmark) Then
        MsgBox "no select"
    Else
        MsgBox "select " & DataGrid1.Bookmark
    End If

End Sub

[zhy2006]

If DataGrid1.ApproxCount = 0 Then
MsgBox "当前无选择记录", 48, "警告"
End If

[chuting1]

DataGrid1.ApproxCount = 0 和 Me.DataGrid1.Bookmark = Null 都不行

加断点 看到 结果 Me.DataGrid1.Bookmark = Null ,程序仍然往下跑,不知为什么