Android Question DBUtils SQLite

Sub GetStoreGroups
    Dim StoreGroup1 As String
    Dim StoreGroup2 As String
    Dim StoreGroup3 As String
    Dim StoreGroup4 As String
    Dim StoreGroup5 As String
    Dim StoreGroupCount As Int
   
    Dim Cursor1 As Cursor
    Cursor1 = SQL0.ExecQuery("SELECT DISTINCT StoreGroup FROM tableSP2")
    StoreGroupCount = Cursor1.RowCount
    For i = 0 To Cursor1.RowCount - 1
        Cursor1.Position = i
        If Cursor1.Position = 0 Then
            StoreGroup1 = (Cursor1.GetString2(0))
        End If
        If Cursor1.Position = 1 Then
            StoreGroup2 = (Cursor1.GetString2(0))
        End If
        If Cursor1.Position = 2 Then
            StoreGroup3 = (Cursor1.GetString2(0))
        End If
        If Cursor1.Position = 3 Then
            StoreGroup4 = (Cursor1.GetString2(0))
        End If
        If Cursor1.Position = 4 Then
            StoreGroup5 = (Cursor1.GetString2(0))
        End If

    Next
    Cursor1.Close
   
End Sub

Sub GetStoreGroups
Dim StoreGroupList As List
StoreGroupList.initialize
Dim StoreGroupCount As Int
Dim Cursor1 As Cursor
Cursor1 = SQL0.ExecQuery("SELECT DISTINCT StoreGroup FROM tableSP2")
StoreGroupCount = Cursor1.RowCount
if storegroupcount>0 then 
For i = 0 To Cursor1.RowCount - 1
 Cursor1.Position = i
storeGroupList.add(cursor1.getstring2(0))
Next
end if 
Cursor1.Close
' now storegrouplist contains all distinct storeGroup items. If none, its size is zero.
for j=0 to storeGroupList.size-1
log("storeGroup " & j & "=" & storeGroupList.get(j))
next
 End Sub