用vb修改ini文件的代码怎么写啊

nty6188 2007-12-15 08:59:42
用vb修改ini文件的代码怎么写啊
在vb上text1和text2输入内容修改ini文件的内容
如:ini文件格式是这样的 Link=http://xxx.com:81 我在text1输入www.csdn.com 在text2输入80 点击按纽
修改结果是这样子的 Link=www.csdn.com:80 应该怎么写啊 
...全文
238 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
VisualBUG 2007-12-19
  • 打赏
  • 举报
回复
看我博客模块代码.
http://hi.baidu.com/%D2%E4%C4%EA%BB%AA/blog/item/378eb6bf3c09840918d81f06.html
dccrazyboy 2007-12-15
  • 打赏
  • 举报
回复
Dim Str As String
Open "123.ini" For Append As #1
Str = "Link=" & text1.Text & ":" & text2.Text
Print #1, Str
Close #1
这样会追加到最一行
浪客 2007-12-15
  • 打赏
  • 举报
回复


Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Public Function SetIniValue(FileName As String, ByVal clsName As String, ByVal key As String, Optional ByVal Value As String = "")
SetIniValue = WritePrivateProfileString(clsName, key, Value, FileName)
End Function

使用:
dim FileName as string
dim str as string
FileName = "link.ini"
str=text1.text & ":" & text2.text
SetIniValue FileName, "Inof", "Link", str


7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