全局代码
Public Sub groupBox1_Paint(sender As Object, e As Windows.Forms.PaintEventArgs)
e.Graphics.Clear(Sender.BackColor)
e.Graphics.DrawString(Sender.Text, Sender.Font, Brushes.Red, 10, 1)
e.Graphics.DrawLine(Pens.Red, 1, 7, 8, 7)
e.Graphics.DrawLine(Pens.Red, e.Graphics.MeasureString(Sender.Text, Sender.Font).Width + 8, 7, Sender.Width - 2, 7)
e.Graphics.DrawLine(Pens.Red, 1, 7, 1, Sender.Height - 2)
e.Graphics.DrawLine(Pens.Red, 1, Sender.Height - 2, Sender.Width - 2, Sender.Height - 2)
e.Graphics.DrawLine(Pens.Red, Sender.Width - 2, 7, Sender.Width - 2, Sender.Height - 2)
End Sub
上面代码看不太懂。用这段代码测试时发现边框线条是红色,背景是黑色的。我只需要设置线条颜色,上面代码怎么改?