以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]GetValues("产品名称","")指定列可以是变量吗?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142805)

--  作者:cqlpjks
--  发布时间:2019/11/6 16:54:00
--  [求助]GetValues("产品名称","")指定列可以是变量吗?
从指定列中,获取不重复的值,如果指定列是变量,如何修改指定列?请指教。谢谢!
Dim tjxx As String = e.Form.Controls("统计选项").text
    For Each bubie As String In DataTables("问卷答案").GetValues("& tjxx &","")

--  作者:有点蓝
--  发布时间:2019/11/6 17:06:00
--  
For Each bubie As String In DataTables("问卷答案").GetValues(tjxx,"")
--  作者:cqlpjks
--  发布时间:2019/11/7 8:47:00
--  
谢谢!
这个又如何修改?请指教。
For i As Integer = 1 To 16
            For Each xx As String In DataTables("问卷答案").GetValues("选项" & i,"tjxx = \'" & bubie & "\'")

--  作者:blackzhu
--  发布时间:2019/11/7 8:49:00
--  
For Each xx As String In DataTables("问卷答案").GetValues("选项" & i,tjxx  & "= \'" & bubie & "\'")
--  作者:cqlpjks
--  发布时间:2019/11/7 9:51:00
--  
谢谢!
最后部分怎么变灰了?请指教。谢谢!
dr("选项人") = DataTables("问卷答案").Compute("count("& dr("题号") &")", "" & dr("题号") & " = \'" & dr("选项") & "\' and tjxx & " = \'" & dr("部别") & "\'")

--  作者:有点蓝
--  发布时间:2019/11/7 9:56:00
--  
不需要在意,没有影响的
--  作者:cqlpjks
--  发布时间:2019/11/7 10:02:00
--  
但提示:
编译错误:应为表达式。

--  作者:有点蓝
--  发布时间:2019/11/7 10:04:00
--  
dr("选项人") = DataTables("问卷答案").Compute("count("& dr("题号") &")", "" & dr("题号") & " = \'" & dr("选项") & "\' and " & tjxx & " = \'" & dr("部别") & "\'")
--  作者:cqlpjks
--  发布时间:2019/11/7 10:18:00
--  
谢谢!
tjxx & "前加" &。