|
Pokud to musí být za každou cenu ve dvou polích, kde datum bude představovat klíč a číslo hodnotu, potom můžete použít toto:
Dim keys = New Date() {Date.Now, New Date(2009, 1, 1), New Date(2011, 1, 1)}
Dim items = New Single() {2, 1, 3}
Array.Sort(keys, items)
'Původně: Po seřazení:
'2010, 2 2009, 1
'2009, 1 2010, 2
'2011, 3 2011, 3
Jinak by bylo lepší vytvořit strukturu se členy pro datum a hodnotu, naplnit jí jedno pole a seřadit pomocí stejné metody s využitím vlastního porovnávače (třída implementující rozhraní IComparer).
|