Question

SQL语句在VB中赋值

SLECT CK.类别,CK.名称, ISNULL(CK.数量,0) - ISNULL(TK.数量,0) - ISNULL(XS.数量,0) FROM
(select 类别,名称,sum(数量) as 数量 from table1 where 姓名='张三' group by 名称,类别) AS CK
LEFT JOIN
(select 类别,名称,sum(数量) as 数量 from table2 where 姓名='张三' group by 名称,类别) AS TK
ON CK.类别 = TK.类别 AND CK.名称 = TK.名称
LEFT JOIN
(select 类别,名称,sum(数量) as 数量 from table3 where 姓名='张三' group by 名称,类别) AS XS
ON CK.类别 = XS.类别 AND CK.名称 = XS.名称
WHERE ISNULL(CK.数量,0) - ISNULL(TK.数量,0) - ISNULL(XS.数量,0) > 0
因为有LEFT JOIN语句的存在，整块语句在VB中该怎么赋值呢？
例如：dim str as string
str="select 类别,名称,sum(数量) as 数量 from table2 where 姓名='张三' group by 名称,类别"
如何对上面所有的语句赋值呢？

Answer 1

你的意思是张三的地方用变量来代替？
如果是的话，请按照以下的模式来写。
dim strSql as string
dim name as string
name ="张三"
strSql = strSql & "select 类别,名称,sum(数量) as 数量 from table2 where 姓名='"& name &"' group by 名称,类别"

追问

不是，是上面整块语句该怎么赋值，关键问题是语句中间的LEFT JOIN

追答

LEFT JOIN 也是同样的道理啊。
strSql = strSql & " SLECT CK.类别,CK.名称, ISNULL(CK.数量,0) - ISNULL(TK.数量,0) - ISNULL(XS.数量,0) FROM (select 类别,名称,sum(数量) as 数量 from table1 where 姓名='"&张三对应的变量名&"' group by 名称,类别) AS CK”
strSql = strSql & " LEFT JOIN (select 类别,名称,sum(数量) as 数量 from table2 where 姓名='"&张三对应的变量名&"' group by 名称,类别) AS TK
ON CK.类别 = TK.类别 AND CK.名称 = TK.名称 "
就是组装成一个sql。如果不能判断是不是写对了，可以先写后，再在这个语句之后把组装的sql打印出来，然后去数据库中执行下。如果可以执行的话，肯定是没有问题的。
debug.print strSql