发布于 2009-05-06 12:51:52
0楼
下面的程序可以帮你实现;刚写的,没有经过调试,自己试试去吧;
其中MYDB接口为你存储数据的DB块,如DB100,程序中认为你的数据存在字节DBB0到DBB49这50个字节中,如果你愿意,可以把需要比较的字节个数也做成输入参数的形式,可以方便更改需要比较的字节个数;
FUNCTION FC1000:VOID
VAR_IPUT
MYDB:BLOCK_DB;
END_VAR;
VAR_OUTPUT
EQ_FIND:BOOL;
END_VAR;
VAR_TEMP
i:INT;
j:INT;
END_VAR;
BEGIN
FOR i:=0 TO 48 BY 1 DO
FOR j:=i+1 TO 49 BY 1 DO
IF MYDB.DBB[i]=MYDB.DBB[j] THEN
EQ_FIND:=TURE;
END_IF;
END_FOR;
END_FOR;
END_FUNCTION;
莫等闲,白了少年头,空悲切!