我想实现下列的功能：（见图）

此主题相关图片如下：设表事件操作过程.gif

需求：

     1、“商品1级分类”的下拉列表在窗口加载时生成；

     2、“商口2级分类”的下拉列表由“商品1级分类”的内容生成；

     3、“商口3级分类”的下拉列表由“商品2级分类”的内容生成；

     4、“商品1级分类”改变时，“商口2级分类”、“商口3级分类”内容清空重选；

     5、“商口2级分类”改变时，“商口3级分类”内容清空重选。

方法一：不设置任何表事件，在窗口的组合框中TextChanged事件中写入代码。

商品1级分类对应的组合框中代码为：

Dim c1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim c2 As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim c3 As WinForm.ComboBox = e.Form.Controls("ComboBox3")

c2.ComboList = DataTables("商品分类表").GetComboListString("商品2级分类","[商品1级分类] = \'" & c1.Value & "\'")

c2.Value = ""
c3.value = ""

商品2级分类对应的组合框中代码为：

运行结果如下图所示，达不到要求的效果：

此主题相关图片如下：未设表事件操作过程.gif

方法二：把方法一中标注为红色的三条语句去掉，并在表事件中的DataColChanged事件设置如下代码：

可以实现效果。

各组合框所邦定的字段如下图所示：

此主题相关图片如下：未设置表事件1.jpg

问题是：

c2.Value = ""
c3.value = ""

这样的语句为什么不能改变组合框以及字段中的值？

 附件如下：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:下拉选择与清空内容(未设表事件).table

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:下拉选择与清空内容(设表事件).table

参考：

http://www.foxtable.com/help/topics/2436.htm

把代码改成：

Dim c1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim c2 As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim c3 As WinForm.ComboBox = e.Form.Controls("ComboBox3")
c2.ComboList = DataTables("商品分类表").GetComboListString("商品2级分类","[商品1级分类] = \'" & c1.Value & "\'")
c2.Value = ""
c2.WriteValue()
c3.value = ""
c3.WriteValue()

会报错：