Il metodo Rnd in Visual Basic