Función que devuelve una string con cierto números de espacios.

Código: Seleccionar todo

#cs ----------------------------------------------------------------------------
 AutoIt Version: 3.3.8.1
 Author: DuNeD@i ®©
 Script Function: Función Space
 Uso: Msgbox(0, '', Space('16')) --> Devuelve 16 espacios
#ce ----------------------------------------------------------------------------

Func Space($Num)
    Local $Final
    For $i = 1 To $Num
        $Final = $Final & StringReplace($Num, $Num, " ")
    Next
    Return $Final
EndFunc  
Si queréis que os devuelva otro carácter, solo debéis retocarla. Algo como esto valdría:

Código: Seleccionar todo

Func _Retorno($Num, $Caracter)
    Local $Final
    For $i = 1 To $Num
        $Final = $Final & StringReplace($Num, $Num, $Caracter)
    Next
    Return $Final
EndFunc 
o versión de fakedo0r:

Código: Seleccionar todo

Func _Retorno($Num, $Car)
    Local $Final
    For $i = 1 To $Num
        $Final = $Final &  $Car
    Next
    Return $Final
EndFunc
Spyren Private Crypter-Binder [Autoit]
Crypter Online 0/35 (Terminado)
Responder

Volver a “Fuentes”