Foxtable(狐表)用户栏目专家坐堂 → [求助][求助]关于ComboBox的动态列表


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

主题:[求助][求助]关于ComboBox的动态列表

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


加好友 发短信
等级:童狐 帖子:237 积分:1970 威望:0 精华:0 注册:2011/7/1 10:05:00
[求助][求助]关于ComboBox的动态列表  发帖心情 Post By:2014/4/13 14:10:00 [只看该作者]

有两个表表A 表B  表B 为基础数据表  窗口中第一个ComboBox的值来自表B   怎样 让第一个ComboBox选择相对应的表后 第二个ComboBox中出现表A中的所有列名
我知道 直接可以用表属性 来实现 可是放在窗口中用 ComboBox 怎样实现呢  事例上是针对当前表的操作  大家把那个我看看  那个代码 怎么写呢
[此贴子已经被作者于2014-4-13 14:12:20编辑过]

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


加好友 发短信
等级:童狐 帖子:237 积分:1970 威望:0 精华:0 注册:2011/7/1 10:05:00
  发帖心情 Post By:2014/4/13 14:13:00 [只看该作者]

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


 回到顶部
帅哥,在线噢!
y2287958
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4761 积分:34613 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2014/4/13 14:28:00 [只看该作者]

e.Form.Controls("ComboBox1")的TextChanged:(去除e.Form.Controls("ComboBox2")的Enter事件代码

Dim s As String
If DataTables.Contains(e.Sender.Value)
    For Each dc As DataCol In DataTables(e.Sender.Value).DataCols
        s += dc.Name & "|"
    Next
    Dim c As WinForm.ComboBox = e.Form.Controls("ComboBox2")
    c.ComboList = s.TrimEnd("|")
End If

 回到顶部