以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何用代码来批量设置控件显示和隐藏  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89725)

--  作者:mzpc
--  发布时间: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编辑过]

--  作者:大红袍
--  发布时间: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


--  作者:大红袍
--  发布时间:2016/8/28 14:24:00
--  

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


--  作者:mzpc
--  发布时间:2016/8/28 21:20:00
--  
以下是引用大红袍在2016/8/28 14:24:00的发言:

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


谢谢!