谁能帮助我解释一下这段代码的意思？？？谢谢

Question

dim strsql as string

dim strTableName as string

strTableName="mmsch"

strsql="select * from boke where " & strTableName

dim rs as new adodb.recordset

rs.open strsql,currentproject.connection,1,1

Answer 1

dim strsql as string(声明strsql为字符串类型)

dim strTableName as string（声明strTableName为字符串类型）

strTableName="mmsch"（把"mmsch"双引号里面的该字符串赋给strTableName）

strsql="select * from boke where " & strTableName（查询数据库表boke的数据跟strTableName合并的值赋给strsql）

dim rs as new adodb.recordset（声明数据源记录集）

rs.open strsql,currentproject.connection,1,1 （打开数据库连接）

Answer 2

定义一个SQL查询语句，然后查询数据库
但是貌似SQL语句有些问题
"select * from boke where mmsch"应该会SQL错误，正确语法where后面应该跟一个条件，比如user='zhang3'