#VB中代码创建数据库 搜索结果
'先引用McrsoftDAO3.6(或2.5或3.51)ObjectLibrary和McrsoftAccess9.0ObjectLibrary，在Form上加个Command1,粘贴以下代码：PrivateSubCommand1_Click()DimwrkDefaultAsWorkspaceDimdbsNewAsDatabaseDimtdfNewAs
