以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]获取的集合显示在标签中  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108208)

--  作者:天一生水
--  发布时间:2017/10/18 14:33:00
--  [求助]获取的集合显示在标签中

获取的“今日来信”,怎样显示到标签中:

Dim d As Date = Date.Today
Dim Products As List(Of String)
Products = DataTables("来信登记").GetValues("收信人", "来信日期 = #" & d & "# ")
For Each Product As String In Products
    
    MessageBox.Show(Product)
   
Product = Product.Trim("|")
e.Form.Controls("Label1").text = Product
Next


--  作者:有点甜
--  发布时间:2017/10/18 15:01:00
--  

Dim d As Date = Date.Today
dim str as string  = DataTables("来信登记").GetComboListString("收信人", "来信日期 = #" & d & "# ")

e.Form.Controls("Label1").text = str