VB语言如何实现组合后多条匹配条件过滤输出问题

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/29 08:47:15

VB语言如何实现组合后多条匹配条件过滤输出问题
用vb语言同时满足下列2个条件就输出源代码
(1)假定从1-15这15个数字中任选6个全组合输出(每行输出6个不相同数字,并且从小到大排列)
(2)将第一问得到数据过滤,当每一行6个数字含有下列9条4码中的2至5条(最少含有2条最多5条)就输出,结果共有62组就正确
01,02,03,06
01,02,03,08
01,02,03,09
02,05,06,08
02,06,07,08
05,06,07,09
06,08,09,10
08,09,10,11
06,07,08,13

Sub countnum()
NumLen = 15
For i = 1 To NumLen
    For j = i + 1 To NumLen
        For k = j + 1 To NumLen
            For l = k + 1 To NumLen
                For m = l + 1 To NumLen
                    For n = m + 1 To NumLen
                         UserForm1.Text1.Text = UserForm1.Text1.Text & Chr(10) & Chr(13) & i & "," & j & "," & k & "," & l & "," & m & "," & n
                    Next
                Next
            Next
        Next
    Next
Next
End Sub第一问可以这样,第二问我还在想.简单说就是循环套用,然后输出循环变量

再问：最重要第二问，其实第一问我也会做
再答：第二问。程序字太多了。我传个txt给你
再问：可不可以传个源代码文件
再答：
再问：那些图形窗体如何设置
再答：窗体变量名
UserForm1
放置一个文本框（不是标签，是可以输入那种)，变量名
Text2
再做一个按钮好了，在其代码里面写
Call countnum
再问：点解不行你把完整代码加窗体一起传过来吗
再答：我都说的这么清楚了。。。快考试啦，抓紧复习呀

VB语言从8选6全组合过滤行 C语言实现从8选6全组合输出 Mathematica实现随机组合表输出的问题（二）? vb语言随机数问题vb语言中如何编程实现从7,8 ,54,69,12,32这组数字中随机产生一个数字如何设计用vb语言编写一个程序,输入三个数,输出其中的最大数用VB语言实现的算法如何知道其花了多长时间 VB语言实现10个数和 MATLAB 如何实现循环输出. VB语言从11选6全组合相连 VB语言从8选6全组合有条件 vb 字母组合问题text1里有6个字母,ABCDEFtext2里有4个字母MNSY一个命令按钮要实现的是：首先把tex 设计c语言程序输出m个A,n个B可以组合成多少个不同排列的问题?