Zero 0 #1 Posted February 16, 2007 Olá desenvolvedor, aqui estou a disponibilizar uma função que desenvolvi para atender a uma solicitação do usuário Espectro. A função Random() visa tornar mais fácil o uso de números aleatórios em Visual Basic. A função: Function Random(min As Single, max As Single) As Single Randomize If max > min Then Random = (Rnd() * (max - min)) + min End If End Function Sintaxe: Random([limite mínimo], [limite máximo]) Exemplo: Random(50, 100) Gerará um número compreendido no intervalo de 50 e 100. A função está no tipo Single e seus parâmetros também. Talvez seja sensato utilizar conversões de tipo com funções como CLng(), CInt(), CSgn(), etc. Abraços! Share this post Link to post Share on other sites
Boleta 1 #2 Posted February 19, 2007 Muito super supimpa de batuta, tio Zero! Bem mais eficiente que uma que criei a um tempo atraz ^^ Além de agilizar a aplicação, toma menos espaço de código! Abraços, //Bol~ Share this post Link to post Share on other sites
Manzaparin 0 #3 Posted February 20, 2007 Eita.... Sempre inovando neh? Bem maneira a função Usei pra caraca já Manza~ see you Share this post Link to post Share on other sites
