如何在access中通过组合框选取子窗体中的数据
如何在access中通过组合框选取子窗体中的数据
提问于 2017-09-18 14:15:33
这是我的SQL (我的任务是处理不是我制作的表的数据，我知道它们的名字很糟糕)：
SQL = "SELECT [risk - original].IDrisk AS [Risk ID], [risk - original].Riskname AS [Risk Name], [risk - original].Description, " & _
"[risk - original].Category, [risk - original].InitialProbability AS [Probability], [risk - original].InitialSeverity AS [Severity], " & _
"[risk - original].InitialProbability * [risk - original].InitialSeverity AS [Risk Score], [risk - original].RootCause AS [Root Cause] " & _
"FROM [risk - original] " & _
"WHERE ([InitialSeverity] = " & Me.cboSeverity & ") OR ([InitialProbability] = " & Me.cboProbability & ") OR ([Category] = '" & Me.cboRiskCategory & "'))"我可以让这段代码与WHERE子句一起工作，只使用单个组合框的一个条件，但是当我尝试添加所有组合框字段时，代码会失败，现在组合框被编程为(例如)：
Dim mySeverity As String
mySeverity = "Select * from [risk - original] where ([InitialSeverity] = " & Me.cboSeverity & ")"
Me.riskOriginalSubform.Form.RecordSource = mySeverity
Me.riskOriginalSubform.Form.Requery
Me.cboRiskCategory = Null
Me.cboProbability = Null在未来，我希望能够按多个组合框排序，然后从子窗体中选择数据，最后将数据导出到excel。
谢谢!
回答 1
Stack Overflow用户
发布于 2017-09-18 15:33:06
这是一个通用的答案：
vbSql = "SELECT stuff " & _
"FROM tbl " & _
"WHERE (cmb.value = condition "
If cmb.value = condition Then
vbSql = vbSql & "AND moreSqlconditions"
End If
vbSql = vbSql & ");"
Me.subForm.Form.RecordSource = vbSql希望这能起作用？
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/46281557
复制
相似问题
微软团队调用API
MS团队UI微软bot框架的定制
通过API Postman与微软团队集成
微软团队Tabs
微软团队- pymsteams
添加站长 进交流群
领取专属 10元无门槛券
AI混元助手 在线答疑
关注 腾讯云开发者公众号
洞察 腾讯核心技术
剖析业界实践案例
腾讯云开发者
