下拉框求解决方法！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Tables("材料出库明细表").Cols("物资名称").ComboList = "金属材料|设备"

Dim r As Row = e.Row

If e.Col.Name="物资名称"

Select Case r("物资名称")

Case "金属材料"

e.Col.Combolist= DataTables("金属基本资料").GetComboListString("材料名称")

Case "设备"

e.Col.Combolist=DataTables("设备基本资料").GetComboListString("设备名称")

End Select

End If

'根据设备名称自动生成规格和材质下拉框'

If e.Col.Name = "规格型号" Then

e.Col.Combolist = DataTables("金属基本资料").GetComboListString("规格", "[材料名称] ='" & e.Row("物资名称") & "'")

End If

If e.Col.Name = "材质" Then

e.Col.Combolist = DataTables("金属基本资料").GetComboListString("材质", "[材料名称] ='" & e.Row("物资名称") & "' And [规格] ='" & e.Row("规格型号") & "'")

End If

'根据设备名称自动生成规格和材质下拉框'

效果要求：物资名称列选择金属材料在物资名称列中生成一个新的金属基本材料的下拉框

物资名称列选择设备在物资名称列中生成一个新的物资设备的下拉框

[此贴子已经被作者于2013-3-28 13:59:39编辑过]

我没有看懂你的问题，选择设备或者金属材料后代码不能进入判断语句，这是什么意思。

我印象总，你这个问题折腾很久了，其实这种小问题，做个简单发上来，几分钟就有结果了。

狐爸刚学习很多东西没有碰过。狐爸你帮我再看看吧

下载信息 [文件大小：下载次数： ]
点击浏览该文件:桂阳材料管理.table

不可以同一列，你用下拉目录树解决更加方便，从这一节开始看：

http://www.foxtable.com/help/topics/2053.htm

初学，不要直入《开发指南》，应该先看《使用指南》，很多东西都只在使用指南介绍的

看帮助一定要按顺序，头一两遍可以不求甚解，第三遍开始要将每个例子实际操作演练一遍，不明白的就上论坛求助。
三遍之后才开始做系统，先设计好表，想做什么功能，就做什么功能，遇到问题在帮助找答案，找不到的在论坛提问，不断遇到问题，不断解决问题，慢慢就熟悉了。
此外一定要先掌握《使用指南》，然后再看《开发指南》

[此贴子已经被作者于2013-3-28 14:59:38编辑过]

主题：下拉框 求解决方法！

主题：下拉框求解决方法！