回答編集履歴
1
修正
answer
CHANGED
|
@@ -40,8 +40,8 @@
|
|
|
40
40
|
End Sub
|
|
41
41
|
|
|
42
42
|
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
|
43
|
-
Dim i = h.OrderBy(Function(a) Guid.NewGuid())
|
|
43
|
+
Dim i = h.OrderBy(Function(a) Guid.NewGuid()).ToArray()
|
|
44
|
-
Dim j = h.OrderByDescending(Function(a) a.price)
|
|
44
|
+
Dim j = h.OrderByDescending(Function(a) a.price).ToArray()
|
|
45
45
|
Print("オリジナル", h)
|
|
46
46
|
Print("ランダム", i)
|
|
47
47
|
Print("値段の高い順", j)
|