网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

如何实现VB.NET磁盘格式化

小编给大家分享一下如何实现VB.NET磁盘格式化,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!

目前成都创新互联已为成百上千的企业提供了网站建设、域名、网络空间、绵阳服务器托管、企业网站设计、甘谷网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。

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

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磁盘格式化”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


网站题目:如何实现VB.NET磁盘格式化
网站URL:http://bjjierui.cn/article/gjghgg.html

其他资讯