编程与网页第一节BASIC/VB程序设计如何在QUICKBASIC中实现命令行参数QUICKBASIC是我学习编程的语言之一，我想了解一下如何在QUICKBASIC中实现命令行参数？很简单，只需使用：UCASE$（COM-MAND$）函数，其返回值就是命令行参数。示例：commandline$=ucase$（command$）'获取命令行参数并转换成大写x$=rtrim$（ltrim$（commandline$））'去掉左右空格y$=""ifx$="itbook"theny$="www.itbook.com.cn"endififx$="cpcw"theny$="www.yesky.com"endifify$=""thenprint"Torunthisprogramwith'itbook'or'cpcw'"endifVB为什么会出错我是一个编程爱好者，也是一个初学者，我在使用VB编程时遇到下面几个问题，请帮忙解决？1.在建立数据库时，要启动VB中的“可视化数据管理器”，但我一启动“可视化数据管理器”后，就出错。提示框上是这样写的:发生下面错误Can'topendatabase.Itmaynotbeadatabasethatyourapplicationrecognizes，orthefilemaybecorrupt.数:3049，显示数据访问Errors集合吗？按“是”后，提示框上写着:3049DAO.Db-Engine（上面一段也接在后面）2.再打开一个数据库（Access库），又出现如下提示框:VisData发生了下面的错误：Object变量或with块变量没有设置，数:91以上的使用环境为VB5.0+Office2000原因如下：1.这说明你的VB安装有点问题，因为启动“可视化数据管理器”的时候不可能出错的。因此我建议你去买好一点的VB来安装。现在最好都用VB6。2.我用“可视化数据管理器”打开Access2000数据库的时候也不能打开，但是这并不影响你的数据库建立。你完全可以用Access2000建一个数据库，然后再用VB操作，这并不需要用“可视化数据管理器”来打开它，而且不能打开还是可以用代码来操作的。当然了，你也可以重新安装VB6后利用“可视化数据管理器”来建一个数据库，只不过利用它建的数据库版本比较低罢了（有MicrsoftAccessversion2.0mdb和7.0mdb）两种，这两种都可以在Access2000中打开，只是会有警告信息。为什么程序运行变量时提示“未定义”在用VB进行编数据库程序时，根据帮助来声明变量，如下：DimdbAsDatabaseDimrsAsRecordset结果程序编译时VB竟然说“用户定义类型未定义”，这是什么原因呢？Database及Recordset属于DAO（DataAccessObject）模块里的，不是VB内定的，因此必须将DAO的定义包含在“引用中”，VB才会认得Database及Recordset，操作方法是选取功能表的“工程（P）”，待出现“引用（N）”窗时，再选取MicrosoftDAO3.0ObjectLibrary或MicrosoftDAO2.5/3.0CompatibilityLibrary（兼容Access2.0以前的版本）。（如果使用的是16位版本的VB，则选取MicrosoftDAO2.5ObjectLibrary）VB如何查找数据库中的某一记录如何实现在同一数据库（如Access）的所有数据表中查找某一记录？打开Database对象以后（Database对象包括TableDefs集合）。这个集合包括数据库中所有表的定义。表的个数为TableDefs.Co-unt。你可以使用TableDefs（0）、......、TableDefs（TableDefs.Count-1）来依次获得各个表的定义（TableDef对象）。也可以利用ForEach...Next来遍历整个集合。每个TableDef对象都表示一个表的结构，其Name属性就是表名。如果打开一个MDB文件，可能会得到比实际多表的个数，这是因为Access数据库中还有一些系统表，这些表通常不会被Access和VB显示出来，但可以使用VB访问它们。如果不想让这些系统表出现在列表中，可以判断TableDef的Attribution属性，如：IfTableDef（i）.AttibutionAnddbSystemObjectThen'系统表Else'普通的用户表EndIf可以利用类似下面的程序：Fori=0Todb.TabDefs.C