求教！vb中调用OdbcExt函数显示异常

求教！vb中调用OdbcExt函数显示错误
在vb中，调用OdbcExt函数报错，

tmpstring="use a" a为数据库名称
ODBCEXT（tmpstring）
tmpstring="select * from a")
ODBCEXT(tmpstring)

句柄分配正确，但SQLExecDirect函数报错，提示use a 数据库访问语句执行失败

怎么回事？大侠们给解释解释啊



------解决方案--------------------
去vb版问问啊，访问数据库的字符串有问题吧