标题:读写文件的问题
取消只看楼主
chen3bing
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:507
专家分:104
注 册:2008-11-12
结帖率:91.22%
已结贴  问题点数:10 回复次数:0 
读写文件的问题
我项目中需要读写数据,就写了一段读写随机文件的代码,如下:
FileName = App.Path & "\calibration.txt"
Open FileName For Random As #1

Put #1, 13, 24.1
Put #1, 14, 100.1

Get #1, 1, ShiftF
Get #1, 2, RatioF
Get #1, 3, Speed
Get #1, 4, ZeroDot
Get #1, 5, FirstDot
Get #1, 6, SecondDot
Get #1, 7, LittleCoefficient
Get #1, 8, LargeCoefficient
Get #1, 9, KNNKggkgf
Get #1, 10, PullPush
Get #1, 11, Sensor
Get #1, 12, StrengthData
Get #1, 13, intXMax
Get #1, 14, intYMax
Close #1
原来

Public intXMax As Long   'X轴显示坐标的最大值,由于时间可以突破65535秒,所以将变量设为长整型
Public intYMax As Long   'Y轴显示坐标的最大值
intXMin,intYMax是长整型数据,没问题。
后来把这两个变量改为单精度型数据,就出了问题。
我还在程序里强制性的把这两个数据写为
Put #1, 13, 24.1
Put #1, 14, 100.1
24.1和100.1.
结果读出来就变了


请高手看看,哪里有问题?谢谢!
搜索更多相关主题的帖子: 写文件 数据 Put Get 最大值 
2019-04-02 15:29



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-493925-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.172315 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved