用datagrid只显示access中表的字段名，不现实数据。如何设置？

Question

如题

Answer 1

'工程--->引用--->Microsoft ActiveX Data Object 2.x（版本号）    Dim CN   As New ADODB.Connection                '定义数据库的连接
    Dim Rs   As New ADODB.Recordset    CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\shute\trade.MDB;Persist Security Info=False"
    CN.Open    Rs.CursorLocation = adUseClient
    Rs.Open "select * from 表名 where 1<>1", CN, adOpenDynamic, adLockBatchOptimistic    Set DataGrid1.DataSource = Rs

Answer 2

select * from 表名 where 1<>1

Answer 3

to:lihonggen0(李洪根,用.NET，标准答案来了) 
谢谢！
看来经验丰富！
接问。
我用access数据库，vb做的一个应用软件，准备制作到光盘上。
问题1，我需要注意哪些
问题2，我的数据库，别人不能打开

Answer 4

表中无记录，或没有符合条件的记录如表中有记录的话，用
rs.open "select * from table" cn,3,3    '不在条件试一下
 Set DataGrid1.DataSource = Rs

Answer 5

select * from table1 where false

Answer 6

问题2，我的数据库，别人不能打开：Access2000以上加密码