主题：窗口下拉列表值唯一时自动显示？

 窗口中有三个COMBOBOX，当选择型号的下拉列表值为“YYY"的时候，由于YYY对应的规格和颜色都是唯一的。

1、如何让唯一的值直接联动显示出来而不用再点下拉列表手动选择？见例子。

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

点击浏览该文件:窗口动态列表项目.foxdb

Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim str As String = e.Form.Controls("ComboBox1").Text
cmb.ComboList = DataTables("表A").GetComboListString("规格", "型号 = '" & str & "'")
If cmb.Items.Count = 1 Then
    cmb.Text = cmb.ComboList
End If