[VB6 ] 取值問題

[albertbug ()]

Sub LogData(ScaledData As Variant)

中間省略

sData1 = 0
For iScans = LBound(ScaledData, 2) To UBound(ScaledData, 2)
  For iChannel = LBound(ScaledData) To UBound(ScaledData)
sData = Format(ScaledData(iChannel, iScans), ".###0")

 '''ScaledData值是-0.00XX  -0.0XXX
                  -0.00XX  -0.0XXX
                  -0.00XX  -0.0XXX
我下面做加總
但是加出來變成全部的值相加
我想要  第一列相加  第二列相加
該怎麼寫

拜託各位大大幫忙了　
問了笨問題　拍謝

sData1 = sData + sData1
mean11 = sData1 / 1000
Print #FileNumber, vbTab & sData;
Next iChannel
Print #FileNumber,
Next iScans
Print #FileNumber, sData1;

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.61.120
※ 編輯: albertbug       來自: 140.112.61.120       (03/23 20:15)