iniファイルの読み込みを行うには？ (ID:120175)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 こんな感じ Dim W As String * 1024 Dim ret As Long Dim strOut As String ret = GetPrivateProfileString(section, Key, "", W, 1024, strFName) If ret = 0 Then strOut = strDefault Else strOut = Left(W, InStr(W, Chr(0)) - 1) If strOut = "" Then strOut = strDefault End If End If fncGetIni = strOut