遍历驱动器 --最大的中文电脑技术教程基地

My FAQ,最新最全的IT技术教程

最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 登陆资料

遍历驱动器

作者:未知时间:2004-10-21 12:12 出处:互联网责编:MyFAQ

摘要：暂无

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