Duda con imprimir en un inputbox

[wiloson]

Hola muchachos estaba trabajando un poco con la función randon y con arrays, y se me ocurrió crear un generador de contraseñas todo bien el problema fue cuando intentaba imprimir la clave generada aleatoria mente a un inputbox o a un msgbox funcionaba pero me lo imprimía de a un carácter probe con consolewrite y me funciono la duda es como lo hago con un inputbox?

El code

Código: Seleccionar todo

Local $pep[13]=["1","1","E","y","L","Ñ","o","P","R","#","%","54","a"]


Local $trint


$Contador = 0
Do
   Global $trint


   $ss=Random(1,12,0)
   $trint=$pep[$ss]
    $Contador = $Contador + 1
$Resultado=ConsoleWrite($trint)

Until $Contador = 10
InputBox('','',$trint&$pep[$ss]&$trint)

Gracias por su tiempo

[PDF]

Pruebalo así:

Código: Seleccionar todo

Local $pep[13]=["1","1","E","y","L","Ñ","o","P","R","#","%","54","a"]
Local $trint=""

$Contador = 0
Do
   $ss=Random(1,12,1)
   $trint&=$pep[$ss]
    $Contador = $Contador + 1
Until $Contador = 10
InputBox('','',$trint)

Saludos!

[wiloson]

Gracias PDF