A ComboBox 的 ValueChanged 事件生成 B ComboBox 的列表 ,B ComboBox 的 ValueChanged 无效,咋回事?
Dim frees As new List(of DataRow)
xyb.baseControl.Tag = ""
frees = costTab.Select(" roomID = " & lf("ID") & "and selected= 1 and (freeType= '用量计费 ' or freeType= '限额计费 ' or freeType= '阶梯计费 ')" )
For Each free As DataRow In frees
xyb.ComboList = xyb.ComboList & "|" & free("freeName") & " (" & free("Price") & " " & free("Unit") & " )"
xyb.baseControl.Tag = xyb.baseControl.Tag & "|" & free("senID")
Next
xyb.ComboList = xyb.ComboList & "|全部"
xyb.baseControl.Tag = xyb.baseControl.Tag & "|全部"
xyb.SelectedIndex = 0