代码如下：
Private Type sa
a1 As String * 6
a2 As String * 6
End Type
Private a As sa, b As sa
Dim c As String * 6
Private Sub Form_Load()
Show
Open "C:\Users\Desktop\text\data1.dat" For Random As #1 Len = Len(a)
a.a1 = "一二三四五六"
a.a2 = "asdfgh"
Put #1, 1, a
Get #1, 1, b
Close #1
Print b.a1
Print b.a2
End Sub
代码运行以后，窗体上显示的是"一二三"和"asdfgh"。我已经定义a.a1是一个长度为6的定长字符串了，为什么写入随机文件只能写进去三个汉字呢？而英文字母就可以写进去完整的6个？在网上搜了好久都搞不懂，求大佬指点！

字符存储空间的问题，一个英文字符只需要1个字节，一个汉字需要2个字节，6个字节自然只能存3个汉字

一个汉字顶两个英文