Esta función devuelve un valor lógico indicando si la expresión que pasamos como parámetro contiene
un array. Ver el Código fuente 179.
Public Sub Main()
Dim Colores() As String = {"Verde", "Azul", "Rojo"}
Verificar(Colores)
Verificar("prueba")
Console.ReadLine()
End Sub
Public Sub Verificar(ByVal ValorPasado As Object)
' comprobar si el parámetro contiene un array
If IsArray(ValorPasado) Then
Console.WriteLine("El parámetro pasado es un array")
Else
Console.WriteLine("El parámetro pasado no es un array")
End If
End Sub
Public Sub Main()
Dim Colores() As String = {"Verde", "Azul", "Rojo"}
Verificar(Colores)
Verificar("prueba")
Console.ReadLine()
End Sub
Public Sub Verificar(ByVal ValorPasado As Object)
' comprobar si el parámetro contiene un array
If IsArray(ValorPasado) Then
Console.WriteLine("El parámetro pasado es un array")
Else
Console.WriteLine("El parámetro pasado no es un array")
End If
End Sub
Código fuente 179
No hay comentarios:
Publicar un comentario