RC-WinTrans Object Model Help |
SubFileProperty.Value
|
Type Info: |
Value As String |
| Example: | Dim SubFileProps As SubFileProperties
Dim SubFileProp As SubFileProperty
Dim Property As String
Dim Number As String
Set SubFileProps = Application.ActiveProjectFile.SubFiles(1).Properties
For Each SubFileProp In SubFileProps
Property = "Name: " & SubFileProp.Name & " , ExtendedName: " & SubFileProp.ExtendedName & _
" , Value:" & SubFileProp.Value & " , NamespaceURI: " & SubFileProp.NamespaceURI
Windows.MultiViewBar.Output.AddText (Property)
Next SubFileProp
Number = SubFileProps.Count & " properties available."
Windows.MultiViewBar.Output.AddText (Number)
|