使用id字段但在组合框中显示名称字段 [英] Using id field but showing name field in combo box

问题描述

< br /> 
 Combo8.Clear< br /> 
 RES.OpenATTEND，CON，adOpenDynamic，adLockOptimistic，adCmdTable< br /> 
如果RES.RecordCount> 0然后< br /> 
 RES.MoveFirst< br /> 
对于i = 0到RES.RecordCount  -  1< br /> 
 Combo8.AddItem RES.Fields（ANM） .Value< br /> 
 Combo8.ItemData（Combo8.NewIndex）= RES.Fields（AID​​）。值< br /> 
 RES.MoveNext< br /> 
下一个< br /> 
结束如果< br /> 
 RES.Close< br /> 
结束子< br /> 

此代码是否可以帮助我加载anm（服务员名称）以及单个组合框的帮助？

实际上我想在combo8中显示anm（服务员名称）引用援助是参加标签的pk和另一个桌子的fk。

在更新/更改anm（服务员名称）的值时会考虑援助字段。

意味着它会改变或存储援助，但只能在组合中显示anm .............

请帮助



SHOUTING已删除 - OriginalGriff [/ edit]

解决方案

可能以下代码将有所帮助。 />

如果Rs.State = 1则Rs.Close 
 Rs.Open通过Your_Field从Your_Table订单中选择不同的（Your_Field）， Con，adOpenKeyset，adLockPessimistic 
如果Rs.RecordCount> 0然后
 
 Combo1.Clear 
 Combo1.AddItem
 
使用Rs 
 Do While Not .EOF 
 Combo1.AddItem Rs（ 0）
 .MoveNext 
循环
。关闭
结束
 
 Combo1.Visible = True 
 Combo1.SetFocus 
 End如果

<br />
Combo8.Clear<br />
RES.Open "ATTEND", CON, adOpenDynamic, adLockOptimistic, adCmdTable<br />
    If RES.RecordCount > 0 Then<br />
        RES.MoveFirst<br />
            For i = 0 To RES.RecordCount - 1<br />
                Combo8.AddItem RES.Fields("ANM").Value<br />
                Combo8.ItemData(Combo8.NewIndex) = RES.Fields("AID").Value<br />
        RES.MoveNext<br />
        Next<br />
    End If<br />
RES.Close<br />
End Sub<br />

Will this code help me to load anm(attendant name)as well as aid in single combo box?
Actually I want to show anm(attendant name) in combo8 referencing the aid which is pk of attend tab and fk of another table.
at the time of updating/changing values of anm(attendant name)will it consider aid field.
Means it sh''d change or store aid but only show anm in combo8.............
Please help

[edit]SHOUTING removed - OriginalGriff[/edit]

解决方案

May be following code will help.

If Rs.State = 1 Then Rs.Close
Rs.Open "select distinct(Your_Field) from Your_Table order by Your_Field", Con, adOpenKeyset, adLockPessimistic
            If Rs.RecordCount > 0 Then
                
                Combo1.Clear
                Combo1.AddItem ""
            
                With Rs
                    Do While Not .EOF
                        Combo1.AddItem Rs(0)
                        .MoveNext
                    Loop
                    .Close
                End With
                    
                Combo1.Visible = True
                Combo1.SetFocus
            End If

这篇关于使用id字段但在组合框中显示名称字段的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！