Devuelve una matriz unidimensional de base cero que contiene el número especificado de subcadenas.
Los parámetros posibles para esta función son:
Expression
Parámetro necesario. Expresión de tipo String que contiene subcadenas y delimitadores.
* Delimiter: parámetro opcional. Cualquier carácter individual que se utilice para identificar los límites de las subcadenas. Si se omite Delimiter, se supone que el carácter de espacio (» «) es el delimitador.
* Limit: parámetro opcional. Número máximo de subcadenas en las que se debe dividir la cadena de entrada. El valor predeterminado es -1, que indica que la cadena de entrada se debe dividir cada vez que aparece la cadena Delimiter.
* Compare: parámetro opcional. Valor numérico que indica la comparación que se va a utilizar al evaluar subcadenas.
Puede servir, por ejemplo, para separar palabras de una frase.
Ejemplo de uso:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Private Function sumarValoresWMI(ByVal valor As String, ByRef numero As Integer) As String 'el valor de WMI obtendrá un número por cada item 'separado con un espacio Try Dim total As Double = 0 Dim arrayPalabras() As String, i As Integer arrayPalabras = Split(valor, " ") numero = 0 For i = 0 To UBound(arrayPalabras) numero = numero + 1 total = total + Convert.ToDouble(arrayPalabras(i)) Next i Return CStr(total / 1024 / 1024) Catch errorN As Exception txtLog.Text = txtLog.Text & System.Environment.NewLine & Now & " Error al obtener valor numérico: " & errorN.Message numero = 0 Return "" End Try End Function |