师傅你好：

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

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

谢谢

用GetComboListString，请参考：

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

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

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

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

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

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

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

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

谢谢

另外窗口日期是绑定的表日期，如：表日期是2011-03-16，窗口日期显示的是，2011-03-16 00.00.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控件。

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个品种下拉框，请师傅帮助写完代码

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:生产管理.rar

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

请师傅帮助处理

谢谢