Office中国论坛/Access中国论坛

标题: 对于网友提出:文本数值VB解决方案! [打印本页]

作者: stanleypan 时间: 2006-2-28 04:10
标题: 对于网友提出:文本数值VB解决方案!
在下面的一组数据中。请编程实现如下功能：
5 7 16 17 21 22 23 27 36
3 6 10 11 24 25 28 30 32
1 12 13 15 19 20 26 34 35
2 4 8 9 14 18 29 31 33

2 9 10 13 14 18 23 28 34
3 4 7 8 15 26 30 33 36
1 11 12 17 24 25 27 29 32
5 6 16 19 20 21 22 31 35

2 5 7 10 14 21 22 27 29
4 13 16 20 24 26 28 35 36
1 3 6 11 18 19 25 31 33
8 9 12 15 17 23 30 32 34

7 10 13 15 24 28 29 30 36
1 3 6 9 17 20 21 31 33
2 4 5 8 22 23 27 32 35
11 12 14 16 18 19 25 26 34

7 8 12 17 18 24 27 29 32
2 5 6 15 22 23 28 30 33
1 3 4 11 14 16 20 25 35
9 10 13 19 21 26 31 34 36

2 10 12 13 18 20 23 26 31
6 7 11 17 28 32 34 35 36
1 3 4 8 9 15 25 30 33
5 14 16 19 21 22 24 27 29
功能一：请找出含有数字“3”的行，并列出来如下：
3 6 10 11 24 25 28 30 32
3 4 7 8 15 26 30 33 36
1 3 6 11 18 19 25 31 33
1 3 6 9 17 20 21 31 33
1 3 4 11 14 16 20 25 35
1 3 4 8 9 15 25 30 33
功能二：再从上面的数据前面三行中查找出次数大于等于2次的数。
前面三行次数大于等于2次的数如下：
3 6 11 25 30 33

要实现以上二个功能请问用VB编程的源代码是什么？

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)