Foxtable(狐表)用户栏目专家坐堂 → 如何将表A的列名变成组合窗口录入的内容


  共有1953人关注过本帖树形打印复制链接

主题:如何将表A的列名变成组合窗口录入的内容

帅哥哟,离线,有人找我吗?
zhuxinhui
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
如何将表A的列名变成组合窗口录入的内容  发帖心情 Post By:2018/11/30 15:07:00 [只看该作者]

如何才能把表A的列名变成"第一列|第二列|第三列|第四列|第五列|第六列|第七列,用做窗口1中的组合窗口录入的内容
此主题相关图片如下:88.gif
按此在新窗口浏览图片



 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2018/11/30 15:08:00 [只看该作者]

案例

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2018/11/30 15:08:00 [只看该作者]

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


 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2018/11/30 15:09:00 [只看该作者]


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

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2018/11/30 15:10:00 [只看该作者]

Dim cnt As Integer = DataTables("表A").DataCols.Count - 1
Dim nms(cnt-1) As String
For i As Integer = 0 To cnt - 1
    nms(i) = DataTables("表A").DataCols(i).name
    output.show(nms(i) )
Next



Dim cmb As WinForm.ComboBox
cmb = Forms("窗口1").Controls("ComboBox1")
cmb.ComboList = nms.Length'(cnt-1)       '"第一列|第二列|第三列|第四列|第五列|第六列|第七列"

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2018/11/30 15:10:00 [只看该作者]


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

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/30 16:19:00 [只看该作者]

Dim str As String = ""
For Each c As Col In Tables("表a").cols
    str &= c.name & "|"
Next
msgbox(str.trim("|"))

 回到顶部
帅哥哟,离线,有人找我吗?
zhuxinhui
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1995 积分:6332 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2018/11/30 16:27:00 [只看该作者]

多谢有点甜老师,想了大半日的难题,一到你哪就解决了

 回到顶部