SetBackgroundImage(btn, bmp1, 0)
SetBackgroundImage(btn, bmp2, 1)
SetBackgroundImage(btn, bmp3, 2)
'state: 0 - normal, 1 - highlighted, 2 - disabled
Sub SetBackgroundImage(b As Button, bmp As Bitmap, state As Int)
Dim no As NativeObject = b
no.RunMethod("setBackgroundImage:forState:", Array(bmp, state))
End Sub