Dim In As Intent
In.Initialize("","")
In.SetComponent("my.package.name/.my_activity_name") '<-- for instance "b4a.example/.main"
Dim FLAG_DISMISS_KEYGUARD as Int = 0x00400000
Dim FLAG_TURN_SCREEN_ON as Int = 0x00200000
In.Flags = Bit.Or(FLAG_TURN_SCREEN_ON, FLAG_DISMISS_KEYGUARD )
StartActivity(In)