以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  向高手请教!!!!!!!!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96899)

--  作者:xhydxs
--  发布时间:2017/3/2 8:46:00
--  向高手请教!!!!!!!!
图片点击可在新窗口打开查看各位高手,我想“是否减员”勾选上后下面的遗属信息栏才可编辑,代码怎么写啊?
Dim rq As WinForm.Textbox = e.Form.Controls("减员原因")
Dim bz As WinForm.TextBox = e.Form.Controls("死亡时工资金额")

rq.Enabled = ( e.sender.Checked = True)
bz.Enabled = ( e.sender.Checked = True)

--  作者:xhydxs
--  发布时间:2017/3/2 8:47:00
--  
遗属信息栏为一张表,有增加和删除按钮。
--  作者:有点蓝
--  发布时间:2017/3/2 9:10:00
--  
e.Form.Controls("遗属信息表空间名称").Table.AllowEdit = e.sender.Checked