vb getdrivetype的值

来源：百度知道 编辑：UC知道 时间：2024/09/24 17:19:23
getdrivetype返回的值是1-5吧，但1代表什么，2代表什么。。。
麻烦指教。
我用1楼的方法:ret=getdrivetype（"a:\"）结果也是2,U盘和A盘都是 soft disk 吗?啊,,,,我的U盘不见了,要不可以一试了.请2楼回答.

上次我就是为了试下面这段代码 借了同学的闪存 测试通过
这段代码的作用是隐藏闪存中所有文件的

0至5
Case 0 'uknown disk
Case 1 'no exist disk
Case 2 'soft disk
Case 3 'hard disk
Case 4 'network mapping disk
Case 5 'cd

U盘是2

给个示例代码你

Private Declare Function GetLogicalDriveStrings Lib "kernel32" Alias "GetLogicalDriveStringsA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long

Private Sub Form_Click()
Dim StrDrive As String '获取盘符
Dim DriveID As String '盘符(如:A:\)
StrDrive = String$(120, Chr$(0)) '初始化盘符串
Call GetLo