• Home
 · 
• Miscellaneous
 · 
• This function puts a border around a usercontrol,this function also includes multiple colors and si

This function puts a border around a usercontrol,this function also includes multiple colors and si

This function puts a border around a usercontrol,this function also includes multiple colors and sizes!

Rate This function puts a border around a usercontrol,this function also includes multiple colors and si

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'before you run this in your code, thanks :)
Private Function CTL_Border(BorderSize As Integer, BorderColor As String)
For a = 0 To BorderSize
UserControl.Line (0, a)-(UserControl.Width, a), BorderColor
UserControl.Line _
(0, UserControl.Height - 10 - a)-(UserControl.Width, UserControl.Height - 10 - a), BorderColor
UserControl.Line (a, 0)-(a, UserControl.Height), BorderColor
UserControl.Line _
(UserControl.Width - 10 - a, 0)-(UserControl.Width - 10 - a, UserControl.Height - 10), BorderColor
Next a
End Function