antoniggo

exechapur respondió: Como estas, mira todo es posible je, una forma seria así: Supongamos que vos tienes un MIN, un MAX, y un RES. dim min, max, res() as integer. private sub Evento() res=int(rnd * max) if res > min then Evento end sub Fíjate si te sirve... Un abrazo!