Selezionare da codice una riga di una ColumnView

Per selezionare da codice una riga di una ColumnView, possiamo adottare un codice simile al seguente, nel quale selezioneremo l'ultima riga:

Public Sub Form_Open()

 Dim ColumnView1 As ColumnView

 With ColumnView1 = New ColumnView(Me)
   .Move(0, 0, Me.W, 100)
' Imposta due colonne:
   .Columns.Count = 2
   .Columns[0].Alignment = Align.Center
   .Columns[0].Title = "Prima Colonna"
   .Columns[0].Width = -1
   .Columns[1].Alignment = Align.Center
   .Columns[1].Title = "Seconda Colonna"
   .Columns[1].Width = -1
   .Add("Prima riga", Null, Picture["icon:/16/red"])
   .Add("Seconda riga", Null, Picture["icon:/16/green"])
   .Add("Terza riga", Null, Picture["icon:/16/blue"])
 End With

' Assegna un testo alla cella della prima colonna della prima riga della "ColumnView":
 ColumnView1["Prima riga"][0] = "Cella della 1^ colonna della 1^ riga"
' Assegna un testo alla cella della seconda colonna della prima riga della "ColumnView":
 ColumnView1["Prima riga"][1] = "Cella della 2^ colonna della 1^ riga"
' Assegna un testo alla cella della prima colonna della seconda riga della "ColumnView":
 ColumnView1["Seconda riga"][0] = "Cella della 1^ colonna della 2^ riga"
' Assegna un testo alla cella della seconda colonna della seconda riga della "ColumnView":
 ColumnView1["Seconda riga"][1] = "Cella della 2^ colonna della 2^ riga"
' Assegna un testo alla cella della prima colonna della terza riga della "ColumnView":
 ColumnView1["Terza riga"][0] = "Cella della 1^ colonna della 3^ riga"
' Assegna un testo alla cella della seconda colonna della terza riga della "ColumnView":
 ColumnView1["Terza riga"][1] = "Cella della 2^ colonna della 3^ riga"

' Seleziona l'intera terza riga della "ColumnView":
 ColumnView1[ColumnView1.Keys[ColumnView1.Keys.Max]].Selected = True

End