属性表三个字段
|
Shape_Area |
Final_analysis |
Schedule |
|
S1 |
9 |
|
|
S2 |
6 |
|
|
S3 |
8 |
|
|
S4 |
7 |
|
|
… |
… |
|
根据Final 值的大小按照顺序统计Area即面积值
当S1+S3的值大于一个给定值如1000的话则赋值给S1、S3 的Schedule字段值均为NO.1
然后继续按照这个原则统计下面的数据
当S2+S4的值大于一个给定值如1200的话则赋值给S2、S4 的Schedule字段值均为NO.2
后面的按照这个原则继续计算，有可能S1+S2+S3+。。。+S7才等于1000
如何用VB 写这个程序啊
