主题：集合求助

Dim Names As New List(Of String)
Dim i As Integer
Names.Add( "电视机")
Names.Add("电冰箱")
Names.Add("洗衣机")
For i = 0 To names.count-1 '记住，因为您是从0开始的，还可以这样：For i = 1 To names.count 
      OutPut.Show(Names(i))
Next