Chapter 7 - VB.Net by Schneider
25
Example 2 continued
•
Private Sub
btnsummarize_Click(
...
)
•
Handles
btnsummarize.Click
•
'List stock companies that have been recorded
•
Dim
i
As Integer
•
lstStocks.Items.Clear()
•
For
i = 1
To
counter
•
lstStocks.Items.Add(stock(i))
•
Next
•
End Sub