拜托大家帮助我看看这是什么意思？？帮我加上注释成吗？？？多谢了。。急用。。谢谢
Public Function GetFromINI(Appname As String, KeyName As String, FileName As String) As String
Dim RetStr As String
RetStr = String(255, Chr(0))
GetFromINI = Left(RetStr, GetPrivateProfileString(Appname, ByVal KeyName, "", RetStr, Len(RetStr), FileName))
End Function

Private Sub Form_Load()
inipath$ = App.Path + "\Config.ini"
Text1.Text = GetFromINI("set", "服务器IP地址", inipath)
Text2.Text = GetFromINI("set", "数据库登陆名", inipath)
Text3.Text = GetFromINI("set", "数据库登陆密码", inipath)
End Sub

通过一个函数来读取配置文件，读取三个值，然后赋值给text1.text、text2.text、text3.text

[此贴子已经被作者于2005-5-28 23:46:40编辑过]

谢谢这位朋友。。