计算机二级考试VFP中确定驱动器类型的方法
求学快递网计算机等级考试专题重点推荐：2016年计算机等级考试报考时间 、计算机等级考试证书领取时间、2016年计算机等级考试报考指南、2016年计算机等级考试大纲、2016年计算机等级考试政策、2016年计算机等级考试报考条件、2016年计算机等级考试科目等最新新闻资讯。
掌握计算机等级考试的经验是很重要的，本文通过对VFP中确定驱动器类型的方法内容的整理，帮助大家更好的学习。
一、通过调用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
二、使用FOXTOLLS.FLL中的DriveType函数
表单的ACTIVATE方法：
Set Libriry To FoxTools.FLL
Dime I, DrvName, DrvType
For I = 0 To 25
DrvName = Chr(I + 65) + ":"
DrvType = DriveType(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
在认真学习VFP中确定驱动器类型的方法之后，相信大家对计算机等级考试的内容有了进一步的把握，祝大家考试成功。
关注求学快递网计算机等级考试专题，帮你了解最新的计算机等级考试资讯和2016年计算机等级考试成绩查询，让你轻松备考计算机等级考试！
求学快递网计算机等级考试专题的小编们根据网民搜索喜爱，第一时间公布2016年计算机一级考试报名网址、2016年计算机二级考试模拟试题、2016年计算机三级考试历年真题、2016年计算机四级考试复习资料供广大求学爱好者学习使用，欢迎继续关注求学快递网计算机等级考试专题，并给我们提供宝贵的意见！
