| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 跨表筛选 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189206) |
|
| -- 作者：1234567 -- 发布时间：2023/11/16 12:50:00 -- 跨表筛选 父表有客户列，子表有品名列（子表无客户列），希望在子表筛选出客户为A 、品名为PD01的数据，求代码。 |
|
| -- 作者：有点蓝 -- 发布时间：2023/11/16 13:32:00 -- 父子表通过什么列进行关联的？ |
|
| -- 作者：1234567 -- 发布时间：2023/11/16 13:42:00 -- 通过任务单编号关联 |
|
| -- 作者：有点蓝 -- 发布时间：2023/11/16 13:46:00 -- dim s as string = datatables("父表").GetComboListString("任务单编号","客户=‘A’") tables("子表").filter = “任务单编号 in (\'" & s.replace("|","\',\'") & "\') and 品名=\'PD01\'”
|
|
| -- 作者：1234567 -- 发布时间：2023/11/16 16:11:00 -- 运行错误 ：表达式包含无效的字符串常量: \'。 Dim txt As String = e.Form.Controls("ComboBox7").Value MessageBox.Show(1) Dim txt2 As String = e.Form.Controls("ComboBox8").Value MessageBox.Show(2) Dim s As String = DataTables("任务单").GetComboListString("任务单编号", "申请单位=‘" & txt & "\'") MessageBox.Show(3) Dim s1 As String = DataTables("项目阶段").GetComboListString("项目单号", "任务单编号= \'" & s & "\'") MessageBox.Show(4) Tables("零件加工").filter = "项目单号 In (\'" & s1.replace("|", "\',\'") & "\') and 材料牌号=\'" & txt2 & "\')” MessageBox.Show(5)
|
|
| -- 作者：有点蓝 -- 发布时间：2023/11/16 16:19:00 -- 那一句出错？
|
|
| -- 作者：1234567 -- 发布时间：2023/11/16 16:22:00 -- 第三句错了 |
|
| -- 作者：1234567 -- 发布时间：2023/11/16 16:22:00 -- 这句错了 Dim s As String = DataTables("任务单").GetComboListString("任务单编号", "申请单位=‘" & txt & "\'") |
|
| -- 作者：有点蓝 -- 发布时间：2023/11/16 16:37:00 -- msgbox("申请单位=‘" & txt & "\'") 显示什么内容？ |
|
| -- 作者：1234567 -- 发布时间：2023/11/17 8:24:00 -- 表达式包含无效的字符串常量: \'。 Dim txt As String = e.Form.Controls("ComboBox7").Value MessageBox.Show(txt) Dim txt2 As String = e.Form.Controls("ComboBox8").Value MessageBox.Show(txt2) Dim s As String = DataTables("任务单").GetComboListString("任务单编号", "申请单位=‘" & txt & "\'") msgbox("申请单位=‘" & txt & "\'") |