Viscom Software Image Thumbnail CP ActiveX Control

CurrentVisibleClipCount Method

Description:   

Return the number of clips that are in the visible area.

Usage:   

ImageThumbnailCP1.CurrentVisibleClipCount

Return Value:

Return the number of clips that are in the visible area.

Parameter:

No Parameter.

 

Example:   

Private Sub cmdTest_Click()     

Dim iFirstClip As Integer

iFirstClip = ImageThumbnailCP1.CurrentVisibleFirstClipIndex

iTotalVisibleClip = ImageThumbnailCP1.CurrentVisibleClipCount

iTotalClip = iFirstClip + iTotalVisibleClip - 1

For i = iFirstClip To iTotalClip
MsgBox ImageThumbnailCP1.GetClipFilePath(i)
Next
 

End Sub