Foxtable(狐表)用户栏目专家坐堂 → 按钮可用与不可用如何切换


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

主题:按钮可用与不可用如何切换

帅哥哟,离线,有人找我吗?
min-fox
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1091 威望:0 精华:0 注册:2022/5/17 22:25:00
按钮可用与不可用如何切换  发帖心情 Post By:2022/6/14 12:29:00 [只看该作者]

蓝老师:在窗体中,我想实现通过Label的变化实现Button1的可用与不可用切换,下面的代码实现不了。
Dim lab As WinForm.Label = e.Form.Controls("Label1")
If lab.Text = "★" Then
    e.Form.Controls("Button1").Enabled = False
Else
    e.Form.Controls("Button1").Enabled = True 
End If

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110784 积分:563852 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/14 13:34:00 [只看该作者]

Label怎么发生变化的?

 回到顶部
帅哥哟,离线,有人找我吗?
min-fox
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1091 威望:0 精华:0 注册:2022/5/17 22:25:00
  发帖心情 Post By:2022/6/14 13:41:00 [只看该作者]

Label显示★或者空
If lab.Text = "★" 或者是空
[此贴子已经被作者于2022/6/14 13:42:11编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110784 积分:563852 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/14 13:44:00 [只看该作者]

什么时候显示★?什么时候显示空?代码放在哪里的?

 回到顶部
帅哥哟,离线,有人找我吗?
min-fox
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1091 威望:0 精华:0 注册:2022/5/17 22:25:00
  发帖心情 Post By:2022/6/14 13:51:00 [只看该作者]

Label绑定一个列,列中有的用★标记,有的没有

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110784 积分:563852 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/14 13:54:00 [只看该作者]

代码放在哪里的?!!

Dim lab As WinForm.Label = e.Form.Controls("Label1")
msgbox(lab.Text)

 回到顶部
帅哥哟,离线,有人找我吗?
min-fox
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1091 威望:0 精华:0 注册:2022/5/17 22:25:00
  发帖心情 Post By:2022/6/14 13:59:00 [只看该作者]

代码放在窗口的AfterLoad中,切换Button1可用与不可用,下面的不执行

Dim lab As WinForm.Label = e.Form.Controls("Label1")
If lab.Text = "★" Then
    e.Form.Controls("Button1").Enabled = False
Else
    e.Form.Controls("Button1").Enabled = True 
End If
[此贴子已经被作者于2022/6/14 14:00:42编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110784 积分:563852 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/14 14:16:00 [只看该作者]

放到aftershow事件

 回到顶部