Office中国论坛/Access中国论坛

标题: 紧急求助！求相同字符串或相同数值的问题？？？ [打印本页]

作者: forever_cdd 时间: 2007-5-7 10:10
标题: 紧急求助！求相同字符串或相同数值的问题？？？
各位大哥以及前辈高手们，小弟遇到一个难题，因为小弟之前没有接触过access，以及这方面的编程。

在实际运用中，小弟遇到这个一个数据量十分巨大的数据库，

如下图：

2F4DC6B57E8A46855F9D8C00
7C0BEB7BF4C3A88436D94800
D1546FA8EB2B6D169C7F0800
84EEE7F299F0795A98B6EC00
22366A28C65B1FD33B1B0800
C575C3AA852F2A3C038AF400
E597D338B66F21A2C71AD000
5F1BCF3298680202B9D4F000
2F4DC6B57E8A46855F9D8C00

每一个行是一个由24个字节组成的12位的16进制数，也可以把他们当成字符串，现在要求从这个数据库中找到两个相同的16进制数（或字符串），并且记录出他们所在的位置。如上表，答案就是第1个和9个完全相同。

因为该数据库大约有50万个这样的16进制数，有且只有2个是相同的，请问各位大侠，应该如何实现?

小弟是没有学过access的，请详细地说，能有代码更好，小弟在此先谢谢了！

还有冒昧傻傻地问一句，如果编出程序，在amd3200＋，1G的内存环境运行上述数据库，大约多少时间能得出结果？？？

敬礼！

[此贴子已经被作者于2007-5-7 2:14:43编辑过]

作者: z2117s 时间: 2007-5-8 00:56
既然是完全相同,那两个字符串相等就好了啊;将字符串存储在表(str_table)中,字段可为id(序号,唯一索引),str(字符串的值),然后用循环比较:

dim i,j as integer
for i=1 to dcount("str","str_table")-1
for j=i+1 to dcount("str","str_table")
      if dlookup("id","str_table","id=' & i & "'")=dlookup("id","str_table","id=' & j & "'") then
         msgbox("第" & i & "行记录和第" & j & "记录相同！")
      end if
next
next

[em04][em07]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)