87:
I can not reach the Maximum value I set. What can be the problem
' Changing event - Occurs when the value of the control is about to change.
Private Sub Exscrollbar1_Changing(ByVal sender As System.Object,ByVal OldValue As Integer,ByRef NewValue As Integer) Handles Exscrollbar1.Changing
	With Exscrollbar1
		.ToolTipText = NewValue
	End With
End Sub

With Exscrollbar1
	.IgnoreLargeChange = True
	.Maximum = 128
	.Value = 128
End With
86:
How do I use the RenderType property

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSThumb,&H1000000)
	.VisualAppearance.RenderType = 1073742079
End With
85:
How can I make a spin control

' Change event - Occurs when the value of the control is changed.
Private Sub Exscrollbar1_Change(ByVal sender As System.Object) Handles Exscrollbar1.Change
	With Exscrollbar1
		Debug.Print( "Change" )
		Debug.Print( .Value )
	End With
End Sub

With Exscrollbar1
	.ThumbSize = 0
End With
84:
How can I change the tooltip's border using your EBN files with a different color

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exToolTipAppearance,&H100ffa0)
	.ToolTipText = "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
83:
Can I change the color for the control's border

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Appearance = &H10000f8 Or exontrol.EXSCROLLBARLib.AppearanceEnum.Bump Or exontrol.EXSCROLLBARLib.AppearanceEnum.Sunken
End With
82:
How do I change the control's border, using your EBN files

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Appearance = &H1000000
End With
81:
How can I change the visual appearance of the right button usign your EBN files

With Exscrollbar1
	.Mode = exontrol.EXSCROLLBARLib.ModeEnum.exHorizontal
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSRight,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSRightP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSRightD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSRightH,&H3000000)
End With
80:
How can I change the visual appearance of the thumb usign your EBN files

With Exscrollbar1
	.Mode = exontrol.EXSCROLLBARLib.ModeEnum.exHorizontal
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSThumb,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSThumbP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSThumbD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSThumbH,&H3000000)
End With
79:
How can I change the visual appearance of the left button usign your EBN files

With Exscrollbar1
	.Mode = exontrol.EXSCROLLBARLib.ModeEnum.exHorizontal
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSLeft,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSLeftP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSLeftD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exHSLeftH,&H3000000)
End With
78:
How can I change the visual appearance for all buttons usign your EBN files

With Exscrollbar1
	.Mode = exontrol.EXSCROLLBARLib.ModeEnum.exHorizontal
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtn,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtnP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtnD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtnH,&H3000000)
End With
77:
How can I change the visual appearance of the down button usign your EBN files

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSDown,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSDownP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSDownD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSDownH,&H3000000)
End With
76:
How can I change the visual appearance of the thumb usign your EBN files

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSThumb,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSThumbP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSThumbD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSThumbH,&H3000000)
End With
75:
How can I change the visual appearance of the up button usign your EBN files

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSUp,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSUpP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSUpD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exVSUpH,&H3000000)
End With
74:
How can I change the visual appearance for all buttons usign your EBN files

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtn,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtnP,&H2000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtnD,&H1000000)
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exSBtnH,&H3000000)
End With
73:
Can I indent the caption in the button or part

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb indented by 20 pixels and moved up by 5 pixels")
	.set_CaptionAlignment(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,exontrol.EXSCROLLBARLib.AlignmentEnum.LeftAlignment)
	.set_CaptionIndentX(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,20)
	.set_CaptionIndentY(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,-5)
End With
72:
Can I indent the caption in the button or part

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb indented by 20 pixels")
	.set_CaptionAlignment(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,exontrol.EXSCROLLBARLib.AlignmentEnum.LeftAlignment)
	.set_CaptionIndentX(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,20)
End With
71:
Can i specify to ignore the large change value when getting the maximum value
With Exscrollbar1
	.IgnoreLargeChange = True
End With
70:
Is there any way to specify the order of the buttons/parts

With Exscrollbar1
	.OrderParts = "l,r,t"
	.Value = 15
