Type | Description | |||
ScrollBar as ScrollBarEnum | A ScrollBar expression that indicates the scrollbar where the caption is displayed. | |||
Part as ScrollPartEnum | A ScrollPartEnum expression that specifies the parts of the scroll where the text is displayed | |||
String | A String expression that specifies the caption being displayed on the part of the scroll bar. |
By default, the following parts are shown:
The following VB sample adds up and down additional buttons to the control's vertical scroll bar :
With Thumbnail1 .BeginUpdate .ScrollBars = exDisableBoth .ScrollPartVisible(exVScroll, exLeftB1Part Or exRightB1Part) = True .ScrollPartCaption(exVScroll, exLeftB1Part) = "<img></img>1" .ScrollPartCaption(exVScroll, exRightB1Part) = "<img></img>2" .EndUpdate End With
The following VB.NET sample adds up and down additional buttons to the control's vertical scroll bar :
With AxThumbnail1 .BeginUpdate() .ScrollBars = EXTHUMBNAILLib.ScrollBarsEnum.exDisableBoth .set_ScrollPartVisible(EXTHUMBNAILLib.ScrollBarEnum.exVScroll, EXTHUMBNAILLib.ScrollPartEnum.exLeftB1Part Or EXTHUMBNAILLib.ScrollPartEnum.exRightB1Part, True) .set_ScrollPartCaption(EXTHUMBNAILLib.ScrollBarEnum.exVScroll, EXTHUMBNAILLib.ScrollPartEnum.exLeftB1Part, "<img></img>1") .set_ScrollPartCaption(EXTHUMBNAILLib.ScrollBarEnum.exVScroll, EXTHUMBNAILLib.ScrollPartEnum.exRightB1Part, "<img></img>2") .EndUpdate() End With
The following C# sample adds up and down additional buttons to the control's vertical scroll bar :
axThumbnail1.BeginUpdate(); axThumbnail1.ScrollBars = EXTHUMBNAILLib.ScrollBarsEnum.exDisableBoth; axThumbnail1.set_ScrollPartVisible(EXTHUMBNAILLib.ScrollBarEnum.exVScroll, EXTHUMBNAILLib.ScrollPartEnum.exLeftB1Part | EXTHUMBNAILLib.ScrollPartEnum.exRightB1Part, true); axThumbnail1.set_ScrollPartCaption(EXTHUMBNAILLib.ScrollBarEnum.exVScroll, EXTHUMBNAILLib.ScrollPartEnum.exLeftB1Part , "<img></img>1"); axThumbnail1.set_ScrollPartCaption(EXTHUMBNAILLib.ScrollBarEnum.exVScroll, EXTHUMBNAILLib.ScrollPartEnum.exRightB1Part, "<img></img>2"); axThumbnail1.EndUpdate();
The following C++ sample adds up and down additional buttons to the control's vertical scroll bar :
m_thumbnail.BeginUpdate(); m_thumbnail.SetScrollBars( 15 /*exDisableBoth*/ ); m_thumbnail.SetScrollPartVisible( 0 /*exVScroll*/, 32768 /*exLeftB1Part*/ | 32 /*exRightB1Part*/, TRUE ); m_thumbnail.SetScrollPartCaption( 0 /*exVScroll*/, 32768 /*exLeftB1Part*/ , _T("<img></img>1") ); m_thumbnail.SetScrollPartCaption( 0 /*exVScroll*/, 32 /*exRightB1Part*/ , _T("<img></img>2") ); m_thumbnail.EndUpdate();
The following VFP sample adds up and down additional buttons to the control's vertical scroll bar :
With thisform.Thumbnail1 .BeginUpdate .ScrollBars = 15 .ScrollPartVisible(0, bitor(32768,32)) = .t. .ScrollPartCaption(0,32768) = "<img></img>1" .ScrollPartCaption(0, 32) = "<img></img>2" .EndUpdate EndWith
*** ActiveX Control Event *** LPARAMETERS scrollpart wait window nowait ltrim(str(scrollpart))