作者lls23 (侰侰侁)
看板Visual_Basic
标题Re: [VB6 ] 取值问题
时间Sun Mar 26 07:23:26 2006
将数变成字符串
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