在四块区域(2*2) 上要计算分别区域的大气压

假设大气压的公式=(高程h-参数i)*(实测大气压p)

已知高程h为
12 15
13 14

实测4个区域大气压p一天中有四个数据,分别是6点,12点,18点,24点
四个区域实测大气压可表示为
(1,3,5,7) (1,4,6,8)
(2,5,4,7) (2,5,6,8)

但是参数i是随时间变的,在6点和12点的时候是1,在18点和24点的时候是2

最后得到的是分别是4个区域6点,12点,18点,24点的修正大气压

请问这个程序该怎么编写?

谢谢了!!!!

(1,3,5,7)保存在什么中？

12 15
13 14

高程保存在什么中？

都保存在TXT文件中
比如高程.txt中
文件中的数据是
12 15
13 14

实测大气压.txt中

文件的数据是

6点 1 1 2 2
12点 3 4 5 5
18点 5 6 4 6
24点 7 8 7 8

数组循环是什么？

呵呵 我表达的不清楚 其实就是循环

for j=上界 to 下界

不同的j时 参数i(j)可能不变化 而大气压p(j)在变化 怎么来在程序中实现？

而且由于还有高程数组的变化，这个程序该怎么编？

一般人用的是for j=下界 to 上界

另外，来到VB论坛，请你最好不要只盯着一张帖子，这才是对论坛的支持。

一般人用的是for j=下界 to 上界

呵呵对 是我的失误 不过重点不在这里

我想知道 参数都在变化 应该怎么来实现这个程序？

另 multiple1902斑竹 你说的是

不过我现在最重要的是问清楚我的问题不是么？

[QUOTE]在四块区域(2*2) 上要计算分别区域的大气压
假设大气压的公式=(高程h-参数i)*(实测大气压p)
已知高程h为
12 15
13 14
实测4个区域大气压p一天中有四个数据,分别是6点,12点,18点,24点
四个区域实测大气压可表示为
(1,3,5,7) (1,4,6,8)
(2,5,4,7) (2,5,6,8)
但是参数i是随时间变的,在6点和12点的时候是1,在18点和24点的时候是2
最后得到的是分别是4个区域6点,12点,18点,24点的修正大气压
请问这个程序该怎么编写?[/QUOTE]

设高程放在array a(5) as integer中，实测大气压放在array b(5,5)中，修正后放回b中
[CODE]
dim i as integer,j as integer
for i:=1 to 4 '对应4个地区
for j:=1 to 4 '对应4个时间
b(i,j)=(a(i)-iif(i<3,1,2)) * b(i,j) '大气压的公式=(高程h-参数i)*(实测大气压p)
next 'j
next 'i[/CODE]

b(i,j)=(a(i)-iif(i<3,1,2)) * b(i,j) '大气压的公式=(高程h-参数i)*(实测大气压p)
这行特别说明一下
iif(statement,truepart,falsepart)
用法是iif(一个条件即一个布尔表达式，如果条件为真则函数为多少，如果条件为假则函数为多少）
这行中 如果i=1或2即条件为真，则iif的值为1；如果i=3或4或5或6即条件为假 则IIf的值为2

谢谢斑竹同学~