Dim r As Reflector
Dim ar As AndroidResources
Dim st As String
r.Target = btnDone
st = "android.graphics.drawable.Drawable"
r.RunMethod4("setCompoundDrawablesRelativeWithIntrinsicBounds",Array As Object(ar.GetApplicationDrawable("ic_action_accept"),Null,Null,Null),Array As String(st, st, st, st))