- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]符合条件 显示列表框 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2665)
-- 发布时间：2009/5/2 16:28:00
-- [求助]符合条件 显示列表框
Dim str1 as string = e.Form.Controls("ComboBox1").Value
Dim str2 as string = e.Form.Controls("ComboBox2").Value
lst.combolist = DataTables("基本信息").GetComboListString("物料名称", "工程名称 = \'" & str1 & "\'and 物料大类 = \'" & str2 & "\'")
帮我看看
lst.combolist = DataTables("基本信息").GetComboListString("物料名称", "工程名称 = \'" & str1 & "\'and 物料大类 = \'" & str2 & "\'")
这句不对
我的意思是 要列表框显示 符合 工程名称=("ComboBox1").Value 和
物料大类=Controls("ComboBox2").Value
的条件 出现在列表 显示 物料名称/物料规格/物料型号 3个字段
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:小爪仓库程序狐表.rar |
-- 发布时间：2009/5/2 17:00:00
--
Dim lst As WinForm.listBox = e.Form.Controls("ListBox1")
Dim str1 as string = e.Form.Controls("ComboBox1").Value
Dim str2 as string = e.Form.Controls("ComboBox2").Value
lst.combolist = DataTables("基本信息").GetComboListString("物料名称", "工程名称 = \'" & str1 & "\'and 物料大类 = \'" & str2 & "\'")
[此贴子已经被作者于2009-5-2 17:01:34编辑过]
-- 发布时间：2009/5/2 17:49:00
--
谢谢 ！要在列表框上 显示 物料名称/物料规格/物料型号 3个字段，怎么办？
-- 发布时间：2009/5/3 10:15:00
--
Dim lst As WinForm.listBox = e.Form.Controls("ListBox1")
Dim T,Tj,str1,str2 as string
str1 = e.Form.Controls("ComboBox1").Value
str2 = e.Form.Controls("ComboBox2").Value
Tj = "工程名称 = \'" & str1 & "\'and 物料大类 = \'" & str2 & "\'"
Dim Arys As List(Of String())
Arys = DataTables("基本信息").GetUniqueValues(Tj, "物料名称","物料规格","物料型号")
For Each Ary As String() In Arys
T = T & "|" & Ary(0) & "," & Ary(1) & "," & Ary(2)
Next
lst.combolist = T
-- 发布时间：2009/5/3 10:54:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:小爪仓库程序狐表.table |
-- 发布时间：2009/5/3 19:12:00
--
谢谢2位高手的解答：
但特别是 5楼的附件 我打开是好好的
代码贴到我的文件上，就会出现错误提示：
此主题相关图片如下：qq121.jpg
是不是你们什么位置 设置了除错误提示？？再请教
把表传上 为什么我的会出现错误提示 ，你们就不会呢？？？？？
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:小爪仓库程序狐表121.rar |
[此贴子已经被作者于2009-5-3 19:27:04编辑过]
-- 发布时间：2009/5/3 21:31:00
--
ListItemFormat事件错误
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:小爪仓库程序狐表121.table |
-- 发布时间：2009/5/3 22:15:00
--
原来如此！真的谢谢你，好妹妹！！