UC知道VB 请高手帮忙
来源：百度知道 编辑：UC知道 时间：2024/05/14 17:02:02
txtsql = "SELECT wage_glzd.部门, StuffInfo.员工号, " & _
" Sum(正常加班*正常加班(元/次)+特殊加班*特殊加班(元/次)) AS 总加班费" & _
"FROM (wage_glzd INNER JOIN StuffInfo ON wage_glzd.部门 = StuffInfo.部门) INNER JOIN Count_kq " & _
"ON (Count_kq.员工号 = StuffInfo.员工号) AND (StuffInfo.部门 = Count_kq.部门) GROUP BY wage_glzd.部门, StuffInfo.员工号"
Set mrc = ExecuteSQL(txtsql, MsgText)
如何把以上代码中"总加班费"赋值到文本框 text1中
请高手帮忙?谢谢!
" Sum(正常加班*正常加班(元/次)+特殊加班*特殊加班(元/次)) AS 总加班费" & _
"FROM (wage_glzd INNER JOIN StuffInfo ON wage_glzd.部门 = StuffInfo.部门) INNER JOIN Count_kq " & _
"ON (Count_kq.员工号 = StuffInfo.员工号) AND (StuffInfo.部门 = Count_kq.部门) GROUP BY wage_glzd.部门, StuffInfo.员工号"
Set mrc = ExecuteSQL(txtsql, MsgText)
如何把以上代码中"总加班费"赋值到文本框 text1中
请高手帮忙?谢谢!
你的程序必须跟数据库进行连接才能执行上述你所说的SELECT操作，在VB里连接数据库的工具ADODB和ADODC对象，通过以上的查询操作可以得到一个记录集，RECORESET，把这个记录集赋给TEXT1.TEXT就可以了。