建立一个数据表TempTable,有一级、二级、三级3个字段。在ComBo1、ComBo2的InterActiveChange里写代码,重新绑定数据。比如在ComBo1里,根据ComBo1的DisplayValue的值重新绑定ComBo2和ComBo3的数据;在ComBo2里,根据ComBo2的DisplayValue的值重新绑定ComBo3的数据。
ComBo1绑定数据代码,放在表单的Init里:
Select Distinct 一级 From TempTable Into Cursor TempTableA
ThisForm.ComBo1.RowSource='TempTableA'
ComBo2绑定数据代码,放在ComBo1的InterActiveChange里:
Select Distinct 二级 From TempTable Into Cursor TempTableB Where Alltrim(一级)=ThisForm.ComBo1.DisplayValue
ThisForm.ComBo1.RowSource='TempTableB'
ComBo3的参照上面。