怎么利用vb里的循环算法实现对数组中重复数据查找的判别?

怎么利用vb里的循环算法实现对数组中重复数据查找的判别?怎么判断重复的数据的哪一个是待查数据?

2个回答

    Dim a()         As Long
    Dim i           As Long
    Dim j           As Long
    ...
    For i = 0 To UBound(a) - 1
        For j = i + 1 To UBound(a)
            If a(i) = a(j) Then
                MsgBox "a(" & i & ") 和 a(" & j & ") 重复。"
                Exit Sub
            End If
        Next
    Next
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
其他相关推荐
查找数组中重复数据索引
有这样一个数组rnString[] arr = 10,20,45,20,10,50,50;rn然后查找出重复数据的索引号rn结果 0,1,3,4,5,6rnrn
查找表中的重复数据
  select *  from person  where id in (    select id       from person_main      group by id     having (count(*) > 1) )  
查找list中重复数据
需求: 查找一个List集合中所有重复的数据,重复的数据可能不止一堆,比如:aa, bb, aa, bb, cc , dd, aa这样的数据。如果有重复数据,则给这些重复数据加上编号,上述数据改为:aa1, bb1, aa2, bb2, cc, dd.算法如下:public static void same(List<String> list) { String [
算法实现收藏-数组中检索查找
static final int[] array = {0, 1,8,20,34,50}; static int size = array.length; static int search = 1; [code=&quot;java&quot;] //1.二分法查找某个数字所在的位置,前提是数组必须是有序的 static void binarySearchMax() { ...
delphi中怎么删除数组中的重复数据
我现在已经定义了一个字符串数组n,n[122],但是里面有重复的元素,我想把重复的数据剔除掉,写了一个程序,执行没有错误,但是就是删除不了。达人们帮我看下啊rnrn//剔除数组n中重复的数据,并赋值给数组brnrn b[1]:=n[1];rn m:=0;rn for i:=1 to 122 dorn beginrn for j:=1 to m dorn beginrn if n[i]=b[j] thenrn beginrn break;rn endrn elsern beginrn continue;rn end;rn end;rn m:=m+1;rn b[m]:=n[i];rn end;rnrn
查找重复数据
ID 产品 价格rn----------- ---------- --------rn433334 产品1 170rn435420 产品1 170rn435431 产品1 154rn435439 产品2 180rn435440 产品2 180rn435454 产品2 180rn找出同一产品价格最高的记录,要求得到的结果为rnID 产品 价格rn----------- ---------- --------rn433334 产品1 170rn435439 产品2 180rn怎么写语句
查找重复数据?
现有一表temp其中一列如下:rn namernA-H1-047rnA-H1-002rnA-H1-003rnA-H1-047rnA-H1-047rnA-H1-047rnrn想查找出name列中有重复的数据A-H1-047并删除该行,得到如下:rnrn namernA-H1-047rnA-H1-002rnA-H1-003
怎样在VB里对access数据库进行查找
要做一个企业产品(劳务)的统计数据库,怎样在用VB实现对数据库的“任意”查找。还有一个问题,怎样把一张数据库表的信息用excel显示并保存下来?
去除数组中重复数据
public class DeleteDuplicate {     public static void main(String[] args) {         int[] array = new int[] { 1, 3, 4, 5, 6, 4, 3, 2, 3, 4, 5 };// 要求将重复的数字去掉         for (int i = 0; i &amp;lt; array.lengt...
删除数组中重复数据
$a=array(5000)rn [0] => array(2) rn ["one"] => string(2) "zhang"rn ["two"] => string(13) "lili"rn rn [1] => array(2) rn ["one"] => string(2) "zhang"rn ["two"] => string(13) "lili"rn rn [2] => array(2) rn ["one"] => string(2) "wang"rn ["two"] => string(13) "lili"rn rn [3] => array(2) rn ["one"] => string(2) "zhang"rn ["two"] => string(13) "lulu"rn rn [4] => array(2) rn ["one"] => string(2) "zhang"rn ["two"] => string(13) "lili"rn rn .......rnrnrn数组如上,想去掉重复的如rn [1] => array(2) rn ["one"] => string(2) "zhang"rn ["two"] => string(13) "lili"rn rn [4] => array(2) rn ["one"] => string(2) "zhang"rn ["two"] => string(13) "lili"rn 和[0]重复都是要删除的,rn有什么高效的方法,因为数据较多,需要考虑效率!
vb串口通讯中,怎么判别非法字符?
在串口通信中,在字符方式下我要捕获(0xAA),显示为“*”,可是不知道怎么判断,因为(0xAA)不能显示为字符。请各位大哥不吝赐教。
查找、删除表中多余的重复数据
假设有一张tabA的表,以其中的name字段判断是否重复 一. 查找表中多余的重复记录,重复记录根据表中的单个字段来判断 select * from tabA where namein (select name from tabA group by name having count (name) &gt; 1) 二. 删除表中多余重复的记录,只保留其中一条...
循环里的数组 求 ?????????????
由于要计算 想在 显示数据库的记录的时候 给一个数组赋值rn代码 dim a()rn do while not rs.eofrn i=0rn a(i)=rs("sss")*0.15rn rs.movnextrn i=i+1rn loop
查找算法实现
1. 折半查找 使用折半查找的前提是元素已经排序。 代码实现:先定义接口Search package org.util.search; /** * 查找 * @author Weibing Long * @since 2018.04.13 */ public interface Search { boolean search(int[] x, int key); } 然后...
语句判别循环顺序
for(var i=0;i        {if(x.childNodes[i].nodeType==1)  ;  count++;         }                                       ||         if(x.childNodes[i].nodeType==1)    {}  count++;               
怎么去掉arraylist里的重复数据
假设我有个List 里面放的是javabean 数据如下:rnrn物理 95rn数学 100rn物理 100rnrn以为物理 100和前面的物理95重复了 我想把他给去掉,请问大家有什么方法去吗?
recordset的filter快还是对数组进行循环查找快
我有大概6000个数据(在数组中arrData),目的是查到它们其中多少在数据库中(ID存在),多少不存在rnrn什么样的方法最快rn1.一个一个查,循环arrData,然后select .... 得到结果rnrn2.把数据库中所有记录放在一个recordset中,然后循环arrData,用rs.filter="ID"=arrData(i)这样的方法rnrn3.把数据库中所有记录放在一个数组中(arrTemplate),然后循环arrData,用循环arrTemplate的方式找到是否存在rnrn以上方法哪个更快些呢?或者还有什么更好的办法rnrn环境: 会有多人同时对Template表格进行访问查找,请考虑其中。rnrn谢谢
vb.net中怎么对Byte数组进行查找?
在VB里面可以用InStrB(), 请问vb.net中有什么函数或方法可以替代呢? 低效的算法不考虑.谢谢!
Java删除数组中重复数据
代码如下: beans = (String[]) ArrayUtils.addAll(intSendStr, strs); // listview数据源,合并两个数组 List list = new ArrayList(); for (int i = 0; i < beans.length; i++) { if (!list.contains(beans[i])) { list.add(b
JS移除数组中重复数据
&amp;lt;script&amp;gt; var arrs = [&quot;11&quot;,&quot;22&quot;,&quot;33&quot;,&quot;44&quot;,&quot;55&quot;,&quot;666&quot;]; function unq(arrs ) { var result = [], hash = {}; for (var i = 0, elem; (elem = arr[i]) != null; i++) { if (!hash[elem])
JavaScript去除数组中重复数据
最近有个需求是要将页面的数组内容去重复,下面是一哥们帮我写的代码,十分简洁,共享之: function xx(arg){ if(Object.prototype.toString.call(arg) != &quot;[object Array]&quot;)return []; var obj={},arr=[],i=0,len=arg.length,yy={}; ...
找出数组(datatable)中的重复数据
            bool isrepeat;        //判断该数据是否有重复。            string er=&quot;对照列中下列数据有重复:&quot;;            for (int i = 0; i &amp;lt;dt1.Rows.Count-1; i++)   //验证是否有重复数据            {                isrepeat = false;...
循环删除MongoDB重复数据
导入数据时,不小心重复导入了,并且还勾选了"Insert with new _id" n现在数据库中有几千组这样重复的数据,怎么样才能删除呢 n只有_id是不一样的,其他都一样nn```nn"_id" : ObjectId("58c0e5c13c4a1aae0828d7a9"),n"date_time" : "2017-03-09 13:18:28",n"object_code" : "D1_6wgglB",n"status" : 0,n"value" : 25.235034942626953nnn"_id" : ObjectId("58f9b18bfa94a03098123da7"),n"date_time" : "2017-03-09 13:18:28",n"object_code" : "D1_6wgglB",n"status" : 0,n"value" : 25.235034942626953nn```
关于oracle查找重复数据
最近做报表的优化,在一个数据量上千万条的表里面,给客户号去重复。因为这个表里面重要的东西比较多,手贱删掉了估计我就要滚蛋了,所以建了临时表,取出需要日期的数据放进去 CREATE TABLE 临时表 AS (select 字段1,字段2,count(*) from 表名 group by 字段1,字段2 having count(*) > 1) 但是我删除数据的话肯定不是把所有的数据都删掉,
查找重复数据软件
能够查询各种文件类型的重复文件,并且删除其中重复文件<br>比较不错的软件
查找重复数据的复杂示例
如何查找重复数据的复杂示例2(07)
关于查找重复数据的问题。
请问如何能够查询出一个表中,某特定字段重复的行的行数?rn例如对于一个联合主键,如何查处第一主键重复的纪录的行数?
mysql 查找重复数据
select * from user_member where uid in (select uid from user_member group by uid having count(uid) &amp;gt; 1)  
查找重复数据sql
多个字段: select * from froute_cp_table awhere (a.arrivecity,a.departcity,a.flightrouteline) in   (select arrivecity,departcity,flightrouteline from froute_cp_table group by arrivecity,departcity,flightr...
查找,删除重复数据
群:127881306 1 创建表A create table a( a int ); 2 创建表B create table b( b int ); --select * into b from a ; insert into b(b) select a from a where a.a = 2; 3 插入数据 ,多插入几条重复的数据 insert into a val...
查找重复数据并删除?
select Title from News group by Title having count(1)>1rn我用这个语句查找可以,接下来如何删除呢?
怎么用Excel数据透视表查找重复数据?
在处理数据时,总共有两千多条数据,其中有重复数据,怎么用数据透视表的功能查找出重复数据?
oracle查找重复数据和删除重复数据sql
查找重复数据sql(思路就是根据需要判断重复数据的字段分组,根据having大于2的就是重复的) --查找某表重复数据 select BUSS_TYPE_ID, BUSS_TYPE, TRADE_VARIETY_ID, TRADE_VARIETY, TRADE_SUBVARIETY_ID, T...
二维数组中的查找(数组 查找)
题目描述:在一个二维数组中,每一行都按照从左到右递增的顺序排序,每一列都按照从上到下递增的顺序排序。请完成一个函数,输入这样的一个二维数组和一个整数,判断数组中是否含有该整数。 时间限制:1秒 空间限制:32768K 热度指数:469309
vb中的数组怎么用
dim a() as longrnrna(0)=8rn不行啊,给个例子rn我的数组长度是根据动态得到的rndim a(num) as long rn也不行啊
vb中MSHFlexGrid1删除重复数据
vb中MSHFlexGrid1删除重复数据第一列里面有很多重复的内容。我想过滤掉重复的内容。把不重复的内容写到MSHFlexGrid2中的第一列里面。
VB利用GIF_LZW算法实现网络图片传输.rar
VB利用GIF_LZW算法实现网络图片传输,技术特点   一、使用TCP议传输数据。理由:稳定性好。   二、使用字节数据流进行传输,理由:    A:VB的String存在自动Unicode转换问题,影响速度;    B:可以直接发送8位字节数据,不需要使用Base64编码,从而减少了编码时间。   三、使用GIF-LZW压缩算法压缩图像。理由:    A:行程编码、Huffman压缩算法压缩率太低;    B:JPEG压缩算法需要太多位运算,且运算量大(有专门MMX优化算法),不利于VB实现;    C:GIF-LZW压缩算法压缩率较好,且我已想出VB语法下高效GIF-LZW压缩/解压算法。   四、使用“有序抖动”算法进行 色彩量化。理由:“有序抖动”处理的结果具有一定规律性,有助于LZW类算法压缩。
请问怎么在VB里初始化数组
就像JavaScript里的 var array1 = [ "a1" , "a2" , "a3" ];rnrn谢谢
数组---在数组中查找元素
Description 输入10个整数到一个长度为10的整型数组中,然后输入一个整数,查看该整数是否在刚才得到的数组中,如果在,输出“found”,如果不在,输出“not found” Input 11 个整数 Output 如果第11个整数在前10个整数中,则输出found 如果第11个整数不在前10个整数中,则
怎样把mc的数组利用循环加到accordion组件里?
accordion的createSegment()或createChild()方法需要mc的实例名(字符串)作为第2个参数, 但如果mc是数组成员则应该怎么办?rn例如要初始化一个accordion mainAcc, 层数和child的内容都是在runtime确定的, 以下代码可否? 有什么问题? ???处应该怎么写?rnfor (var i:Number = 0; i < MAX; ++i)rnrn //假设MyClass是MySymbol所对应的as类rn mcs[i] = MyClass.create(i);//假设create()是静态工厂方法, 返回的是MyClass的一个实例rn mainAcc.createSegment("MySymbol", ???, i.toString());rn mainAcc.getChildAt(i).init(); //init()是MyClass的一个方法, 作用是初始化mc rnrnrn望各位高手指点, 谢谢.
相关热词 c#入门推荐书 c# 解码海康数据流 c# xml的遍历循环 c# 取 查看源码没有的 c#解决高并发 委托 c#日期转化为字符串 c# 显示问号 c# 字典对象池 c#5.0 安装程序 c# 分页算法

相似问题

1
VB语言中数组的嵌套怎么使用谓词的限定对数组重复性进行限制
1
怎么限定谓词实现数组的防止内容的重复以及同一个数组的重复读取?
2
连vb6.0中怎么实现不同区间的数组下标构成的数组的相加操作,怎么把两个不同长度的数组相加
2
怎么通过vb中函数的方式调整一个数组的下标,同时实现数组下标数据的排列?
2
请问vb语言的互斥技术能不能用在控件里定义的数组中,实现数组多笔数据的同时操作?
2
怎么在vb6.0中实现同屏不同界面,互相切换对方的变量?怎么实现变量组合的切换?
1
vb同一个界面上实现多个相同类的界面控件的列举,列举出来以后循环调用属性怎么实现
1
vb怎么使用循环的列举的方式实现窗体上排列的某种类型控件的列举?
1
怎么在vb6.0中实现对窗体界面的控件的for循环变量怎么处理的思路怎么写?
1
如何在vb6.0中实现循环语句的循环变量作为窗体控件的控件名来调用?
1
请问怎么才能在vb6.0中实现使用循环语句的做法调用循环变量作为控件名?
1
请问如何在vb6.0编程语言中实现循环的循环变量作为多个控件类型并循环调用?
1
怎么利用vb6.0的循环的做法实现判断然后调用怎么联合起来使用?
1
求教请问用vb6.0编程开发怎么实现循环里面的循环变量类型转换作为控件调用的类型?
1
请问怎么在vb6.0中文版编程中实现使用循环语句的循环的变量实现控件属性值的调用方式?
1
使用vb6.0中文编程开发怎么实现将窗体的控件作为循环重复的调用条件变量呢?
1
请问怎么利用vb6.0编程的语言的for循环功能语句实现对控件属性的判断和赋值调用?
1
如何利用vb6.0编程软件的循环语法功能实现循环语句对控件是否调用属性的判断?
1
求教下vb6.0怎么实现循环语句对循环的窗体控件的分类调用和属性?
1
vb6.0怎么实现运用循环的方式对窗体上的不同类型的控件实现分别的调用?