Foxtable(狐表)用户栏目专家坐堂 → 如何用代码来批量设置控件显示和隐藏


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

主题:如何用代码来批量设置控件显示和隐藏

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


加好友 发短信
等级:婴狐 帖子:99 积分:614 威望:0 精华:0 注册:2014/5/28 12:11:00
如何用代码来批量设置控件显示和隐藏  发帖心情 Post By:2016/8/28 14:01:00 [只看该作者]

例如

在一个窗体中有
Button控件5个,名称分别为:btn1,btn2,btn3,btn4,btn5
Label控件5个,名称分别为:lb1,lb2,lb3,lb4,lb5

要求

在窗体打开时5个Label控件不可见,点击btn1时,lb1控件显示,其他Label控件不可见,依此类推。

鼠标移到控件上改变控件边框及颜色。

谢谢!
[此贴子已经被作者于2016/8/28 14:03:28编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/28 14:23:00 [只看该作者]

For i As Integer = 1 to 5

    e.Form.Controls("lb" & i).Visible = False

Next

e.Form.Controls("lb1").Visible = True


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/28 14:24:00 [只看该作者]

 改变边框颜色,去编写 MouseEnter 、 MouseLeave 事件


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


加好友 发短信
等级:婴狐 帖子:99 积分:614 威望:0 精华:0 注册:2014/5/28 12:11:00
  发帖心情 Post By:2016/8/28 21:20:00 [只看该作者]

以下是引用大红袍在2016/8/28 14:24:00的发言:

 改变边框颜色,去编写 MouseEnter 、 MouseLeave 事件


谢谢!


 回到顶部