Tips.cl

	/*
	|--------------------------------------------------------------
	| Formatea Numeros
	| Parametros
	|         numero : Numero a formatear
	| Retorno
	|          Numero Formateado
	|--------------------------------------------------------------
	*/
	function _formatea_numero($numero){
		if (is_numeric($numero)) {
			$find = array('.', ',','$');		
			$numero = str_replace ($find, "", $numero);
			$numero=number_format($numero,0,",",".");
		}
		return $numero;
	}

Function FormatNumero(ByVal IStr As String, ByVal Longitud As Integer) As String
        'formatea como número con ceros a la izquierda
        return String(Longitud - Len(IStr), "0") & IStr
End Function