以下是引用chou619在2016-4-5 22:29:41的发言:
如题...我想用两个组合框关联一个文本框那代码怎么确定呢?
例如保险里面车上人员责任险,需要一个组合框选择车辆种类,一个组合框选择责任限额,需要两个选择好最后才能确定基础保费。
那样的话代码需要怎么编写呢
我感觉前两个控件用列表框就行了,组合框仅在用户需输入数据时使用。你可以在这两个列表框的Interactivechanged事件中计算基础保费,然后显示在表单上。
比如:车辆种类列表框的Name=车辆种类;责任限额列表框的Name=限额;基础保费显示用标签控件,Name=显示保费
那么,车辆种类.Interactivechanged事件中计算基础保费的代码段可以是:
DO CASE
CASE This.List(1)=某种车型
DO CASE
CASE Thisform.责任限额.List(1)=某数据
Thisform.显示保费.Caption='你需要的保费是 xxxx 元'
CASE ... ...
ENDCASE
CASE ... ...
ENDCASE
限额.Interactivechanged也用类似的代码。但这种方法并不好——代码太冗余,而且发生了变化,就必须修改代码。解决办法是:可以事先做一个表文件,把对应车型、限额需要的基础保费作为一条条记录存储,然后在Interactivechanged事件中仅用一条语句查询就可以了。而且,车辆种类、责任限额的备选项数据也能直接从该表文件里来,不需要一个个地维护。整个维护工作只需要针对这张表里的数据就可以了。