| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]按钮背景颜色修改 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=94918) |
| -- 作者：joe_xgp -- 发布时间：2017/1/5 12:31:00 -- [求助]按钮背景颜色修改 各位老师好，我建立一个面板，上面有20个按钮，按钮的名称分别命名为D1，D2，D3.......D20 然后采用一个循环语句For i=1 to 20 ，分别把20个按钮的背景设置不同的颜色。 求大侠老师指教。 1） 如何使用循环指定对一个数字的按钮？语句如何编写； 2) 如何对对应按钮修改背景颜色 非常感谢！ |
| -- 作者：逛逛 -- 发布时间：2017/1/5 12:50:00 -- Dim p As WinForm.Panel= Forms("窗口2").Controls("Panel1") For I As Integer = 1 To 20 p.Children("D" & i).BackColor = Color.FromArgb(Rand.Next(255),Rand.Next(255),Rand.Next(255)) Next
|
| -- 作者：joe_xgp -- 发布时间：2017/1/5 13:15:00 -- 非常感谢老师的及时回复，我使用的是Button，不知道button是否有背景属性可以修改的。 非常感谢！ |
| -- 作者：逛逛 -- 发布时间：2017/1/5 13:52:00 -- 试一下不就知道了嘛 |
| -- 作者：有点色 -- 发布时间：2017/1/5 14:07:00 -- 以下是引用joe_xgp在2017/1/5 13:15:00的发言：
非常感谢老师的及时回复，我使用的是Button，不知道button是否有背景属性可以修改的。 非常感谢！
如果没有用到风格，可以改变背景颜色，否则就只能修改风格
e.form.controls("Button1").VisualStyle = 2 \'0-15 |
| -- 作者：joe_xgp -- 发布时间：2017/1/5 14:59:00 -- 感谢以上两位老师的指教！ 太感谢了！ |