以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问,如何获取不重复值。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60070)

--  作者:悦颜
--  发布时间:2014/11/17 21:37:00
--  请问,如何获取不重复值。

请问 “产品汇总表”的“产品名称”列,如何向无关联表---“产品表”的“产品名称”列获取不重复值。


--  作者:悦颜
--  发布时间:2014/11/17 21:43:00
--  

不是出现在列下拉框内的那种,直接在“产品名称”列依次罗例。哪位大师请帮我一下。图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2014/11/17 21:48:00
--  

 直接填充值?

 

 http://www.foxtable.com/help/topics/0680.htm

 


--  作者:悦颜
--  发布时间:2014/11/17 22:24:00
--  

甜老师,这些代码写在哪儿才正确?项目事件和表事件,都试了,还填不上去,图片点击可在新窗口打开查看

 

Dim Vals As List(of String())
Vals = DataTables("产品表").GetValues("产品名称")
For i As Integer = 0 To Vals.Count - 1
    Dim dr As DataRow = DataTables("产品汇总").AddNew()
    dr("产品名称") = Vals(i)(0)
   
Next


--  作者:有点甜
--  发布时间:2014/11/17 22:26:00
--  
 你希望在什么时候填进去?你可以单独做一个按钮填入,或者写到maintableChanged事件
--  作者:悦颜
--  发布时间:2014/11/17 22:37:00
--  


 

[此贴子已经被作者于2014-11-17 23:32:47编辑过]

--  作者:有点甜
--  发布时间:2014/11/17 22:39:00
--  

Dim Vals As List(of String)
Vals = DataTables("产品表").GetValues("产品名称")
For i As Integer = 0 To Vals.Count - 1
    Dim dr As DataRow = DataTables("产品汇总").AddNew()
    dr("产品名称") = Vals(i) 
Next


--  作者:悦颜
--  发布时间:2014/11/17 22:47:00
--  

甜老师:

不重复值有了,但我每切换一次表,原有的不重复值就又新增一组,能帮写一段代码吗,我想不出该怎么写?


--  作者:有点甜
--  发布时间:2014/11/17 22:49:00
--  

  参考这里写就行了

 

 http://www.foxtable.com/help/topics/0680.htm


--  作者:悦颜
--  发布时间:2014/11/17 22:51:00
--  

好的。谢谢。   图片点击可在新窗口打开查看