ListMethods Method Example

The following example retrieves the number and the corresponding list of methods for the Oval object Oval1.

Dim strMsg As String

Dim pvMethods As Variant

Dim iNumMethods As Integer

Oval1.ListMethods pvMethods, iNumMethods

strMsg = "This object has the following Methods: "

For Each i In pvMethods

   strMsg = strMsg + i + ","

  Next

MsgBox strMsg, vbOKOnly, "Message"