Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim negara As String
Dim Asean() As String = {“Indonesia”, “Malaysia”, “Thailand”, “Singapura”, “Philipina”, “brunai Darussalam”, “Vietnam”}
For Each negara In Asean
ListBox1.Items.Add(negara)
Next
End Sub
End Class