因为你的窗口有个全局Enter事件
Dim hykh As WinForm.ComboBox = e.Form.Controls("会员卡号")
Dim bkrq As WinForm.ComboBox = e.Form.Controls("办卡日期")
Dim hylx As WinForm.ComboBox = e.Form.Controls("会员类型")
bkrq.ComboList = DataTables("会员信息表").GetComboListString("办卡日期","会员卡号= '" & hykh.text & "'" ).Replace( " 0:00:00 ","")
hylx.ComboList = DataTables("会员信息表").GetComboListString("会员类型","会员卡号= '" & hykh.text & "'" ) 这一句是根据卡号来取会员类型值的,没点会员卡号即为空,自然只点会员类型 他没有任何显示