strSQL select (sum(xsml*fhbl)-a) from table01 Dim a As Doublea 3000000Dim strSQL As StringDim
strSQL = "select (sum(xsml*fhbl)-a) from table01 "
Dim a As Double
a = 3000000
Dim strSQL As String
Dim qdf As QueryDef
strSQL = "select (sum(xsml*fhbl)-a) from table01 "
我想要的结果是strSQL = "select (sum(xsml*fhbl)-a) from table01 "这里面a的值是3000000，而不是待输入的变量，应该怎么办？
[解决办法]
strSQL = "select (sum(xsml*fhbl)-" & a & ") from table01 "