我要把表中的内容放到窗口显示，怎么做？

Question

已建表rzapply，其中有编号，姓名，申请人 三项。现要把这张表的内容放到窗口里面显示出来，我应该怎么做阿？ 是不是要用控建 datagirl？可怎么用啊？

Answer 1

用datagrid控件，
引用ADO
    Dim CN   As New ADODB.Connection                '定义数据库的连接存放数据和代码
    Dim Rs   As New ADODB.Recordset
    CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
    CN.Open
    Rs.CursorLocation = adUseClient
    Rs.Open "select * from rzapply", CN, adOpenDynamic, adLockBatchOptimistic
 
   Set DataGrid1.DataSource = Rs