edtTeste.Initialize("")
edtTeste.SetBackgroundImage(LoadBitmap(File.DirAssets,"ic_restore_white_24dp.png"))
Dim jo As JavaObject = ActionBar
jo = jo.GetField("bar")
jo.RunMethod("setDisplayShowCustomEnabled", Array As Object(True))
jo.RunMethod("setCustomView", Array As Object(edtTeste))
edtTeste.Width = 4%y
End Sub