First off this is UserControl will make it so you have a label and you are able to scroll through the text of the label. I made this because I couldn't find it anywhere.
its my first UserControl so don't go so hard on me. I know some parts could most likely be done a lot better but its the only way I knew how to do it..
Simple code to scroll:
Attached code is the source. I hope you all enjoy
Dim cMax As Integer
Dim cValue As Integer
Dim cHeight As Integer
cHeight = lblMessage.Height
VScroll.Max = cHeight
cValue = VScroll.Value
lblMessage.Top = cValue - (cValue * 2)