| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 573 人关注过本帖
标题:Put每次写入文件时为什么会多出12字节?急呀
只看楼主 加入收藏
cjjwjf
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2015-4-22
结帖率:0
收藏
已结贴  问题点数:20 回复次数:2 
Put每次写入文件时为什么会多出12字节?急呀
Put每次写入文件时为什么会多出12字节?急呀

用WINSOCK.GetData接收到的数据,在写入文件时每次都会多写入12字节,求大侠解答!
2015-04-22 01:39
renxiaoyao36
Rank: 9Rank: 9Rank: 9
来 自:七宝中学
等 级:贵宾
威 望:31
帖 子:347
专家分:1077
注 册:2014-9-18
收藏
得分:20 
是“ ”字符(空格)么?
是的话加上一个代码:
(你的存储变量)=Replace((你的存储变量)," ","")

编程蛋疼的不是枯燥,而是辛辛苦苦编完几百行的代码,运行,“Runtime Error “xxx””。
2015-04-22 22:26
yunjie167
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2015-6-23
收藏
得分:0 
您的问题我今天也遇到了,在百度上查到解决方法.
Option Explicit
Dim ReceiveBuffer() As Byte
Private Sub Command1_Click()
    ReDim ReceiveBuffer(2) As Byte
    ReceiveBuffer(0) = &H31
    ReceiveBuffer(1) = &H32
    ReceiveBuffer(2) = &H33
    Call SaveFile
End Sub

Private Sub SaveFile()
    Dim FileId As Integer     
    Dim StrFileName As String
    Dim i As Integer
    Dim str$
   
    str = Format$(Now, "yyyy-mm-dd_hh_mm_ss")
   
    StrFileName = App.path + "\" + str + ".bin"
    FileId = FreeFile()  
   
    Open StrFileName For Binary As #FileId         
   
    Put #FileId, , ReceiveBuffer()
   
    Close #FileId
End Sub
2015-06-23 19:56
快速回复:Put每次写入文件时为什么会多出12字节?急呀
数据加载中...
 
   



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

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