比较两个文件

2016-02-19 18:53 9 1 收藏

有一种朋友不在生活里，却在生命力；有一种陪伴不在身边，却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗？话不多说下面就和大家分享比较两个文件吧。

【 tulaoshi.com - 编程语言】

FunctionCompFile(F1asstring,F2asstring)asboolean
　　Dimissameasboolean
　　OpenF1ForBinaryAs#1
　　OpenF2ForBinaryAs#2
　　
　　issame=True
　　IfLOF(1)LOF(2)Then
　　issame=False
　　Else
　　whole&=LOF(1)10000'numberofwhole10,000bytechunks
　　part&=LOF(1)Mod10000'remainingbytesatendoffile
　　buffer1$=String$(10000,0)
　　buffer2$=String$(10000,0)
　　start&=1
　　Forx&=1Towhole&'thisfor-nextloopwillget10,000
　　Get#1,start&,buffer1$'bytechunksatatime.
　　Get#2,start&,buffer2$
　　Ifbuffer1$buffer2$Then
　　issame=False
　　ExitFor
　　EndIf
　　start&=start& 10000
　　Next
　　buffer1$=String$(part&,0)
　　buffer2$=String$(part&,0)
　　Get#1,start&,buffer1$'gettheremainingbytesattheend
　　Get#2,start&,buffer2$'gettheremainingbytesattheend
　　Ifbuffer1$buffer2$Then
　　issame=False
　　EndIf
　　Close
　　CompFile=issame
　　EndFunction->

来源:http://www.tulaoshi.com/n/20160219/1619336.html

上一篇： You will love me forever
下一篇： VisualBasic实现在程序中开启网页

看过《比较两个文件》的人还看了以下文章更多>>

coreldraw两个小技巧

标签： CorelDRAW 电脑应用

使用Tab键选择对象 Tab键选择对象的操作步骤如下 1. 选择挑选工具。 2. 按下键盘上的“Tab”键即可选择某个对象。 3. 不停地按下键盘上的“Tab”键，则系统会自动依照创建对象的顺序，从最后绘制的对象开始，依次选择对象。 ...

怎么同时打开两个excel

标签： excel

怎么同时打开两个excel 在工作中，我们经常遇到需要从一个excel表格，查看另一个excel表格中的内容，虽然并排的方法能够解决些问题，但没有从根本上改变整个窗口过于狭小，查看起来不方便的问题，那么到底能不能像word那样同时打开多个excel呢。答案是肯定的，且看图老师小编教你如何打开多个excel 怎么同时打开两个excel 假设...

野葛菜的两个食谱

标签：营养价值

野葛菜是一种野菜，它还叫江剪刀草、野油菜，它营养价值比较高，有很多的人喜欢吃野葛菜，但是大家不知道怎么吃，今天图老师小编为大家准备了野葛菜鱼汤的食谱，如果您比较感兴趣，就和图老师小编一起去看一看吧~ 野葛菜它生长在山野间，喜水沟边生长，嫩叶可食用，一年中都可采摘。本品为十字花科植物焊菜和无瓣焊...

两个MySql服务的应用

标签：编程语言网络编程

两个MySql服务的应用一、如何在同一系统中安装两个MySql服务。安装一个5.0版本的，再安装一个5.1版本的就可以了。我用的是mysql-5.0.45-win32.zip和mysql-5.1.28-rc-win32。其中注意的是，把后安装的配置端口号码改成不是3306，不然会和前一版本的端口号冲突。二、应用：今天备份数据库的时候，用5.1版本，导出出过程，5.1服务自动...

心理健康：两个伟人

标签：心理健康

曾任美国通用汽车公司总经理的斯隆被西方管理学界誉为“现代化组织的天才”。杜拉克则是美国著名的管理学者。 1944年，斯隆聘请杜拉克担任通用的管理政策顾问。二人见面时，斯隆说了这样一番话：“我不知道我要你研究些什么，要你写什么，也不知道该得出什么样的结果。这些都该是你的任务。我惟一的要求，只是希望你把你认为正确的东西写下...

查看更多精彩>>