知识大全 VB.NET编写测试硬盘速度的程序

Posted 2022-07-17 硬盘

篇首语：我们要像海绵一样吸收有用的知识。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 VB.NET编写测试硬盘速度的程序相关的知识，希望对你有一定的参考价值。

VB.NET编写测试硬盘速度的程序 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　前日在用SiSofare Sandra 测试硬盘性能时突发其想用自己熟悉的VB NET测试行不行呢？具体怎么做呢？　　　　我们最感兴趣的是硬盘在最大负荷下持续的读取和写入速度为了能够比较准确的测出平均速度我决定采用先写入一个 GB的文件再读取出来的办法考虑到不要让更多的任务花在循环上我首先建立起一个足够大的缓冲区然后往磁盘写入这个缓冲的内容从而使硬盘达到最大的负荷考虑到Windows的读取机制硬盘测试不太准确此程序的读取部分只能在第一次运行时使用运行次数越多测试也不准确而写入测试多次运行以后依然能够保持准确性现在就开始动手　　　　在VB NET中创建了一个控制台工程TestHarddisk 然后在Sub Main中写入下列程序　　　　Sub Main()　　　　Dim I As Int 　　Dim f As New FileStream( E:\\BigFile big FileMode Create)　　Dim fw As New BinaryWriter(f)　　Dim fr As New BinaryReader(f)　　Dim Size As Int = * * File size = GB　　Dim bufSize As Int = * * Buffer Size = MB　　Dim jLast As Int = bufSize 　　Dim j As Int 　　Dim Bytes(bufSize) As Byte　　Dim StartWrite As Date = Date Now　　　　Console WriteLine( Write Start at StartWrite)　　Console WriteLine( Creating )　　　　For I = To Size Step bufSize GB　　fw Write(Bytes)　　Next　　　　Dim EndWrite As Date = Date Now　　Dim TimePassed As TimeSpan = EndWrite Subtract(StartWrite)　　Console WriteLine( Write End at EndWrite)　　Console WriteLine( Time passed: TimePassed)　　Console WriteLine( Speed: / TimePassed TotalSeconds)　　fw Flush()　　Dim StartRead As Date = Date Now　　Console WriteLine( Read Start at StartRead)　　Console WriteLine( Reading )　　　　For I = To Size Step bufSize　　Bytes = fr ReadBytes(bufSize)　　Next　　　　Dim EndRead As Date = Date Now　　TimePassed = EndRead Subtract(StartRead)　　　　Console WriteLine( Read End at EndRead)　　Console WriteLine( Time passed: TimePassed)　　Console WriteLine( Read speed: / TimePassed TotalSeconds)　　Console ReadLine()　　fw Close()　　　　End Sub　　　　现在测试　　　　 硬件配置 　　Athlon +（running at G）　　EPOX RDA + nForce 主板　　 DDR (running at MHz)　　ATA Seagate GB MB　　　　 软件配置 　　Windows Server Standard Edition　　　　全套最新的WHQL驱动程序　　　　Visual Studio 编译选择Realse模式打开所有优化选项　　　　第一次运行测试得写入速度 MB/s 第二次测得 MB/s 第三次 MB/s与Sisofare测试得的结果 MB/s相差不大达到了理想的效果然而读取测试就变态了第一次 MB/s 与Sissofare测试多了 MB/s左右第二次达到了 MB/s 第三次 MB/s 这和Windows的磁盘缓冲机制有关看来作用还是蛮大的当然建议读取测试在重起电脑以后进行 cha138/Article/program/net/201311/13666