Sub SetBrightnessToNormalMode
Dim jo As JavaObject
jo.InitializeContext
Dim System As JavaObject
System.InitializeStatic("android.provider.Settings.System")
System.RunMethod("putInt", Array( _
jo.RunMethod("getContentResolver", Null), _
System.GetField("SCREEN_BRIGHTNESS_MODE"), _
System.GetField("SCREEN_BRIGHTNESS_MODE_MANUAL")))
End Sub