急当小弟我从下拉列表中选择一个姓名叫王男的名字时，小弟我希望在性别的文本框中会自动显示性别为男，不要通过添加别的按钮来实现，自动带出

急急!!当我从下拉列表中选择一个姓名叫王男的名字时，我希望在性别的文本框中会自动显示性别为男，不要通过添加别的按钮来实现，自动带出
想请教一个问题。当我从下拉列表中选择一个姓名叫王男的名字时，我希望在性别的文本框中会自动显示性别为男，不要通过添加别的按钮来实现，自动带出来，请教一下代码。thanks!!


------解决方案--------------------
要读数据库的
Combo1.AddItem rs_name.Fields(1)
Combo2.AddItem rs_sex.Fields(0)

Private Sub Combo1_Click()
Combo2.ListIndex = Combo1.ListIndex
End Sub
------解决方案--------------------
combox 里面默认添加男、女两个值
Private Sub Combo1_Click()
'通过王男得到他的性别 假设为变量sex
if sex= "男 " then
Combo1.ListIndex=0
else
Combo1.ListIndex=1
end if
End Sub
------解决方案--------------------
Combo1_DropDown()