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:
Code:
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)
Attached code is the source. I hope you all enjoy
Last edited by bluehairman; Feb 28th, 2008 at 10:44 AM.
Reason: Removed Compiled Code
Note for moderator:
I didn't want to change bluehairman's code without consulting him, which I did through PM. I've asked him to attach the file and remove the download link.
Jottumâ„¢ XpVistaControls , (transparent) usercontrols for XP, Vista and 7 with W2K legacy support.
I wanted to put a thing like this in my IPT assignment so I could scroll down the EULA but couldn't figure out how to do it. This code's saved my life, thanks