End With
69:
Does your control support owner draw feature
With Exscrollbar1
	.set_OwnerDrawPart(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,True)
End With
68:
Can I assing any extra data to a button or part of the control
With Exscrollbar1
	.set_UserData(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"This is just some extra data assigned to the control's thumb")
End With
67:
How can I specify the size of the thumb

With Exscrollbar1
	.set_HTMLPicture("p1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("p2","c:\exontrol\images\auction.gif")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>p1</img> thumb <img>p2</img>")
	.ThumbSize = 48
End With
66:
Is there any property to disable the up or down button, as a disable when there is no scroll

With Exscrollbar1
	.DisableNoScroll = True
End With
65:
Is there any property to disable the up or down button, so user can't click it

With Exscrollbar1
	.set_EnablePart(exontrol.EXSCROLLBARLib.PartEnum.exRightBPart,False)
End With
64:
Is there any property to disable the up or down button, so user can't click it

With Exscrollbar1
	.DisableNoScroll = True
End With
63:
Can I change the tooltip's border using your EBN files

With Exscrollbar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.set_Background32(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exToolTipAppearance,&H1000000)
	.ToolTipText = "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
62:
Can I change the tooltip's background color

With Exscrollbar1
	.ToolTipText = "This is <bgcolor=FF0000>just a text</bgcolor> that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
61:
Can I change the tooltip's background color

With Exscrollbar1
	.set_Background(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exToolTipBackColor,Color.FromArgb(255,0,0))
	.ToolTipText = "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
60:
Can I change the tooltip's foreground color

With Exscrollbar1
	.ToolTipText = "This is <fgcolor=FF0000>just a text</fgcolor> that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
59:
Can I change the tooltip's foreground color

With Exscrollbar1
	.set_Background(exontrol.EXSCROLLBARLib.BackgroundPartEnum.exToolTipForeColor,Color.FromArgb(255,0,0))
	.ToolTipText = "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
58:
Can I change the tooltip's width

With Exscrollbar1
	.BeginUpdate()
	.ToolTipWidth = 256
	.ToolTipText = "This is <font Tahoma;12>just a text with a different font</font> that's displayed when the user clicks and drags the thumb to a" & _
" new position"
	.Value = 43
	.EndUpdate()
End With
57:
Can I change the tooltip's font

With Exscrollbar1
	.BeginUpdate()
	.ToolTipTitle = "Title"
	.ToolTipText = "This is <font Tahoma;12>just a text with a different font</font> that's displayed when the user clicks and drags the thumb to a" & _
" new position"
	.Value = 43
	.EndUpdate()
End With
56:
Can I change the tooltip's font

Dim f
With Exscrollbar1
	.BeginUpdate()
	f = New stdole.StdFont()
	With f
		.Name = "Tahoma"
		.Size = 12
	End With
	.ToolTipFont = f
	.ToolTipTitle = "Title"
	.ToolTipText = "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
	.EndUpdate()
End With
55:
Can I display a tooltip when user clicks the thumb and drags it to a new position

With Exscrollbar1
	.ToolTipTitle = "Title"
	.ToolTipText = "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	.Value = 43
End With
54:
Is there any function to specify the size/width of the buttons

With Exscrollbar1
	.Mode = exontrol.EXSCROLLBARLib.ModeEnum.exHorizontal
	.BtnWidth = 32
End With
53:
Is there any function to specify the size/height of the buttons

With Exscrollbar1
	.BtnHeight = 32
End With
52:
How do scroll to a specified position
With Exscrollbar1
	.Value = 10
End With
51:
How do scroll to a specified position
With Exscrollbar1
	.Scroll(exontrol.EXSCROLLBARLib.ScrollEnum.exScrollToPosition,10)
End With
50:
How do simulate clicking the down button
With Exscrollbar1
	.Scroll(exontrol.EXSCROLLBARLib.ScrollEnum.exScrollRight,0)
End With
49:
I am using your control in a C++ application, and I would preffer handle messages instead events
With Exscrollbar1
	.SendMessage = True
