WritePrivateProfileString 是一個函數，它用于向INI文件中寫入或修改一個鍵值對。

它的用法如下： WritePrivateProfileString(section, key, value, filename)

參數說明：

• section: 字符串類型，表示INI文件中的一個節（section）的名稱。
• key: 字符串類型，表示要寫入或修改的鍵（key）的名稱。
• value: 字符串類型，表示要寫入或修改的鍵值（value）的值。
• filename: 字符串類型，表示INI文件的路徑和文件名。

函數的功能是將指定的鍵值對寫入或修改INI文件中指定節下的指定鍵名處。如果指定的節或鍵名不存在，則函數會創建它們。

示例：

Imports System.Runtime.InteropServices

Public Class Form1
    <DllImport("kernel32")>
    Private Shared Function WritePrivateProfileString(section As String, key As String, value As String, filePath As String) As Integer
    End Function

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim section As String = "MySection"
        Dim key As String = "MyKey"
        Dim value As String = "MyValue"
        Dim filePath As String = "C:\path\to\my.ini"

        WritePrivateProfileString(section, key, value, filePath)
    End Sub
End Class

上述示例代碼中，當按鈕被點擊時，會將 “MySection” 節下的 “MyKey” 鍵的值設置為 “MyValue”，并寫入到 “C:\path\to\my.ini” 文件中。