Bug? Accessing DesignerArgs.DesignerProperties

Public Sub Test(DesignerArgs As DesignerArgs)
    For Each k As Object In DesignerArgs.DesignerProperties.Keys
        Log(k)
    Next
End Sub

Dim M As Map
    M.Initialize
    M.As(JavaObject).RunMethod("putAll",Array(DesignerArgs.DesignerProperties))

    For Each k As Object In M.Keys
        Log(k)
    Next