End With
48:
How can I get the value from the cursor
Dim var_ValueFromPoint
With Exscrollbar1
	var_ValueFromPoint = .get_ValueFromPoint(-1,-1)
End With
47:
Is there any function to identify the part from the cursor
Dim var_PartFromPoint
With Exscrollbar1
	var_PartFromPoint = .get_PartFromPoint(-1,-1)
End With
46:
Is there any option to specify the value to be added or subtracted when user presses the contro's background
With Exscrollbar1
	.LargeChange = 20
End With
45:
Is there any option to specify the value to be added or subtracted when user presses the up or down button
With Exscrollbar1
	.SmallChange = 5
End With
44:
How do I specify the maxmimum value in the control
With Exscrollbar1
	.Maximum = 95
	.Value = 90
End With
43:
How do I specify the minimum value in the control
With Exscrollbar1
	.Minimum = 5
	.Value = 7
End With
42:
How do I change control's position
With Exscrollbar1
	.Value = 43
End With
41:
How do I change the position of the thumb
With Exscrollbar1
	.Value = 43
End With
40:
How do I enable or disable a button or a part of the control

With Exscrollbar1
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,True)
	.set_EnablePart(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,False)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,"<img>0</img><fgcolor=808080>extra button</fgcolor>")
End With
39:
How do show or hide buttons in the control

With Exscrollbar1
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,True)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,"<img>0</img>extra button")
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exRightB6Part,True)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exRightB6Part,"<img>0</img>extra button")
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exRightB5Part,True)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exRightB5Part,"<img>0</img>extra button")
End With
38:
How do I arrange the control horizontally

With Exscrollbar1
	.Mode = exontrol.EXSCROLLBARLib.ModeEnum.exHorizontal
End With
37:
How do I prevent painting the control when I perform several changes

With Exscrollbar1
	.BeginUpdate()
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_HTMLPicture("p1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("p2","c:\exontrol\images\auction.gif")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>p1</img> thumb <img>p2</img> ... <img>1</img> icon")
	.ThumbSize = 48
	.EndUpdate()
End With
36:
How do I add icons

With Exscrollbar1
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>1</img>thumb")
End With
35:
How do I change the caption for the extra button I added
With Exscrollbar1
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,True)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLeftB1Part,"<img>0</img>extra button")
End With
34:
How can I align the caption to the right

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb right")
	.set_CaptionAlignment(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,exontrol.EXSCROLLBARLib.AlignmentEnum.RightAlignment)
End With
33:
How can I align the caption to the left

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img> thumb left")
	.set_CaptionAlignment(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,exontrol.EXSCROLLBARLib.AlignmentEnum.LeftAlignment)
End With
32:
How can show the caption using a different font

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><font Tahoma;12>upper</font> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><font ;4>lower</font> part")
	.Value = 45
End With
31:
Is there any option to display icons or pictures in the parts of the control

With Exscrollbar1
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_HTMLPicture("p1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("p2","c:\exontrol\images\auction.gif")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>p1</img> thumb <img>p2</img> ... <img>1</img> icon")
	.ThumbSize = 48
End With
30:
Is there any option to display icons or pictures in the parts of the control

With Exscrollbar1
	.set_HTMLPicture("p1","c:\exontrol\images\zipdisk.gif")
	.set_HTMLPicture("p2","c:\exontrol\images\auction.gif")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>p1</img> thumb <img>p2</img>")
	.ThumbSize = 48
End With
29:
Is there any option to display icons or pictures in the parts of the control

With Exscrollbar1
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>1</img> thumb <img>2</img>")
End With
28:
Is there any option to display icons or pictures in the parts of the control

With Exscrollbar1
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>1:4</img><img>1:4</img><img>1:4</img><img>1</img>thumb")
End With
27:
Is there any option to display icons or pictures in the parts of the control

With Exscrollbar1
	.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>1</img>thumb")
