Page 60 - Programming VB.NET
P. 60
56 Chapter 5: Arrays
Private Sub btntwo_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs)
Handles Button2.Click
Dim msg(1, 1) As String
Dim i, j As Integer
msg(0, 0) = "Visual Programming"
msg(0, 1) = "Java"
msg(1, 0) = "Web"
msg(1, 1) = "C++"
For i = 0 To 1
For j = 0 To 1
lstoutput.Items.Add(msg(i,
j))
Next j
Next i
End Sub