想追加一个条件 房屋状态不等于完成 应该怎么修改呢 先谢谢啦
Dim rw As winform.Topicbar = e.Form.controls("任务栏")
Dim ht As winform.Topiclink = rw.pages("提醒").links("合同")
ht.text = "90天内租赁合同到期商铺物业共" & DataTables("cmstsh_wy").compute("count(自增)","租赁结束时间 <= #" & Date.Today.adddays(90) &"# ") & " 处(点击查看明细)"
Dim ht2 As winform.Topiclink = rw.pages("提醒").links("生产物业合同")
ht2.text = "90天内租赁合同到期生产物业共" & DataTables("cmstsh_wy_sc").compute("count(自增)","租赁结束时间 <= #" & Date.Today.adddays(90) &"# ") & " 处(点击查看明细)"
e.Form.controls("自启动").checked = getconfigvalue("自启动",False)