MSPropShell.PageCount
![]() |
The PageCount property retrieves the number of property pages in the MSPropShell control.
Syntax
Long = MSPropShell.PageCount
Parameters
This property takes no parameters.
Property Value
A Long that indicates the number of pages.
Remarks
This property is read-only.
Example Code
' Create a WMEncoder object.
Dim Encoder As WMEncoder
Set Encoder = New WMEncoder
' Create the Windows Media Encoder property pages.
Dim PpgSources As New WMEncSourcesPage
Dim PpgDesc As New WMEncDisplayInfoPage
Dim PpgAttr As New WMEncAttributesPage
Dim PpgProfile As New WMEncProfilePage
Dim PpgOutput As New WMEncOutputPage
' Add Windows Media Encoder to the property page shell.
' You must add the encoder before adding the property pages.
PropPageShell.AddObject Encoder
' Add the property pages to the property page shell. To create an
' MSPropShell ActiveX control, on the Project menu, click Components,
' and then in the Components dialog box, select Microsoft PropShell
' Control 1.0. In the following example, the ActiveX control is named
' PropPageShell.
PropPageShell.AddPage PpgSources
PropPageShell.AddPage PpgDesc
PropPageShell.AddPage PpgAttr
PropPageShell.AddPage PpgProfile
PropPageShell.AddPage PpgOutput
' Retrieve the number of pages in the MSPropShell control.
Dim lPageCount As Long
lPageCount = PropPageShell.PageCount
Requirements
Reference: Microsoft PropShell Control 1.0
Library: mspshell.dll
See Also
.gif)