Dim d As New DynaPDFMBS

// create a new annotation
Call d.CreateNewPDF
Call d.append
Dim n As Integer = d.WebLink(0, 0, 100, 100, "about:blank")

// now query as old class and convert to new class
Dim a1 As DynaPDFAnnotationMBS = d.GetAnnot(n)
Dim a2 As DynaPDFAnnotationExMBS = a1

// now query as new class and convert to old class
Dim e1 As DynaPDFAnnotationExMBS = d.GetAnnotEx(n)
Dim e2 As DynaPDFAnnotationMBS = e1

// please update all your code to move to DynaPDFAnnotationExMBS
Break