2

我在访问中创建表单,我必须在其中实现级联组合框,下部组合框中的数据取决于用户选择的父值。这是表格在此处输入图像描述

左边是表格的结构,右边是表格。问题是我收到数据类型不匹配的错误,无法理解为什么会这样。在钻头直径的更新后事件中,我正在填充切削速度。每当我按下切割速度的下拉菜单时,都会出现“标准表达式中的数据类型不匹配”。这是Diametre of Drill更新后事件的代码

Private Sub cboDiameterDrilling_AfterUpdate()
cboCuttingSpeedDrilling.RowSource = "Select DISTINCT tblDrilling.cuttingSpeed " & _
"FROM tblDrilling " & _
`"WHERE tblDrilling.materials = '" & cboMaterialDrilling.Value & "' AND tblDrilling.diaOfDrill = '` `cboDiameterDrilling.Value ' " & _`
"ORDER BY tblDrilling.cuttingSpeed;"

End Sub

我认为问题出在 WHERE 子句中。任何帮助将不胜感激。谢谢

4

2 回答 2

3

您已将对象值 (cboDiameterDrilling.Value ) 的引用括在单引号中。

 AND tblDrilling.diaOfDrill = ' & cboDiameterDrilling.Value & "'"  

解决方案 :AND tblDrilling.diaOfDrill = " & cboDiameterDrilling.Value & " " & _

于 2013-01-07T18:44:55.487 回答
0

我认为您错过了“。尝试:

Private Sub cboDiameterDrilling_AfterUpdate()
cboCuttingSpeedDrilling.RowSource = "Select DISTINCT tblDrilling.cuttingSpeed " & _
"FROM tblDrilling " & _
`"WHERE tblDrilling.materials = '" & cboMaterialDrilling.Value & "' AND tblDrilling.diaOfDrill = '" & cboDiameterDrilling.Value & "' " & _
"ORDER BY tblDrilling.cuttingSpeed;"

End Sub
于 2013-01-07T18:42:29.993 回答