Dim DisabledDrawable As ColorDrawable
	DisabledDrawable.Initialize(0xFFECB7B7 , 5dip)
	Dim PressedDrawable As ColorDrawable
	PressedDrawable.Initialize(0xFFB6B6B6 , 5dip)
	Dim DefaultDrawable As ColorDrawable
	DefaultDrawable.Initialize(0xFFEA7676 , 5dip)
	Dim sld As StateListDrawable
	sld.Initialize
	sld.AddState (sld.State_Disabled, DisabledDrawable)
	sld.AddState (sld.State_Pressed, PressedDrawable)
	sld.AddCatchAllState (DefaultDrawable)
	Btn.Background = yahoo98