• Domingo 22 de Diciembre de 2024, 18:22

Autor Tema:  Como Puedo Usar Letras Aleatorias?  (Leído 3028 veces)

Daniel_PC

  • Miembro activo
  • **
  • Mensajes: 59
    • Ver Perfil
Como Puedo Usar Letras Aleatorias?
« en: Domingo 7 de Marzo de 2004, 06:22 »
0
Hola como puedo tener letras aleatorias como por ejemplo "qwgdfsbcj"
Gracias....

9tnix

  • Miembro MUY activo
  • ***
  • Mensajes: 165
  • Nacionalidad: pe
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #1 en: Domingo 7 de Marzo de 2004, 22:12 »
0
Salu2 Daniel_PC

Mira puedes hacer lo siguiente usa el random y genera una numero entre 1 y el tamaño de una cadena de texto puesta por ti mismo porjemplo:

Dim strCad as String
Dim Pos as Integer
Dim Caracter as string

strCad = "123456789ABCDEFGHIJKLMNÑOPQRSTUVWXYZ"
Randomize Timer
Pos = Rnd * len(strcad)
caracter = mid(strcad, pos, 1)

bueno por alli va la cosa, luego te envio un ejemplo.

Un saludo zeekel ®
[KGT]
TP-Systems
our knowledge is our power!

9tnix

  • Miembro MUY activo
  • ***
  • Mensajes: 165
  • Nacionalidad: pe
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #2 en: Lunes 8 de Marzo de 2004, 04:22 »
0
Salu2 Daniel_PC

Bueno lo prometido es deuda y aki va el programa de ejemplo que tengo espero te ayude a resolver la duda que tienes sino hazmelo saber para ayudarte ok?

Un saludo zeekel ®
[KGT]
El mensaje contiene 1 archivo adjunto. Debes ingresar o registrarte para poder verlo y descargarlo.
TP-Systems
our knowledge is our power!

elmango80

  • Miembro MUY activo
  • ***
  • Mensajes: 149
  • Nacionalidad: ve
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #3 en: Lunes 8 de Marzo de 2004, 05:58 »
0
Utilizando la funcion Chr () puedes obtener el caracter ASCII de un numero, asi que utiliza un Ramdon para generar numeros y asi con Chr () generas los caracteres aleatoriamente.

Utiliza el siguiente codigo para generar los caracteres, despues lo que tienes que hacer es concatenar los caracteres que vayas generando para hacer la cadena.

Código: Text
  1.  
  2. Private Function GenerarCaracter()    
  3.      Randomize      
  4.      GenerarCaracter = Chr(Int((255 * Rnd) + 1))  
  5. End Function  
  6.  
  7.  
Citar
No soy bueno, tampoco soy malo sino todo lo contrario...

9tnix

  • Miembro MUY activo
  • ***
  • Mensajes: 165
  • Nacionalidad: pe
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #4 en: Lunes 8 de Marzo de 2004, 06:41 »
0
Salu2 elmango80

Buena alternativa tambien mas optimizado que mi codigo  :D que bien asi entre varios podemos ayudar en el foro mucho mejor. Alli tienes otro buen ejemplo Daniel_PC para usar.

un saludo zeekel ®
[KGT]
TP-Systems
our knowledge is our power!

Daniel_PC

  • Miembro activo
  • **
  • Mensajes: 59
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #5 en: Viernes 12 de Marzo de 2004, 03:29 »
0
Gracias Amigos por Ayudarme
Daniel_PC

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #6 en: Viernes 12 de Marzo de 2004, 09:50 »
0
Hola

Tan solo hacer una pequeña puntualización...

Para hacer el proceso 'un poco más aleatorio', convendría usar una semilla adecuada para randomize: lo más sencillo sería Randomize Timer.

Chao.

elmango80

  • Miembro MUY activo
  • ***
  • Mensajes: 149
  • Nacionalidad: ve
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #7 en: Viernes 12 de Marzo de 2004, 10:02 »
0
Con el Randomize sin argumento el toma como semilla la hora actual del sistema automaticamente...
Citar
No soy bueno, tampoco soy malo sino todo lo contrario...

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Como Puedo Usar Letras Aleatorias?
« Respuesta #8 en: Lunes 15 de Marzo de 2004, 18:03 »
0
Hola elmango80.

Nunca te acostarás... sin saber 1 cosa +.

Chao.