Win ID of the country item.
object.WinID
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISCountryItem interface |
int
Display the collection of the country items loaded from Profile, their Win IDs and long names.
Dim aCountryItems, aCountryItem
Dim aMessage
Set aCountryItems = Profile.LoadCountryList
aMessage = "Country Items Count: " & aCountryItems.Count &_
vbNewLine & vbNewLine & "#" & vbTab & "Win ID" & vbTab & "Long Name"
for i = 0 to aCountryItems.Count - 1
set aCountryItem = aCountryItems.Item(i)
aMessage = aMessage & vbNewLine & (i+1) & ") " & vbTab & aCountryItem.WinID &_
vbTab & aCountryItem.LongName
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Win ID cannot be found, but Country Items for the patient can be found in
.