فقط کافیه شما بجای Checkbox یه ToggleButton بیارید توی فرم و تابع زیر رو فراخوانی کنید.
دو تا تصویر میخواد یکی برای حالت معمولی و یکی هم برای حالتی که تیک خورده
جالبه نه؟!!!!
Sub ChangeCheckBoxImage(chk As ToggleButton) Dim c1 As StateListDrawable Dim actColor,hoverColor As BitmapDrawable actColor.Initialize(LoadBitmapSample(File.DirAssets,"checkbox_on.png",32,32)) hoverColor.Initialize(LoadBitmapSample(File.DirAssets,"checkbox_off.png",32,32)) c1.Initialize c1.AddState(c1.State_Checked,actColor) c1.AddState(c1.State_Unchecked,hoverColor) c1.AddCatchAllState(hoverColor) chk.Background = c1 End Sub