[求助]非常难的问题向高手们请教

常言笑

在窗体中有一个文本框，接受用户输入段号并按段号进行查询，并将查询的结果生成EXCEL表格。

dim StrWhere As String

StrWhere = me.段号

strSQL = "SELECT  *" & _

               "FROM 台帐 " & _

               "WHERE 段号 =  StrWhere " & "ORDER BY 段序号;"这一句有没有错



        Set qdf1 = dbs.CreateQueryDef("~台帐", strSQL)

        

        Set TableA = dbs.OpenRecordset("~台帐", dbOpenSnapshot)这两句怎样理解,为什么总是提示运行时错误 '3061' 参数不足,期待是1,请高手们帮忙看一下到底错在哪,该如何改正,感激不尽

大熊

"WHERE 段号 =  StrWhere " & "ORDER BY 段序 这段肯定错了。

大熊

strSQL = "SELECT  * " & _

               "FROM 台帐 " & _

               "WHERE 段号 = '" & strWhere & "' ORDER BY 段序号;"这样修改我试了好像没问题啊。你改好再传上来试试.

常言笑

OK,问题解决了，向大熊同志表示我最衷心的感谢！这个问题让我这个菜鸟头痛了许久，不知所措，再此向你表示感谢，并向你学习