1: Public Class Form1
2: Inherits System.Windows.Forms.Form
3:
4: …Windows フォーム デザイナで生成されたコード…
5:
6: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
7: Dim ar As New ArrayList()
8: ar.Add("ハヤシライス")
9: ar.Add("カレーライス")
10: ar.Add("麻婆ライス")
11: ar.Sort()
12: Dim s As String
13: For Each s In ar
14: Trace.WriteLine(s)
15: Next
16: End Sub
17: End Class
1: Public Class Form1
2: Inherits System.Windows.Forms.Form
3:
4: …Windows フォーム デザイナで生成されたコード…
5:
6: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
7: Dim ar As New System.Collections.ArrayList()
8: ar.Add("ハヤシライス")
9: ar.Add("カレーライス")
10: ar.Add("麻婆ライス")
11: ar.Sort()
12: Dim s As String
13: For Each s In ar
14: Trace.WriteLine(s)
15: Next
16: End Sub
17: End Class
1: Imports System.Collections
2:
3: Public Class Form1
4: Inherits System.Windows.Forms.Form
5:
6: …Windows フォーム デザイナで生成されたコード…
7:
8: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
9: Dim ar As New ArrayList()
10: ar.Add("ハヤシライス")
11: ar.Add("カレーライス")
12: ar.Add("麻婆ライス")
13: ar.Sort()
14: Dim s As String
15: For Each s In ar
16: Trace.WriteLine(s)
17: Next
18: End Sub
19: End Class