Foxtable(狐表)用户栏目专家坐堂 → 单击窗口中的其中一个按钮,此按钮变为红色,其余都变为黄色?


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

主题:单击窗口中的其中一个按钮,此按钮变为红色,其余都变为黄色?

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


加好友 发短信
等级:四尾狐 帖子:901 积分:8247 威望:0 精华:0 注册:2012/10/19 13:55:00
单击窗口中的其中一个按钮,此按钮变为红色,其余都变为黄色?  发帖心情 Post By:2020/7/16 17:07:00 [只看该作者]

在窗口1中,有四个按钮,分别是按钮 1、按钮2、按钮3、按钮4。
若单击按钮1,则按钮1的背景颜色变为红色,其他按钮全部变为黄色;
若单击按钮2,则按钮2的背景颜色变为红色,其他按钮全部变为黄色;
若单击按钮3,则按钮3的背景颜色变为红色,其他按钮全部变为黄色;
若单击按钮4,则按钮4的背景颜色变为红色,其他按钮全部变为黄色;
这该怎么写?

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


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

按钮click事件

for i as integer = 1 to 4 
e.form.controls("按钮" & i).backcolor = color.yellow
next

e.sender.backcolor = color.red

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


加好友 发短信
等级:四尾狐 帖子:901 积分:8247 威望:0 精华:0 注册:2012/10/19 13:55:00
回复:(有点蓝)按钮click事件for i as integer = 1 ...  发帖心情 Post By:2020/7/16 19:20:00 [只看该作者]

若按钮名称分别是“入库”、“出库”、“开单”、“结单”呢?应该怎么写?

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


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

dim ar() as string = {“入库”,“出库”,“开单”,“结单”}
for each s as string in ar
e.form.controls(si).backcolor = color.yellow
next

e.sender.backcolor = color.red

 回到顶部