DataGrid

Laura
10 de Marzo del 2006
Hola buenas!estoy intentando hacer un simple listado con el control datagrid y no hay maneras que me muestre nada, alguien me podría decir que estoy haciendo mal:

Dim rs As New ADODB.Recordset
Set rs = Pisos()
Set DataGrid1.DataSource = rs

(.bas)
Public Function Pisos() As ADODB.Recordset

Dim rs As New ADODB.Recordset
'rs.CursorLocation = adUseClient
rs.Open "Pisos", conn, adOpenKeyset, adLockOptimistic, adCmdTable
Set Pisos = rs

Muchas gracias!!!