Android Question Brightness Activity

Sub Process_Globals
    Dim phone1 As Phone
End Sub

Sub Globals
    Dim sb As SeekBar
End Sub

Sub Activity_Create(FirstTime As Boolean)
    sb.Initialize("sb")
    sb.Max = 100
    sb.Value = 50
    Activity.AddView(sb, 10dip, 10dip, 90%x, 30dip)
End Sub
Sub sb_ValueChanged (Value As Int, UserChanged As Boolean)
    phone1.SetScreenBrightness(Max(Value, 5) / 100)
End Sub