Foxtable(狐表)用户栏目专家坐堂 → 关于Button


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

主题:关于Button

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


加好友 发短信
等级:四尾狐 帖子:989 积分:8833 威望:0 精华:0 注册:2016/4/10 14:33:00
关于Button  发帖心情 Post By:2020/6/18 10:36:00 [只看该作者]

例如ABCD为4个逻辑列,Button1-10分别对应表的1-10行
如果 第一行 ADCD均为 false 则 Button1 颜色为red
如果 第二行 ADCD均为 false 则 Button2 颜色为red
如果 第三行 ADCD均为 false 则 Button3 颜色为red
这种代码应该怎么个写法?

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


加好友 发短信
等级:超级版主 帖子:110663 积分:563229 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/18 10:51:00 [只看该作者]

di r as row = tables(xxx).rows(0)
if r("A") = false andalso r("B") = false andalso..... then
e.form.controls("Button1").ForeColor = color.red
end if

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


加好友 发短信
等级:四尾狐 帖子:989 积分:8833 威望:0 精华:0 注册:2016/4/10 14:33:00
  发帖心情 Post By:2020/6/18 11:31:00 [只看该作者]

这个是写在哪个事件里面?

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


加好友 发短信
等级:超级版主 帖子:110663 积分:563229 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/18 12:08:00 [只看该作者]

想在什么时候改按钮颜色就放在那里,比如窗口afterload

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


加好友 发短信
等级:四尾狐 帖子:989 积分:8833 威望:0 精华:0 注册:2016/4/10 14:33:00
  发帖心情 Post By:2020/6/18 16:20:00 [只看该作者]

老师还问一下,这个有什么简单点的写法没?比如我设置了10个Button,那我得要写10个呀

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


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

for i as integer = 1 to 10
dim r as row = tables(xxx).rows(i)
if r("A") = false andalso r("B") = false andalso..... then
e.form.controls("Button" & i).ForeColor = color.red
end if
end if

 回到顶部