logo

遍历驱动器

作者:孟宪会 阅读:6544 发表于:2004-10-21 17:06:35
Private Sub ShowDrives() Dim d() As String d = System.IO.Directory.GetLogicalDrives() Dim en As System.Collections.IEnumerator en = d.GetEnumerator While en.MoveNext Console.WriteLine(CStr(en.Current)) End While End Sub