Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于同窗口BUTTON可用可不用的问题,求指点


  共有5028人关注过本帖树形打印复制链接

主题：关于同窗口BUTTON可用可不用的问题,求指点
美女呀，离线，留言给我吧！
snowlow
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：44 积分：370 威望：0 精华：0 注册：2014/1/16 11:15:00 		关于同窗口BUTTON可用可不用的问题,求指点  发帖心情 Post By：2014/3/22 12:00:00 [只看该作者]

如图,当我点击新增时,要除了保存和取消,其他按钮都不可编辑.这个要怎么写代码比较简便呢?
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178530 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2014/3/22 12:04:00 [只看该作者]

图挂了.


你可以设置其他控件的禁用属性为Flase
 回到顶部
美女呀，离线，留言给我吧！
snowlow
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：44 积分：370 威望：0 精华：0 注册：2014/1/16 11:15:00 		  发帖心情 Post By：2014/3/22 12:05:00 [只看该作者]


[此贴子已经被作者于2014-3-22 12:10:03编辑过]
 回到顶部
美女呀，离线，留言给我吧！
snowlow
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：44 积分：370 威望：0 精华：0 注册：2014/1/16 11:15:00 		  发帖心情 Post By：2014/3/22 12:07:00 [只看该作者]

我不会发图..我总共有:新增,编辑,保存,取消,导出,导入,查找,退出等按钮..我想要除了保存,取消按钮外其他都不能用..如果这样设置的话就要一堆代码了..有没有简便点的呀?Dim bj As WinForm.Button = e.Form.Controls("编辑")
'Dim sc As WinForm.Button = e.Form.Controls("删除")
'Dim cz As WinForm.Button = e.Form.Controls("查找")
'Dim dc As WinForm.Button = e.Form.Controls("导出")
'Dim dr As WinForm.Button = e.Form.Controls("导入")
'Dim xz As WinForm.Button = e.Form.Controls("新增")
'If xz.Focused = True Then
'sc.Enabled = False
'cz.Enabled = False
'dc.Enabled = False
'dr.Enabled = False
'bj.Enabled = False
'Else
'sc.Enabled = True
'cz.Enabled = True
'dc.Enabled = True
'dr.Enabled = True
'bj.Enabled = True
'End If
我现在是这样...感觉太繁琐..
 回到顶部
美女呀，离线，留言给我吧！
snowlow
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：44 积分：370 威望：0 精华：0 注册：2014/1/16 11:15:00 		  发帖心情 Post By：2014/3/22 12:09:00 [只看该作者]


[此贴子已经被作者于2014-3-22 12:10:23编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
逛逛
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：1693 积分：12135 威望：0 精华：7 注册：2013/7/11 10:52:00 		  发帖心情 Post By：2014/3/22 13:50:00 [只看该作者]

你可以增加两个Panel

 

将新增,编辑,导出,导入,查找,退出  放在一个Panel里

 

将保存,取消 放在另一个Panel里

 

这样你只要设置这两个Panel 的可用属性就可以了。
 回到顶部
帅哥哟，离线，有人找我吗？
lsy
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00 		  发帖心情 Post By：2014/3/22 15:14:00 [只看该作者]

新增按钮的Click事件：

For Each c As WinForm.Control In e.Form.Controls
    If c.Gettype.Name = "Button" AndAlso c.Name <> "保存" AndAlso c.Name <> "取消" Then
        c.Enabled = False
    End If
Next

[此贴子已经被作者于2014-3-22 15:15:22编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
longtechwj
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：659 积分：4686 威望：0 精华：0 注册：2013/6/11 17:51:00 		  发帖心情 Post By：2014/3/22 16:25:00 [只看该作者]

写个自定义函数就可以实现
不必要一个的去设置，然后
传状态是false还是true的
参数，要不然代码量就会变
的比较大
[此贴子已经被作者于2014-3-22 16:25:57编辑过]
 回到顶部
美女呀，离线，留言给我吧！
snowlow
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：44 积分：370 威望：0 精华：0 注册：2014/1/16 11:15:00 		  发帖心情 Post By：2014/3/22 16:47:00 [只看该作者]

谢谢.我尝试一下.

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 4 次数据查询