Grid не обновляется при добавлении новых полей через SQL.

[Kevlar]

Есть Grid. Есть 3 кнопки Option (внизу - код).

Private Sub OptYur_Click(Index As Integer)
Select Case Index
Case 0
datManager.RecordSource = " SELECT * FROM clients"
datManager.Refresh
Case 1
datManager.RecordSource = " SELECT " & _
"Naimenovan, KodGoroda, Tel, FizL, YurL, LastContact " & _
" FROM clients WHERE YurL = TRUE "
datManager.Refresh
Case 2
datManager.RecordSource = " SELECT " & _
"Fam, Name, Otc, KodGoroda, Tel, FizL, YurL, LastContact " & _
" FROM clients WHERE FizL = TRUE "
datManager.Refresh
End Select
End Sub

Вобщем при выборе cas'ов grid не всегда выполняет SQL-запрос: не добавляет указанные поля.
P.S. Grid от фирмы Sheridan.