If ph.SdkVersion >= 4.4 Then
Dim jo As JavaObject
Dim window As JavaObject = jo.InitializeContext.RunMethod("getWindow", Null)
window.RunMethod("addFlags", Array(Bit.Or(0x00000200, 0x08000000)))
Activity.Height = Activity.Height + 25dip
If ph.SdkVersion > 20 Then
Dim jo As JavaObject
jo.InitializeContext
Dim window As JavaObject = jo.RunMethodJO("getWindow", Null)
Dim view As JavaObject = window.RunMethodJO("getDecorView",Null)
view.RunMethod("setSystemUiVisibility",Array(Bit.Or(0x00002000,view.RunMethod("getSystemUiVisibility",Null)))) 'Light style with black icons and text
End If
End If