dialog.VisibleAnimationDuration = 1000
Dim intDarkColor As Int = 0xFF000061
Dim intLightColor As Int = 0XFFE4E4E4
dialog.BackgroundColor = intLightColor
dialog.BorderCornersRadius = 30
dialog.BorderWidth = 6
dialog.TitleBarColor = intDarkColor
dialog.BodyTextColor = intDarkColor
dialog.BorderColor = intDarkColor
dialog.ButtonsColor = intDarkColor
dialog.ButtonsTextColor = intLightColor
dialog.BlurBackground = True
dialog.Title = "ATENCIÓN"
Dim res As Object = dialog.Show("QUE VIN DE LOS ULTIMOS CAMBIOS DE BOMBAS DESEAS GUARDAR?","LOS DOS","PRIMERO","CANCELAR")
Esperar (res) Completar (resultado como Int)