如何获取正在运行的表单的驱动器号

Question

我需要获取运行表单的驱动器号。 我之所以需要这个，是因为我将复制一个文本文件（从表格所在的可移动驱动器）到计算机。它甚至可能吗？如果是，有人可以帮我提供代码吗？

注意 我正在使用Visual Basic 6

Answer 1

这应该返回您正在运行exe的驱动器号。

左$（App.Path，InStr（App.Path，“：”））

Answer 2

Dim disk_letter As String
disk_letter = Left(CurDir$(), 1)

就是这样。