50分求救！！！！！请问，如何用VB新建一个ACCESS的表啊，字段为fld1,fld2,fld3,fld4

Question

先引用DAO:
工程/引用,从列表中选中 Microsoft DAO 2.5/3.51创建空数据库文件:
   Dim MydataBase As Database
   Set MydataBase=wordSpaces(0).CreateDatabase"c:\a.mdb"),
                  dblangGeneral,dbVersion30)建一个新表:
   dim MyTabledef As TableDef
   Set MyTabledef=MyDataBase.CreateTableDef("表的名称")在表中创建字段:
   Dim Myfld As Field    '定义字段变量Myfld
   Set Myfld=MyTabledef.CreateField("fld1",dbInteger)'创建fld1字段,类型为整型
   MyTabledf.Fields.Append Myfld  '把新建字段加到表中
   ....重复上两个语句,把fld2,fld3,fld4加入表中.   MydataBase.TableDefs.Append MyTabledf '把表添加到数据库中

Answer 1

这样吧，说的简单一点，怎么把一个表复制成另一个表。在复制的过程中，我需要改变表里的数值，也就是说，一边复制，一边改。
如果说要把A.MDB复制成B.MDB。然后，我要把数据改动一下，赋到B.mdb中去。

Answer 2

用ADO加SQL语句！
工程/引用,从列表中选中 Microsoft ActiveX Data Objects , 然后用CreatTable ，具体请查询MSDN