如何取枚量的信息
假如一模modString.bas中存在自定型
Public Enum Type
CN_Code=0
CN_Name
CN_Dept
end Enum

Select Case Type
Case CN_Code
strInfo= "代 "
Case CN_Name
strInfo= "名 "
Case CN_Dept
strInfo= "部 "
end select

如何枚量取出如下并保存文本:
0 CN_Code 代
1 CN_Name 名
2 CN_Dept 部

如果很多有什么快速的方法呢?!

[解决办法]
不知道用随机文件行不行，
type appdata
data0 as long
data1 as string
data2 as date
end type
chdir app.path
open "appdata.dat " for random as # (num) len=len(appdata)
get#(num),记录号,appdata
close#(num)