Hola amig@s buen inicio de semana, hoy les traigo algo de programación pues resulta que en un proyecto que estaba realizando tuve la necesidad de rellenar una cadena con el carácter "0" a la izquierda para que fuera de un tamaño fijo, por lo que busque alguna función en el intellisence del Visual Studio 2010 pero no encontré ninguna que cumpliera con lo que yo necesitaba, después intente buscar en la web pero creí que ya eran demasiadas preguntas a mi amigo Google, así que sin pensarlo mucho me puse a elaborar una pequeña función que realiza dicha tarea, he aquí la implementación de la misma.
 |
| Ejemplo de implementación de mi función FillString. |
Realmente ya no investigue si existe una función que haga lo mismo, así que si ya existe creo que me puse a reinvente la rueda :D.
Esta función podría ser muy útil cuando tenemos un número de folio consecutivo y deseamos que se impriman los Ceros "0" a la izquierda (eso era precisamente lo que yo necesitaba :D).
Aquí les dejo el código de la función en VB.Net.
Public Function FillString(ByVal pCadena As String, ByVal pLongitud As Integer, ByVal pCaracter As String) As String
Dim Resultado As String = String.Empty
If pCadena.Length < pLongitud Then
Dim fill As String = String.Empty
Dim i As Integer
For i = 1 To pLongitud - pCadena.Length
fill = fill + pCaracter
Next
Resultado = fill & pCadena
Else
Resultado = pCadena
End If
Return Resultado
End Function
Aquí les dejo el código de la función en C#.
public string FillString(string pCadena, int pLongitud, string pCaracter)
{
string Resultado = string.Empty;
if (pCadena.Length < pLongitud) {
string fill = string.Empty;
int i = 0;
for (i = 1; i <= pLongitud - pCadena.Length; i++) {
fill = fill + pCaracter;
}
Resultado = fill + pCadena;
} else {
Resultado = pCadena;
}
return Resultado;
}
