Dim bd As GradientDrawable
Dim cl(2) As Int
cl(0) = Colors.Black
cl(1) = Colors.RGB(234,24,24)
bd.Initialize("BOTTOM_TOP",cl)
CustomView4.ButtonColor = Colors.ARGB(150,255,255,255)
CustomView4.CornerRadius = 20dip
CustomView4.ShadowColor = Colors.ARGB(100,255,255,255)
CustomView4.ShadowHeight = 10dip
CustomView4.Height = 20%y
CustomView4.ShadowEnabled = True
CustomView4.ImageBitmap = LoadBitmap(File.DirAssets,"google+48.png")
CustomView4.ButtonText = "Button 4"
CustomView4.ButtonTextSize = 25
CustomView4.ButtonTextColor = Colors.Green
CustomView4.Width = 150dip
CustomView4.Background = bd