If e.IsFocusCell Then If e.Col.Name = "成本名称" Then If e.Row("材料") = True Then e.Col.Combolist = "..."
Else
e.col.Combolist = "嘻嘻嘻"
e.col.Combolist = "" End If End IfEnd If