以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 多值字段  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119788)

--  作者:zcgmxf
--  发布时间:2018/5/31 22:49:00
--  [求助] 多值字段
老师,如何实现表B成员列的效果。谢谢!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目8.foxdb



--  作者:有点甜
--  发布时间:2018/5/31 23:10:00
--  
Dim str As String = ""
For Each dr As DataRow In DataTables("表A").Select("姓名 is not null")
    str &= dr("姓名") & "(" & dr("电话号码") & "),"
Next
msgbox(str.trim(","))

--  作者:zcgmxf
--  发布时间:2018/6/2 8:12:00
--  
以下是引用有点甜在2018/5/31 23:10:00的发言:
Dim str As String = ""
For Each dr As DataRow In DataTables("表A").Select("姓名 is not null")
    str &= dr("姓名") & "(" & dr("电话号码") & "),"
Next
msgbox(str.trim(","))
老师 ,str &= 是什么意思?谢谢!


--  作者:有点蓝
--  发布时间:2018/6/2 9:12:00
--  
就是

str = str & dr("姓名") & "(" & dr("电话号码") & "),"

拼接自身和其它字符的简写