'Usage
Dim name As String
Dim propertyType As Type
Dim ownerType As Type
Dim typeMetadata As PropertyMetadata
Dim returnValue As DependencyProperty
returnValue = DependencyProperty.Register(name, _
propertyType, ownerType, typeMetadata)
'Declaration
Public Shared Function Register ( _
name As String, _
propertyType As Type, _
ownerType As Type, _
typeMetadata As PropertyMetadata _
) As DependencyProperty