求助选中控件加深背面颜色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师:

您好!

下面的代码需要怎样修改,选中的控件,颜色是另外一个色?

我试着好久,都搞不掂,请求指教!谢谢!

Dim s As Integer = Tables("表A").rows.count - 1
e.Form.Controls("hsr").basecontrol.Controls.clear
For i As Integer = 0 To s
    Dim pan As WinForm.Panel = e.Form.CreateControl("Panel" & i, ControlTypeEnum.Panel)
    e.sender.BackColor = clr3
    pan.BackColor = clr1
    pan.BorderStyle = BorderStyle.None
    pan.Width = 220
    pan.Height = 399
    pan.Left = 230*i+5
    pan.Top = 5
    e.Form.Controls("hsr").AddControl(pan)
Next

[此贴子已经被作者于2017/5/29 18:30:26编辑过]

主题：求助 选中控件 加深背面颜色

主题：求助选中控件加深背面颜色