数据量比较大，想计算每一个value2中的词在每一个value1句子中出现的总次数。运算的时候，点了以后就不动，程序死掉了。
然后我就在每个循环中增加了一个messagebox，想看看是否计算正确，这样每次就蹦出计算结果来，发现是对的。问题出在那条contains语句，我该怎么调试。
谢谢！
For i = 0 To Tables("WordAndTimes").Rows.Count-1 ‘3万条数据’
sum(i) = 0
For j = 0 To Tables("JournalInformation").Rows.Count-1 “3万条数据”
If Value1(j).Contains(Value2(i)) Then
sum(i) = sum(i) +1
End If
Next
Tables("WordAndTimes").Rows(i)("文件频率") = sum(i)/Tables("JournalInformation").Rows.Count
messagebox.show( Tables("WordAndTimes").Rows(i)("文件频率") )
Next
加好友 
发短信
Post By：2019/2/11 13:08:00 [只看该作者]
