Compartir vía


Cláusula Join (Visual Basic)

Combina dos colecciones en una sola colección. La operación de combinación se basa en claves coincidentes y usa el Equals operador .

Sintaxis

Join element In collection _
  [ joinClause _ ]
  [ groupJoinClause ... _ ]
On key1 Equals key2 [ And key3 Equals key4 [... ] ]

Partes

element Obligatorio. Variable de control para la colección que se va a unir.

collection
Obligatorio. Colección que se va a combinar con la colección identificada en el lado izquierdo del Join operador. Una Join cláusula se puede anidar en otra Join cláusula o en una Group Join cláusula .

joinClause
Opcional. Una o varias cláusulas adicionales Join para refinar aún más la consulta.

groupJoinClause
Opcional. Una o varias cláusulas adicionales Group Join para refinar aún más la consulta.

key1 Equals key2
Obligatorio. Identifica las claves de las colecciones que se van a unir. Debe usar el Equals operador para comparar las claves de las colecciones que se van a unir. Puede combinar condiciones de combinación mediante el And operador para identificar varias claves. key1 debe ser de la colección en el lado izquierdo del Join operador. key2 debe ser de la colección en el lado derecho del Join operador.

Las claves usadas en la condición de combinación pueden ser expresiones que incluyen más de un elemento de la colección. Sin embargo, cada expresión de clave solo puede contener elementos de su colección respectiva.

Observaciones

La Join cláusula combina dos colecciones basadas en valores clave coincidentes de las colecciones que se van a combinar. La colección resultante puede contener cualquier combinación de valores de la colección identificada en el lado izquierdo del Join operador y la colección identificada en la Join cláusula . La consulta devolverá solo los resultados para los que se cumple la condición especificada por el Equals operador. Esto equivale a en INNER JOIN SQL.

Puede usar varias Join cláusulas en una consulta para combinar dos o más colecciones en una sola colección.

Puede realizar una combinación implícita para combinar colecciones sin la Join cláusula . Para ello, incluya varias In cláusulas en la From cláusula y especifique una Where cláusula que identifique las claves que desea usar para la combinación.

Puede usar la Group Join cláusula para combinar colecciones en una sola colección jerárquica. Esto es como en LEFT OUTER JOIN SQL.

Ejemplo 1

En el ejemplo de código siguiente se realiza una combinación implícita para combinar una lista de clientes con sus pedidos.

Dim customerIDs() = {"ALFKI", "VICTE", "BLAUS", "TRAIH"}

Dim customerList = From cust In customers, custID In customerIDs
                   Where cust.CustomerID = custID
                   Select cust.CompanyName

For Each companyName In customerList
    Console.WriteLine(companyName)
Next

Ejemplo 2

En el ejemplo de código siguiente se unen dos colecciones mediante la Join cláusula .

Imports System.Diagnostics

Public Class JoinSample

    Public Sub ListProcesses()
        Dim processDescriptions As New List(Of ProcessDescription)
        processDescriptions.Add(New ProcessDescription With {
                                    .ProcessName = "explorer",
                                    .Description = "Windows Explorer"})
        processDescriptions.Add(New ProcessDescription With {
                                    .ProcessName = "winlogon",
                                    .Description = "Windows Logon"})
        processDescriptions.Add(New ProcessDescription With {
                                    .ProcessName = "cmd",
                                    .Description = "Command Window"})
        processDescriptions.Add(New ProcessDescription With {
                                    .ProcessName = "iexplore",
                                    .Description = "Internet Explorer"})

        Dim processes = From proc In Process.GetProcesses
                        Join desc In processDescriptions
                          On proc.ProcessName Equals desc.ProcessName
                        Select proc.ProcessName, proc.Id, desc.Description

        For Each proc In processes
            Console.WriteLine("{0} ({1}), {2}",
                              proc.ProcessName, proc.Id, proc.Description)
        Next
    End Sub

End Class

Public Class ProcessDescription
    Public ProcessName As String
    Public Description As String
End Class

En este ejemplo se generará una salida similar a la siguiente:

winlogon (968), Windows Logon

explorer (2424), File Explorer

cmd (5136), Command Window

Ejemplo 3

En el ejemplo de código siguiente se unen dos colecciones mediante la Join cláusula con dos columnas de clave.

Imports System.Diagnostics

Public Class JoinSample2

    Public Sub ListProcesses()
        Dim processDescriptions As New List(Of ProcessDescription2)

        ' 8 = Normal priority, 13 = High priority
        processDescriptions.Add(New ProcessDescription2 With {
                                    .ProcessName = "explorer",
                                    .Description = "Windows Explorer",
                                    .Priority = 8})
        processDescriptions.Add(New ProcessDescription2 With {
                                    .ProcessName = "winlogon",
                                    .Description = "Windows Logon",
                                    .Priority = 13})
        processDescriptions.Add(New ProcessDescription2 With {
                                    .ProcessName = "cmd",
                                    .Description = "Command Window",
                                    .Priority = 8})
        processDescriptions.Add(New ProcessDescription2 With {
                                    .ProcessName = "iexplore",
                                    .Description = "Internet Explorer",
                                    .Priority = 8})

        Dim processes = From proc In Process.GetProcesses
                        Join desc In processDescriptions
                          On proc.ProcessName Equals desc.ProcessName And
                             proc.BasePriority Equals desc.Priority
                        Select proc.ProcessName, proc.Id, desc.Description,
                               desc.Priority

        For Each proc In processes
            Console.WriteLine("{0} ({1}), {2}, Priority = {3}",
                              proc.ProcessName,
                              proc.Id,
                              proc.Description,
                              proc.Priority)
        Next
    End Sub

End Class

Public Class ProcessDescription2
    Public ProcessName As String
    Public Description As String
    Public Priority As Integer
End Class

En el ejemplo se generará una salida similar a la siguiente:

winlogon (968), Windows Logon, Priority = 13

cmd (700), Command Window, Priority = 8

explorer (2424), File Explorer, Priority = 8

Consulte también