vb.net中的循环语句

1、For Each…Next 循环语句，控制流程介绍示例代码如下：

2、Private Sub btnForEachLoop_Click(衡痕贤伎sender As Object, e As EventArgs) Handles btnForEachLoop.Click 'Clear the list ClearList() 'List each folder at the root of your C drive For Each strFolder As String In My.Computer.FileSystem.GetDirectories("C:\") 'Add the item to the list lstData.Items.Add(strFolder) NextEnd Sub