怎么用vb代码自定义动态创建sql数据库，希望各位高手，大虾，老师们给予解答，谢谢啦~~~~

怎么用vb代码自定义动态创建sql数据库以及表，希望各位高手，大虾，老师们给予解答，谢谢啦~~~~ --------------------编程问答-------------------- Dim db As Database
Dim td As TableDef
Dim fd As Field
Set db = CreateDatabase("C:\db1.mdb", dbLangGeneral)
    Set td = db.CreateTableDef("Tab")
        Set fd = td.CreateField("ID", dbLong)
            fd.Attributes = dbAutoIncrField
            td.Fields.Append fd
        Set fd = td.CreateField("picImage", dbLongBinary)
            td.Fields.Append fd
    db.TableDefs.Append td
    db.Close
    Set fd = Nothing
    Set td = Nothing
    Set db = Nothing

--------------------编程问答-------------------- 这个已经问题解决了，虽然没有用你的，但还是非常感谢！！

补充：VB ,  数据库(包含打印，安装，报表)