請人翻譯一下這2段VB函式！急急急

1樓：玫瑰為你盛開

首先宣告一下，我是學文科的，不太知道你要求什麼，但是根據程式本身呢，可以做如下解釋，便於你碰到實際的資料時，可以代入看一下：

private function slq3(byref z as variant, byval n as integer, byval m as integer, byval u as single, byval v as single) as single

rem 這段**中，變數取名太簡單了，看不太懂哦，涉及到溫度，會不會跟發熱有關哦？解釋一下程式

rem 大體上，代入的值為，z是乙個二維陣列，n和m是求slq3時，對z的兩個維度做下標限制的，會求出ip和iq，z的一維的下標從ip到ip+nn-1，二維的下標從iq到iq+nn-1，v是縱座標值，u是橫座標值

rem 第一部分是將u取整後減1，賦值給ip，如果ip值不在[0,n-2]區間內，則分別賦值為0或n-2，iq也是類似

rem 第二部分是計算三個b值的（當nn是3時），h是中間量，值從陣列z()中讀取，讀出來一次，就和yaxis那一串的值相乘（同時用到v值），相乘nn次，最後附加給當前的b，使b1、b2、b3跟縱座標值yaxis產生關聯

rem 第三部分是求slq3（這個不知是什麼），但求法是這樣的，b值已經出來了，所以，又用中間量h，去和xaxis那一串的值相乘，相乘nn次，最後附加給中間量w，使b1、b2、b3跟橫座標值xaxis產生關聯

rem 最後求出來的slq3，其實是b1、b2、b3的和

private function tmpfir(byval tmp0 as integer, byval tmp1 as integer, byval tmp2 as integer) as single

rem 輸入三個溫度值的，返回乙個標準溫度值，當第乙個溫度和第二個溫度均不是0時，按第乙個式子處理，否則，將第三個溫度值當成標準溫度值返回

private function thickness(byval x as integer, byval y as integer, byval tmp as integer) as single

rem 求窯壁厚度thickness

rem 代入的值是，x是橫座標（取值0到40，否則均以0或40處理），y是縱座標（這個函式中求厚度時一直沒用到縱座標），tmp是輸入窯壁外側溫度

rem 函式中的變數，intx是內壁標準溫度，outtx外壁標準溫度，res是窯壁外側溫度和外壁標準溫度之差，而且res取值僅限0-260之間

rem 如果有異常，厚度做0處理

2樓：匿名使用者

很難看出來喲.讓我再仔細看看.請把其它的也發到我郵箱來[email protected]