依法行政的要求和意义:有没有一种方法?

来源:百度文库 编辑:高考问答 时间:2024/04/28 17:12:38
在VB里有没有一种方法可以判断出一个数组,或是一个记录集里是否有相同的字段呢?
谢谢了

用双重循环好了
dim Arry("1","2","3","4","5")
for i =1 to 可能的最大值
for j=i+1 to 可能的最大值
result=StrComp(Arry(i) ,Arry(j) )
if result=0 then
msgbox “有相同的值 ”
end if
next
next

strComp是一个判断两个字符串是否相等的函数
他的返回值就是-1 0 1 三个
如果第一个比第二个小就是-1
如果第一个比第二个大就是1
如果两个相同就是0

ms没有..^_^
只能自己写函数来判断