根据自定义录入界面之四修改。
1、在客户表中已根据各客户所属的省、市、县设置好其省、市、县。
2、在出库表中已先录入准备筛选客户的省、市、县。
问题：
根据已录入的县份在客户框中列出此县的所有客户，并可根据在客户框中录入的字符进行筛选及填入客户框中。
帮助中原文：
2、将DropDownBox 的KeyPress 事件代码设置为：
Dim drp As WinForm.DropDownBox = e.Sender
If drp.DroppedDown = False '如果下拉窗口没有打开
drp.OpenDropDown() '打开下拉窗口
End If
这样一旦开始在下拉列表框中输入内容，就能自动打开打开下拉窗口。
3、将DropDownBox 的TextChanged 事件代码设置为：
Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then '如果下拉窗口已经打开
Dim tbl As Table = Tables("窗口1_Table1")
If drp.Text = "" Then '如果内容为空
tbl.Filter = "" '显示所有客户
Else '否则根据输入内容进行模糊筛选
Dim txt As String = "'*" & drp.Text & "*'"
tbl.Filter = "客户ID Like " & txt & " Or 公司名称Like " & txt & " Or 地
址Like " & txt & " Or 联系人Like " & txt
End If
End If
1、是否要修改2中的条件，第二句改为：如果已录入县份，打开下拉窗口并列出此县的所有客户。
2、如果上面的修改了，3中的倒数第三句是否要修改，如何修改。
加好友 
发短信
Post By：2013/3/29 10:45:00 [只看该作者]
