fpspread怎么取得选中的所有行的行号

我现在用fpspread做一个弹出框，用来选择需要的门店，需要多选，我怎么才能判断哪些行是被选中的啊？请教高手，万分感谢！ 哪位高手指导下啊！ 第一列加复选框，然后循环判断复选框状态 关键代码
For i = 1 To spdData.MaxRows
    spdData.Row = i
    spdData.Col = 1
' 如果第一行选中的话则获取指定单元格信息
    If spdData.Value = 1 Then
        spdData.Col = 3
        变量 = spdData.Text
    End If
Next
这是单选的代码，至于多选循环拼串我就不说了

补充：VB ,  控件