ACCESS如何让设计下拉列框

george21312　发表于：2014-09-24 20:49:59 　

复制

点击下载此附件

按上图需求，窗体1记录的是不同仓库中存放的物品种类。

1.如何使窗体2只要输入某仓库名，在物品栏下拉列框中就固定在窗体1仓库名中存放的物品种类。

2.同时需满足下拉列框中的选项不能重复（比如在数据库中设置了2个仓库A存放都存放了物品4，下拉列框只能显示1个物品4）

Top

朱先生发表于：2014-09-24 21:55:16

重复提问，ACCDB格式 2003版本无法打开，帮不上

Top

芊芊发表于：2014-09-25 08:19:07

看看这个是否有帮助!附件

Top

george21312 发表于：2014-09-25 23:00:58

麻烦了，怎么一改全改了

Top

fx 发表于：2014-09-29 20:21:26

加上一个查询，关联一条记录

Top

george21312 发表于：2014-10-07 10:33:13

能不能提供个范例

Top

蓝天白云发表于：2014-10-12 15:24:13

private sub仓库名_afterupdate()

On Error GoTo ErrorHandler

   Dim rstwz As Object
   Dim strSql As String

        Do While Combos_物品.ListCount > 0'清除组合框条目
        Combos_物品.RemoveItem (Combos_物品.ListCount - 1)
        Loop

strSql = "select distinct 物品 from table名 where 仓库名=" & sqltext(窗体2.[仓库名])
        Set rstwz = OpenADORecordset(strSql, , CurrentProject.Connection)
        Do Until rstwz.EOF
        If Not IsNull(rstwz![物品]) Then
        Combos_物品.AddItem (rstwz![物品] ) '重组物品组合框 end
        End If

        rstwz.movenext
        Loop
        Set rstwz = Nothing

end sub

Top

总记录：6篇页次：1/1 9 1 :

Access交流中心

ACCESS如何让设计下拉列框