以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] 这段代码怎么改? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97917)
|
-- 作者:静听枫雨
-- 发布时间:2017/3/21 9:18:00
-- [求助] 这段代码怎么改?
帮助里 有三列。我实际运用,只有后两列。试着改,不行。求助各位老师及前辈! 此主题相关图片如下:qq图片20170321091538.png
|
-- 作者:静听枫雨
-- 发布时间:2017/3/21 9:30:00
--
劳驾老师给帮助一下
|
-- 作者:有点色
-- 发布时间:2017/3/21 9:31:00
--
Dim cmb As WinForm.ComboBox = e.Sender If cmb.Items.Count > 0 Then \'如果已经设置了项目 Return \'则返回 End If Dim c As Col = cmb.BindCol \'获得绑定的Col Dim dr As DataRow = DataTables("项目").Find("[列] = \'" & c.Name & "\'") If dr IsNot Nothing Then \'如果在项目表找到对应的行 cmb.Combolist = dr("列表项目") \'则设置列表项目 End If
|
-- 作者:静听枫雨
-- 发布时间:2017/3/21 10:08:00
--
好像不起作用~~
|
-- 作者:有点色
-- 发布时间:2017/3/21 11:17:00
--
上传实例说明问题
|