Re: [VB6 ] 取值問題

看板Visual_Basic作者 (侰侰侁)時間19年前 (2006/03/26 07:21), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
將數變成字符串 Cstr函數 取字符串固定位 變成數﹐用Val函數 然後都是個位數加起來就是 ※ 引述《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: 81.156.102.162
文章代碼(AID): #149T1lmD (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #149T1lmD (Visual_Basic)