先分别打开两个txt文件,读取文件内容再进行对比,如同弹出Yes对话框,否则弹出NO对话框。例如:
OPEN "a.txt" FOR INPUT AS #1
DO WHILE NOT EOF(1)
LINE INPUT #1, nextline
A = A + vbNewLine + A '用来保存a.txt中的内容
LOOP
CLOSE #1
OPEN "b.txt" FOR INPUT AS #1
DO WHILE NOT EOF(1)
LINE INPUT #1, nextline
B = B + vbNewLine + B ’用来保存b.txt中的内容
LOOP
CLOSE #1
if A=B then '大致意思如此,该如何比较,你自己写
MsgBox ("Yes")
else
MsgBox ("No")
end if
[
本帖最后由 zhengang1026 于 2013-4-26 08:52 编辑 ]