Code: Select all
Sub getSubscriptElements()
dim count as integer
dim value as string
count = GetNumberOfSubscriptElements("type")
msgbox ( count, "number" , MB_OK )
value = GetSubscriptElement("type",0)
msgbox ( value, "first value" , MB_OK )
value = GetSubscriptElement("type",1)
msgbox ( value, "second value" , MB_OK )
End Sub
Any ideas ?
Thanks