End With
26:
How can paint the caption using multiple lines

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>line1<br>line2")
End With
25:
How can change the background color for a portion of text

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><bgcolor=FF0000><fgcolor=0000FF>upper</fgcolor></bgcolor> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><bgcolor=0000FF><fgcolor=FF0000>upper</fgcolor></bgcolor> part")
	.Value = 45
End With
24:
How can change the foreground color for a portion of text

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><fgcolor=FF0000>upper</fgcolor> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><fgcolor=0000FF>upper</fgcolor> part")
	.Value = 45
End With
23:
How can show the caption as strikeout

Dim f
With Exscrollbar1
	f = New stdole.StdFont()
	With f
		.Name = "Tahoma"
		.Size = 12
	End With
	.Font = f
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><s>upper</s> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><s>lower</s> part")
	.Value = 45
End With
22:
How can underline a portion of the caption

Dim f
With Exscrollbar1
	f = New stdole.StdFont()
	With f
		.Name = "Tahoma"
		.Size = 12
	End With
	.Font = f
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><u>upper</u> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><u>lower</u> part")
	.Value = 45
End With
21:
How can I draw in italic a portion of the caption

Dim f
With Exscrollbar1
	f = New stdole.StdFont()
	With f
		.Name = "Tahoma"
		.Size = 12
	End With
	.Font = f
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><i>upper</i> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><i>lower</i> part")
	.Value = 45
End With
20:
How can I draw in bold a portion of the caption

Dim f
With Exscrollbar1
	f = New stdole.StdFont()
	With f
		.Name = "Tahoma"
		.Size = 12
	End With
	.Font = f
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img><b>upper</b> part")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img><b>lower</b> part")
	.Value = 45
End With
19:
How can I put a text on the background part in the lower or upper , horizontally

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"<img>0</img>upper")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"<img>0</img>lower")
	.Value = 45
End With
18:
How can I put a text on the background part in the lower or upper side

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exLowerBackPart,"upper")
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exUpperBackPart,"lower")
	.Value = 45
End With
17:
How can I put a text on the background part, horizontally

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,"<img>0</img>background")
End With
16:
How can I put a text on the background part

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,"background")
End With
15:
How can I put a text on the thumb, horizontally

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb")
End With
14:
How can I put a text on the thumb

With Exscrollbar1
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"thumb")
End With
13:
How can I disable the control
With Exscrollbar1
	.Enabled = False
End With
12:
How do I put a picture on the center of the control

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.MiddleCenter
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
End With
11:
How do I resize/stretch a picture on the control's background

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.Stretch
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
End With
10:
How do I put a picture on the control's center right bottom side

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.LowerRight
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
End With
9:
How do I put a picture on the control's center left bottom side

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.LowerLeft
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
End With
8:
How do I put a picture on the control's center top side

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.UpperCenter
	.Value = 50
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
End With
7:
How do I put a picture on the control's right top corner

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.UpperRight
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
	.Value = 50
End With
6:
How do I put a picture on the control's left top corner

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.PictureDisplay = exontrol.EXSCROLLBARLib.PictureDisplayEnum.UpperLeft
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
	.Value = 50
End With
5:
How do I put a picture on the control's background

With Exscrollbar1
	.Picture = Exscrollbar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
	.BackColor32 = &H80000004
End With
4:
How can I change the size of control's font

With Exscrollbar1
	.Font.Size = 12
	.ForeColor = Color.FromArgb(255,0,0)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb")
End With
3:
How do I change the control's font

With Exscrollbar1
	.Font.Name = "Tahoma"
	.ForeColor = Color.FromArgb(255,0,0)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb")
End With
2:
How can I change the control's foreground color

With Exscrollbar1
	.ForeColor = Color.FromArgb(255,0,0)
	.set_Caption(exontrol.EXSCROLLBARLib.PartEnum.exThumbPart,"<img>0</img>thumb")
End With
1:
How can I change the control's background color

With Exscrollbar1
	.BackColor = Color.FromArgb(0,255,0)
	.set_VisiblePart(exontrol.EXSCROLLBARLib.PartEnum.exBackgroundPart,False)
End With