2016年计算机二级考试VF驱动器判断技巧
求学快递网计算机等级考试专题重点推荐:2016年计算机等级考试报考时间 、计算机等级考试证书领取时间、2016年计算机等级考试报考指南、2016年计算机等级考试大纲、2016年计算机等级考试政策、2016年计算机等级考试报考条件、2016年计算机等级考试科目等最新新闻资讯。
一、通过调用GetDriveType API函数来完成
下面的代码就可以检索出系统中所有的驱动器:
表单的ACTIVATE方法:
Declare Long GetDriveType In "kernel32" String nDrive
Dime I, DrvName, DrvType
For I = 0 To 25
DrvName = Chr(I + 65) + ":"
DrvType = GetDriveType(DrvName)
Do Case
Case DrvType = 2
Print "驱动器" + DrvName + "是一个软盘驱动器"
Case DrvType = 3
Print "驱动器" + DrvName + "是一个硬盘驱动器"
Case DrvType = 4
Print "驱动器" + DrvName + "是一个可移去式驱动器或网络驱动器"
Case DrvType = 5
Print "驱动器" + DrvName + "是一个CD-ROM驱动器"
Case DRIVE_RAMDISK
Print "驱动器" + DrvName + "是一个RAM 盘"
Case Else
EndcCase
Next I
关注求学快递网计算机等级考试专题,帮你了解最新的计算机等级考试资讯和2016年计算机等级考试成绩查询,让你轻松备考计算机等级考试!
求学快递网计算机等级考试专题的小编们根据网民搜索喜爱,第一时间公布2016年计算机一级考试报名网址、2016年计算机二级考试模拟试题、2016年计算机三级考试历年真题、2016年计算机四级考试复习资料供广大求学爱好者学习使用,欢迎继续关注求学快递网计算机等级考试专题,并给我们提供宝贵的意见!