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


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

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

帅哥哟,离线,有人找我吗?
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

 回到顶部
帅哥哟,离线,有人找我吗?
min-fox
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | 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编辑过]

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


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

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

 回到顶部
帅哥哟,离线,有人找我吗?
min-fox
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | 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编辑过]

 回到顶部