vb.net读写ini文件问题

Question

有6个控件
textbox1 textbox2 textbox3 textbox4
button1 button2

点button1 是用来存储的
把textbox1 -4的值 比如说分别是账号、密码、大区、路径
存储到ini文件里

button2是用来读取的
将ini文件里的值存储到 textbox1-4

新手求请教

Answer 1

以下是我的办法:OK!

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer

Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Integer

写:
WritePrivateProfileString("存储", "账号", textbox1, Application.StartupPath & "\song.ini")

读:
dim s as string
s = string(255," ")
GetPrivateProfileString("存储", "账号", s, s.Length, Application.StartupPath + "\song.ini")
textbox1 =s