10
20
3
初露锋芒
使用道具 举报
29
503
8
中流砥柱
'读取配置 '类库路径 Dim Path As String = GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) '打开配置文件流 Dim fsOptionFile As New StreamReader(Path & "\YH_Option.dat") '建立序列化对象 Dim xsOption As New XmlSerializer(GetType(YH_Options)) '将配置序列化并保存到配置文件中 Options = CType(xsOption.Deserialize(fsOptionFile), YH_Options) '关闭配置文件流 fsOptionFile.Close()
'类库路径 Dim Path As String = GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) '打开配置文件流 Dim fsOptionFile As New StreamWriter(Path & "\YH_Option.dat") '建立序列化对象 Dim xsOption As New XmlSerializer(GetType(YH_Options)) '将配置序列化并保存到配置文件中 xsOption.Serialize(fsOptionFile, Options) '关闭配置文件流 fsOptionFile.Close()
请先注册会员后在进行下载
已注册会员,请先登录后下载
本版积分规则 发表回复 回帖后跳转到最后一页
微信公众平台
扫描访问手机版
点击图片下载手机App
|关于我们|小黑屋|乐筑天下 繁体中文
GMT+8, 2025-3-13 13:15 , Processed in 0.519527 second(s), 77 queries .
© 2020-2025 乐筑天下
在线时间:10:00-17:00
暂无
扫一扫,关注我们
帮助中心
关于我们
下载APP客户端