如何简化代码？ - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 如何简化代码？

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 2460 人关注过本帖

标题：如何简化代码？

取消只看楼主加入收藏

su0527

等　级：论坛游民
帖　子：452
专家分：79
注　册：2015-1-10
结帖率：96.03%

楼主

已结贴√ 问题点数：20 回复次数：3

如何简化代码？

表单两个按钮组单击事件下代码，一模一样。如何简化。

搜索更多相关主题的帖子: 代码　表单　按钮　单击　事件　

2017-10-13 21:51

su0527

等　级：论坛游民
帖　子：452
专家分：79
注　册：2015-1-10

第 2 楼

得分:0

回复 2楼吹水佬

如何引用？代码中有this.caption这样的代码，指当前对象。

2017-10-14 10:07

su0527

等　级：论坛游民
帖　子：452
专家分：79
注　册：2015-1-10

第 3 楼

得分:0

回复 4楼 sdta

请明示

2017-10-14 13:06

su0527

等　级：论坛游民
帖　子：452
专家分：79
注　册：2015-1-10

第 4 楼

得分:0

回复 6楼吹水佬

    ddd="command"+ALLTRIM(STR(this.value))+".backcolor"
    ddd8="command"+ALLTRIM(STR(this.value))+".caption"
    IF this.&ddd.!=RGB(212,200,140)
    this.&ddd.=RGB(212,200,140)
    UPDATE spxx SET ys="ys1" WHERE ALLTRIM(sp)==ALLTRIM(this.&ddd8.)
    CLOSE ALL
    ELSE
    IF this.&ddd.=RGB(212,200,140)
    this.&ddd.=RGB(212,208,200)
    UPDATE spxx SET ys="" WHERE ALLTRIM(sp)==ALLTRIM(this.&ddd8.)
    CLOSE ALL
    ENDIF
    ENDIF

按钮组commandgroup1,commandgroup2的单击事件都是上面的代码。如何引用简化。

2017-10-15 21:45

快速回复：如何简化代码？