假如一個模塊modString.bas中存在自定義類型
Public Enum Type
CN_Code=0
CN_Name
CN_Dept
end EnumSelect 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 部門如果很多有什么快速的方法呢?謝謝!
Public Enum Type
CN_Code=0
CN_Name
CN_Dept
end EnumSelect 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 部門如果很多有什么快速的方法呢?謝謝!
解决方案 »
- 我用了WindowsMediaPlayer控件,如何编写程序截屏??难
- VB问题:字符串内容出现次数的统计方法
- VB能否访问VC写的DLL中导出的变量
- 请教:如何用一个按钮让MDI中现有的子窗体轮流成为活动窗体,即是说要判断MDI窗体里有几个已经加载的窗体,而且哪个窗体是当前窗体?
- TreeView为什么这么不灵活.
- 坐标系旋转的问题
- 请教:我看到一个小程序可以通过点击单选form,可以自动显示和隐藏textbox是怎样实现的呢?
- vb中如何预览Autocad的文件,或者有没有这样的控件,急
- 是不是用byte数组接收string只能获得相应的ascII码值?
- 怎样以最快的速度生成10000万个随机的不同16位数?
- 窗体的问题
- 如何查询到2个账户之间的关联呢?任意两个账户之间的关联。算法问题,达人请进
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)