vb6 - 如何找到操作系统驱动器

Question

如何使用VB6检测安装操作系统的驱动器？

Private Sub GetSystemDrive()
    ' What to write here?
End Sub

Answer 1

一个简单的方法是使用环境变量 %SystemDrive%。您可以使用 Environ 访问环境变量，例如环境(“SystemDrive”)。

如果您使用的是 Win9x 操作系统，您可以使用 %WinDir% 并只提取驱动器部分，例如左(Environ(“WinDir”)，2)。