怎样在COMMAND_CLICKL里面在数据库里建立一个表,名字想自己取,结构想套用已有了的

能不能说的详细一点,在命令按钮里面建个表,什么意思啊?

我的VB连接一个MDB数据库,
我想在数据库里面通过点击COMMAND按纽来建立一个新表
表的结构和名字自己创建定义
我该怎么办

Dim CONN As New ADODB.Connection
Dim rs As New ADODB.Recordset
CONN.ConnectionString = "provider=sqloledb;data source=jhd001;database=dujun;uid=sa;pwd="
CONN.Open
'CONN.Execute "select * into biaoo from biao where 1=2" '复制已有的表结构

CONN.Execute "CREATE TABLE [biao3] (" _
& "[CUS_ID] [varchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL ," _
& "[CUS_NM] [varchar] (100) COLLATE Chinese_PRC_CI_AS NOT NULL" _
& ") ON [PRIMARY] " '新建表结构