function securecompare(stra as string,strb as string,length as integer)as boolean