怎么判断GATAGRID内是否有内容

如何判断GATAGRID内是否有内容？
如题

[解决办法]
Set rsa = New ADODB.Recordset
rsa.ActiveConnection = db
rsa.CursorLocation = adUseClient
............

sql01= "....................... "

rsa.Open sql01
..............
.......
If rsa.RecordCount <> 0 Then
.....
......
end if