Len=记录长度
中记录长度是每条记录的长度。在随机文件中,每条记录的长度应该是相等的。
你的错误有两点,第一点,是文件名。
Open "16.txt" For Random As #8 Len = 2
没有说明16.txt文件的路径。如果有正确的路径将会运行出错无“记录长度不符”什么的
因为,你没有说明路径,将在vb默认路径(就是你安装vb的的地方)新建一个16.txt文件,因为新建文件是空的,所以读到的bb值为空。
第二点,len=2是不错,但你的bb变量却是一个变长字符串(变长字符串一般不用于随机文件的记录中),其最少配置len应该为4(参见各变类类型占用内存字节数)。但你有打开文件用了len=2,所以会出错,说纪录长度不符。
改正方法:
1、声明变量时
Dim BB As String * 2
2、打开文件时
Open App.Path & "\16.txt" For Random As #8 Len = 2
或者其他正确的路径
上述代码我已经验证了。