7,763
社区成员
发帖
与我相关
我的任务
分享关于Byte数据类型的问题
Dim k as Byte
……
Open "c:\a.tmp" For Binary As #1
Put #1,,k
当k等于1的时候写入文件的确占用1个字节的空间，但为什么当k=0的时候就要占用2个字节空间呢？
……
Open "c:\a.tmp" For Binary As #1
Put #1,,k
当k等于1的时候写入文件的确占用1个字节的空间，但为什么当k=0的时候就要占用2个字节空间呢？
...全文
请发表友善的回复…
发表回复
kingofmatch 2004-07-28
- 打赏
- 举报
原因查明，确实是自己程序的问题，都是自己粗心所致……
前2位朋友每人25分吧
前2位朋友每人25分吧
熊孩子开学喽 2004-07-28
- 打赏
- 举报
不知楼主对于写的文件大小要求是否非常严格呢？
否则的话，就算它多一个字节也无妨啦。只要能读出正确的数字就可以啦。
否则的话，就算它多一个字节也无妨啦。只要能读出正确的数字就可以啦。
kingofmatch 2004-07-28
- 打赏
- 举报
怎么我的VB6.0就是这样啊?难道RPWT,郁闷了
Geo_Cra 2004-07-28
- 打赏
- 举报
不可能，绝对只占用一个
落伍者 2004-07-28
- 打赏
- 举报
不可能吧！
northwolves 2004-07-28
- 打赏
- 举报
不会吧。
Private Sub Command1_Click()
Dim k As Byte
k = 0
Open "c:\a.tmp" For Binary As #1
Put #1, , k
MsgBox LOF(1)
Close #1
End Sub
Private Sub Command1_Click()
Dim k As Byte
k = 0
Open "c:\a.tmp" For Binary As #1
Put #1, , k
MsgBox LOF(1)
Close #1
End Sub
rainstormmaster 2004-07-28
- 打赏
- 举报
不会吧，byte型数据就是占用1个字节的空间，应该是你的程序有问题
