RS.Open "SELECT * FROM Clientes", CNN, adOpenStatic, adLockReadOnly
Set DataGrid1.DataSource = RS
em relacao a este cod, so nao se esqueca que na hora em que roda a sua select vc tem que especificar d que lado o cursor vai ficar... sendo assim a sua selec vai fica assim
RS.Open "SELECT * FROM Clientes", CNN, adOpenStatic, adLockReadOnly
rs.cursorlocation=aduseclient
Set DataGrid1.DataSource = RS
falow!