Sub onPrint(e As BANanoEvent)
pkvalue = vue.GetIDFromEvent(e)
If pkvalue = "" Then Return
'
Dim css As List
css.Initialize2(Array("roboto.css","materialfont.css","vue-material.min.css","default.css"))
Dim po As Map = CreateMap()
'po.Put("debug", True)
po.Put("importCSS", True)
po.Put("importStyle", False)
'po.Put("printContainer", True)
po.put("loadCSS", css)
'po.put("pageTitle","")
po.Put("removeInline",False)
'po.Put("removeInlineSelector", "*")
'po.Put("printDelay", 333)
'po.Put("header", Null)
'po.Put("footer", Null)
po.Put("base", "./styles/")
'po.Put("formValues", True)
'po.Put("canvas", False)
'po.Put("removeScripts", False)
'po.Put("copyTagClasses", True)
'initialize jquery
Dim JQuery As BANanoObject
JQuery.Initialize("$")
'
Dim elKey As String = $"#${pkvalue}"$
JQuery.Selector(elKey).RunMethod("printThis", Array(po))
End Sub