以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  查找不重复符合条件的值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89784)

--  作者:漂亮美眉vszh
--  发布时间:2016/8/29 21:45:00
--  查找不重复符合条件的值


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
根据1的代码,查到了2图片中画框的几行数据,现在要返回画框中对应原画圈的值,代码怎么写?

Dim st As String = vals0(0)("特性分类")
MessageBox.Show(st)

Dim st As String = vals0("特性分类")

这两种写法都 不对~~谢谢各位老师


--  作者:程兴刚
--  发布时间:2016/8/29 22:07:00
--  
把代码都贴出来,否则,大家照图片操代码多累呀!
--  作者:Hyphen
--  发布时间:2016/8/30 9:20:00
--  
贴出完整代码,或者上传例子
--  作者:狐狸爸爸
--  发布时间:2016/8/30 15:04:00
--  
我贴一个GetValues返回多列内容的例子给你,红色括号是关键。
 
 
示例六
下面这个例子,一般用户客户忽略。
可以同时从多列提取不重复的值,此时返回的不是字符的集合,而是字符数组的集合。
例如从客户列和产品列提取不重复的值:
 
\'定义数组集合的时候,要在类型后加上括号,表示这是一个数组集合。
Dim Arys As List(Of String())
Arys = DataTables("订单").GetValues("产品|客户") \'列名用符号|分割
\'注意循环变量是字符型数组,所以类型是String(),而不是String
For Each Ary As String() In Arys
    Output.Show(Ary(0) & "|" & Ary(1))
Next
 
上面的代码是从客户和产品两列提取不重复的值,返回的不是一个字符集合,而是一个字符数组集合,每个数组包括两个元素,第一个元素是客户值,第二个元素是产品值。