主题:读的错还是写的错?
我有代码如下:
type kw
i as integer
k as integer
c as integer
end type
dim kv as kw
k[1]=0:k[2]=1:k[3]=2:k[4]=3:k[5]=4
c[1]=0:c[2]=0:c[3]=1:c[4]=2:c[5]=3
open "kw" as #10 len=len[kv]
for i=1 to 5
kv.i=i
kv.k=k[i]
kv.c=c[i]
print kv.i,kv.k,kv.c
put #10 ,i,kw
next i
close
open "kw" as #10 len=len[kv]
for i=1 to 5
get #10, i,kw
print kv.i,kv.k,kv.c
next i
close
end
第一次输出为:
1 0 0
2 1 0
3 2 1
4 3 2
5 4 3
预期第二次输出与第一次同,但结果是:
5 4 3
5 4 3
5 4 3
5 4 3
5 4 3
写错了? 读错了? 还是定义错了?还是别的什么错?查了几天,没查出来,故求教.如何谢,从君意!
type kw
i as integer
k as integer
c as integer
end type
dim kv as kw
k[1]=0:k[2]=1:k[3]=2:k[4]=3:k[5]=4
c[1]=0:c[2]=0:c[3]=1:c[4]=2:c[5]=3
open "kw" as #10 len=len[kv]
for i=1 to 5
kv.i=i
kv.k=k[i]
kv.c=c[i]
print kv.i,kv.k,kv.c
put #10 ,i,kw
next i
close
open "kw" as #10 len=len[kv]
for i=1 to 5
get #10, i,kw
print kv.i,kv.k,kv.c
next i
close
end
第一次输出为:
1 0 0
2 1 0
3 2 1
4 3 2
5 4 3
预期第二次输出与第一次同,但结果是:
5 4 3
5 4 3
5 4 3
5 4 3
5 4 3
写错了? 读错了? 还是定义错了?还是别的什么错?查了几天,没查出来,故求教.如何谢,从君意!