说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何判断某一个Drive是否为光碟机?

HTML文档下载 WORD文档下载 PDF文档下载
VB如何判断某一个Drive是否为光碟机?


须 调 用 Windows API 的 GetDriveType ,首先 声 明 以 下 API :
Declare Function GetDriveType Lib "kernel32" Alias _
"GetDriveTypeA" (ByVal nDrive As String) As Long
然后将以上的声明放在.bas的一般模块中,如果放在 Form 之中, 须在Declare之前再加上 Private。 然后使用以下叙述调用 :
ret = GetDriveType ( "D:\")
若传回值 ret 等于 5 , 即表示 "D:\" 为光碟机 , 至于其他传回值的意义则是 :
2:软碟, 3:硬碟, 4:Server端磁碟, 6:RAMDISK。



备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