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数据库操作方法小结
|