Foxtable(狐表)用户栏目专家坐堂 → 如何引用其它表间参数


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

主题:如何引用其它表间参数

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


加好友 发短信
等级:童狐 帖子:299 积分:1939 威望:0 精华:0 注册:2011/3/9 18:17:00
如何引用其它表间参数  发帖心情 Post By:2011/3/16 16:12:00 [只看该作者]

师傅你好:

在参数表中有一列出口国家,

在出口处理表中建了一个录入窗口,出口国家下拉框要引用参数表中的出口国家,请师傅帮写一组代码。

谢谢

 


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/3/16 16:16:00 [只看该作者]

用GetComboListString,请参考:

http://help.foxtable.com/topics/1457.htm

 

如果搞不定,就做例子上传。


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


加好友 发短信
等级:童狐 帖子:299 积分:1939 威望:0 精华:0 注册:2011/3/9 18:17:00
  发帖心情 Post By:2011/3/16 16:53:00 [只看该作者]

Dim dt AS DataTable = DataTables("参数")
Dim lst AS String = dt.GetComboListString("出口国家")
e.Form.Controls("ComboBox2").ComboList = lst
1、我用这个代码没有成功,是不是还少什么。请师傅帮忙写一个代码。

2、另外录入窗口自动显示时间是,日期时间型,而不是时间型,怎样处理。


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/3/16 16:59:00 [只看该作者]

1、从代码没有看出问题来,上传你的项目,写上你的代码,我帮你看看问题出在何处。

2、录入人用DateTimePicker来输入日期时间数据,这样可以选择日期时间格式。

 


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


加好友 发短信
等级:童狐 帖子:299 积分:1939 威望:0 精华:0 注册:2011/3/9 18:17:00
  发帖心情 Post By:2011/3/16 18:19:00 [只看该作者]

Dim dt AS DataTable = DataTables("参数")
Dim lst AS String = dt.GetComboListString("出口国家")
e.Form.Controls("ComboBox2").ComboList = lst
这个代码以成功。

如果增加一个出口品种下拉框,同样调用参数表出口品种列的内容,代码在上面代码的基础上如何增加,说明品种共有8个下拉框(也就是从品种1到品种8)

谢谢


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


加好友 发短信
等级:童狐 帖子:299 积分:1939 威望:0 精华:0 注册:2011/3/9 18:17:00
  发帖心情 Post By:2011/3/16 18:25:00 [只看该作者]

另外窗口日期是绑定的表日期,如:表日期是2011-03-16,窗口日期显示的是,2011-03-16 00.00.00,如何解决.


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/3/16 22:06:00 [只看该作者]

有多少个下拉框,就设置多少个:

 

Dim dt AS DataTable = DataTables("参数")
Dim lst AS String = dt.GetComboListString("出口国家")
e.Form.Controls("ComboBox2").ComboList = lst
e.Form.Controls("ComboBox3").ComboList = lst

e.Form.Controls("ComboBox4").ComboList = lst

....

 

关于日期显示了时间的问题,4楼已经回复,用DateTimePicker控件绑定到日期列,而不是TextBox控件。


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


加好友 发短信
等级:童狐 帖子:299 积分:1939 威望:0 精华:0 注册:2011/3/9 18:17:00
  发帖心情 Post By:2011/3/17 7:29:00 [只看该作者]

Dim dt AS DataTable = DataTables("参数")
Dim lst AS String = dt.GetComboListString("出口国家")
e.Form.Controls("ComboBox2").ComboList = lst
Dim lst AS String = dt.GetComboListString("出口品种")
e.Form.Controls("ComboBox3").ComboList = lst
e.Form.Controls("ComboBox4").ComboList = lst
e.Form.Controls("ComboBox6").ComboList = lst
e.Form.Controls("ComboBox7").ComboList = lst
e.Form.Controls("ComboBox8").ComboList = lst
e.Form.Controls("ComboBox9").ComboList = lst
e.Form.Controls("ComboBox10").ComboList = lst
e.Form.Controls("ComboBox11").ComboList = lst

我这样设置不好用,共用一个参数表,同一窗口里,一个出口国下拉框,8个品种下拉框,请师傅帮助写完代码


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/3/17 8:20:00 [只看该作者]

Dim dt AS DataTable = DataTables("参数")
Dim lst AS String = dt.GetComboListString("出口品种")
e.Form.Controls("ComboBox2").ComboList = dt.GetComboListString("出口国家")
e.Form.Controls("ComboBox3").ComboList = lst
e.Form.Controls("ComboBox4").ComboList = lst
e.Form.Controls("ComboBox6").ComboList = lst
e.Form.Controls("ComboBox7").ComboList = lst
e.Form.Controls("ComboBox8").ComboList = lst
e.Form.Controls("ComboBox9").ComboList = lst
e.Form.Controls("ComboBox10").ComboList = lst
e.Form.Controls("ComboBox11").ComboList = lst


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


加好友 发短信
等级:童狐 帖子:299 积分:1939 威望:0 精华:0 注册:2011/3/9 18:17:00
  发帖心情 Post By:2011/3/17 8:52:00 [只看该作者]

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

出口处理表窗口下拉框同时引用参数表中的出口国家、出口品种、出口材料

请师傅帮助处理

谢谢


 回到顶部
总数 13 1 2 下一页