Dim str As String = e.Form.Controls("ComboBox2").text
If str > "" Then
e.Sender.ComboList = DataTables("表A").GetComboListString("规格1", "规格 = '" & str & "'")
Else
e.Sender.ComboList = DataTables("表A").GetComboListString("规格1", "型号 = '" & e.Form.Controls("ComboBox1").text & "'")
End If