在VB里如何导出SQL里select出来的一张整表？

[fengkoulangjian]

我用VB做了一个界面，功能就是链接SQL数据库，实质上是与数据库做了链接，把SQL语句固化到一个BUTTON。

现在我用select查到一个表，如下：
date
1 2008-02-01 09:28:47.000 SignOn NULL
2 2008-02-01 11:03:59.000 Sale 2165.00
3 2008-02-01 14:08:38.000 Sale 3360.00
4 2008-02-01 15:47:11.000 Sale 1395.00
5 2008-02-01 18:23:43.000 Sale 1150.00
6 2008-02-01 20:40:43.000 Sale 765.00
7 2008-02-01 21:03:06.000 Sale 690.00
8 2008-02-01 21:47:50.000 Last Sign Off NULL

怎么在VB中显示出来呢？
我用的richtextbox控件无法实现～

[fengkoulangjian]

date a b
1
2
3
4
5
6
7
8

[cloud1203]

用datagrid 控件
set datagrid1.datasource=recordset

[饮水需思源]

用datagrid控件或mshflexrid控件
dim rs as new adodb.recordset
rs.open "select * from tablename",conn,adopenkeyset,adlockreadonly
set mshflexgrid1.datasource=rs
rs.close
set rs=nothing

[it_sy_boy]

set datagrid1后要刷新
DATAGRID1.REF