| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1468 人关注过本帖
标题:新手学vb VB 中 如何判断两个集合交集的元素个数
只看楼主 加入收藏
塞北江南
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2010-10-30
结帖率:100%
收藏
 问题点数:0 回复次数:0 
新手学vb VB 中 如何判断两个集合交集的元素个数
Dim a(0 To 6) As Byte: Dim b(0 To 4) As Byte: Dim c(0 To 3) As Byte
Private Sub Command1_Click()
a(0) = 9: a(1) = 1: a(2) = 4: a(3) = 5: a(4) = 7: a(5) = 10: a(6) = 13
arrayb(i) = Text1.Text     '给数组a赋值,文本框1中 输入的数据,定义为数组b
If c(m) = a(n) Then
n = 6 - 3                  '如果数组a=数组c,那么数组a中只有3个元素
If c(m) = b(i) Then
i = 4 - 1                  '如果数组c=数组b,那么数组b中只有3个元素
If a(n) = b(i) Then
Text2.Text = "可以执行"    '如果数组a=数组b,那么文本框二 显示 “可以执行”
End If
End If
End If
End Sub

我的本意是想在 文本框1中,随机输入一组数字,比如1,3,5,7,9,然后想知道这个数组b和程序内置数组a 的交集中元素个数是否为3,如果等于,文本框二 就 显示 可以执行。

我不知道,vb中如何判断交集元素的个数,我是初学者,请各位大侠指点。
搜索更多相关主题的帖子: 元素 交集 判断 
2010-11-01 14:52
快速回复:新手学vb VB 中 如何判断两个集合交集的元素个数
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034594 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved