首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

一位群友写的程序段不知哪有有关问题

2012-02-04 
一位群友写的程序段不知哪有问题?下面程序不执行也不报错,不知哪有问题,有人说and改为 .and. 但还是一样的

一位群友写的程序段不知哪有问题?
下面程序不执行也不报错,不知哪有问题,有人说and改为 .and. 但还是一样的问题。

do case 
  case allt(thisform.combo1.value)=="人保寿险康宁人生终身寿险" and allt(thisform.combo2.value)=="趸缴" and allt(thisform.combo3.value)="直销"
  zs=(thisform.text1.value)*0.035*0.6
  thisform.text2.value=zs

  case allt(thisform.combo1.value)=="人保寿险康宁人生终身寿险" and allt(thisform.combo2.value)=="趸缴" and allt(thisform.combo3.value)="中介"
  zs1=(thisform.text1.value)*0.035*0.3
  thisform.text2.value=zs1

endcase


[解决办法]

thisform.combo1.value 改为 thisform.combo1.displayvalue

thisform.combo2.value 改为 thisform.combo2.displayvalue
[解决办法]

探讨
下面程序不执行也不报错,不知哪有问题,有人说and改为 .and. 但还是一样的问题。

do case
  case allt(thisform.combo1.value)=="人保寿险康宁人生终身寿险" and allt(thisform.combo2.value)=="趸缴" and allt(thisform.combo3.value)="直销"
  zs=(thisform.text1.value)*0.035*0.6
  thisform.text2.value=zs

  case allt(thisform.combo1.value)=="人保寿险康宁人生终身寿险" and allt(thisform.combo2.value)=="趸缴" and allt(thisform.combo3.value)="中介"
  zs1=(thisform.text1.value)*0.035*0.3
  thisform.text2.value=zs1

endcase

热点排行