- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助：遍历列值并将所得到的列值一键新增到另外一表中，实现按省份、地州进行对应筛选 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84644)
-- 发布时间：2016/5/6 11:50:00
-- 求助：遍历列值并将所得到的列值一键新增到另外一表中，实现按省份、地州进行对应筛选
求助：遍历列值并将所得到的列值一键新增到另外一表中，实现按省份、地州进行对应筛选
Dim s As String = DataTables("省份表").GetComboListString("市县")
output.show(s.replace("|"," "))
该代码可以获得省份表中的市县列全部值，怎么实现进行筛选呢？如果我当前处于贵州省黔南州 那么只需要黔南州下面的市县值
下面代码实现市县列值自动赋值，但是只能增加一行，求解，将市县列经过上述代码筛选后的值，全部赋值到统计表中的市县列
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:新媒体数据平台.foxdb |
-- 发布时间：2016/5/6 11:57:00
--
怎么操作啊？哪个窗口哪个表啊？
http://www.foxtable.com/help/topics/1533.htm
[此贴子已经被作者于2016/5/6 11:57:30编辑过]
-- 发布时间：2016/5/6 15:16:00
-- 回复：（大红袍） 怎么操作啊？哪个窗口哪个表啊...
在黔南州人民检察院这个窗体中操作省份表中的市县列值到统计表中的市县列值
此主题相关图片如下：84ff.tm.png
-- 发布时间：2016/5/6 15:31:00
--
Dim Vals As List(of String)
Vals = DataTables("省份表").GetValues("市县", "省份 = \'贵州省\' and 地州 = \'黔南州\'")
DataTables("统计表").DataRows.Clear
For i As Integer = 0 To Vals.Count - 1
Dim dr As DataRow = DataTables("统计表").AddNew()
dr("市县") = Vals(i)
Next
-- 发布时间：2016/5/6 16:32:00
-- 回复：（大红袍）Dim Vals As List(of String)Vals = ...
谢谢