1. 增加按钮:
Combo_订单类型.Properties.Items.Clear()
Select Case Combo_客户名称.EditValue
Case "ABC"
Combo_订单类型.Properties.Items.Add("CCPS 仓储配送", "仓储配送", -1)
Case "DEF"
Combo_订单类型.Properties.Items.Add("YSPS 运输配送", "运输配送", -1)
End Select
Combo_订单类型.Properties.Items.Clear()
Select Case Combo_客户名称.EditValue
Case "ABC"
Combo_订单类型.Properties.Items.Add("CCPS 仓储配送", "仓储配送", -1)
Case "DEF"
Combo_订单类型.Properties.Items.Add("YSPS 运输配送", "运输配送", -1)
End Select