我遇到的问题是，仓库有很多产品，也许有几千种，比如这次入库产品是“产品名称—钢板，规格—2mm，材质—Q235B”，因为有许多产品的名称都是钢板，也有许多厚度是2mm的，必须要三个属性在一起才能唯一确定这个产品，虽然有产品ID，但是操作员不可能记住这么多的编号，怎样能在入库操作的窗体里快速输入，并保证它在产品列表里是存在的？ 作者: tmtony 时间: 2013-8-8 11:58
产品编码 并可用名称 模糊搜索作者: aslxt 时间: 2013-8-8 12:43
用组合框[产品ID]让用户筛选，例如
Private Sub 产品ID_Change()
Dim A
A = 产品ID.Text
产品ID.RowSource = "SELECT 产品ID, 名称 & 规格 & 材质 as 信息 FROM 表 WHERE 名称 & 规格 & 材质 LIKE '*" & A & "*' ORDER BY 名称 & 规格 & 材质"
产品ID.Dropdown
End Sub
Private Sub Form_Current()
产品ID.RowSource = "SELECT 产品ID, 名称 & 规格 & 材质 as 信息 FROM 表 "
End Sub