主题：为什么 没有 效果？？ 条件 关闭按键

Dim gx As WinForm.CheckBox = e.Form.Controls("CheckBox1")
If gx.Checked = True Then
    e.Form.Controls("删除添加").Enabled = False
Else
    e.Form.Controls("删除添加").Enabled = True
End If

 

 

需要实现的效果是：   复选框， 勾选时， 删除添加 无用，  不勾选时。有用

 

将 上面的 代码 ， 放在 主窗口 AFTERLOAD 的事件 

 

 

此主题相关图片如下：qq截图20130311124823.jpg

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar