VB.NET磁盘格式化小心使用

VB.NET编程语言是一个功能强大的，支持类的所有特性的编程语言，其应用范围广泛，除了能对数据库，Excel表，文件等进行操作，还能对移动设备进行相应的操作。在这里大家就可以了解到VB.NET磁盘格式化的具体实现方法，让大家了解这一语言的功能的强大。#t#

磁盘是数据的常用载体，我们的软件可能会提供用户将数据备份到磁盘上的功能。为避免磁盘上有带有病毒的文件，最安全的办法就是提醒用户将磁盘格式化。

Visual Basic可以通过调用API函数格式化一个磁盘，无论是磁盘还是硬盘。

打开一个新的项目(project1) ，如果你没有更改过缺省模式，那么Visual Basic会自动添加一个form1文件，在form1上添加一个命令控件，将下面的代码拷入。

 
 
 
  
  
  
Option Explicit   
  
  
  
Private Declare Function SHFormatDrive Lib"shell32"_   
  
  
  
( ByVal Hend AS Long,_   
  
  
  
ByVal Drive AS Long,_   
  
  
  
ByVal FormatID AS Long,_   
  
  
  
ByVal Options AS Long) as Long   
  
  
  
Private Sub FormatDisk(intDrive as integer,blnQuickFormat as Boolean)   
  
  
  
dim lngReturn As Long；   
  
  
  
if (blnQuickFormat) then   
  
  
  
lngReturn= SHFormatDrive(0,intDrive,0&,1&)   
  
  
  
else   
  
  
  
lngReturn= SHFormatDrive(0,intDrive,0&,0&)   
  
  
  
end if   
  
  
  
end Sub   
  
  
  
Private Sub Command1_Click()   
  
  
  
call FormatDisk(0,True)   
  
  
  
End Sub  
 
 

运行此程序，就可以实现VB.NET磁盘格式化这一功能。

这里有必要提醒读者注意的是，FormatDisk函数的***个变量很重要，他的值是0,1,2时代表格式化的分别是：A、B、C盘。

注意：读者使用此VB.NET磁盘格式化的程序作练习的时候千万不要用硬盘作实验，笔者不为可能发生的错误和损失负责。

分享题目：VB.NET磁盘格式化小心使用
文章路径：http://www.shufengxianlan.com/qtweb/news41/416841.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联