TestStr = DemoIni.GetIniKey("系统", "可执行程序文件名")
List1.AddItem "系统 - 可执行程序文件名: " & TestStr
TestStr = DemoIni.GetIniKey("用户自定义", "用户数据")
List1.AddItem "用户自定义 - 用户数据: " & TestStr
End Sub
'保存用户自定义数据到.ini文件中
Private Sub CmdSave_Click()
DemoIni.WriteIniKey "用户自定义", "用户数据", Text1.Text
'显示保存到.ini文件中的数据
Call CmdRead_Click
End Sub
'清除用户自定义段和段中数据
Private Sub CmdDelete_Click()
DemoIni.DelIniKey "用户自定义", "用户数据"
DemoIni.DelIniSec "用户自定义"
'显示保存到.ini文件中的数据
Call CmdRead_Click
End Sub
进入讨论组讨论。
（出处：清风下载学院）
上一篇:VB学习:MX记录获取组件
下一篇:Visual Basic数据库操作方法小结
|
精品推荐