vb讀寫iniword版(編輯修改稿)
2024-09-14 16:27 本頁面
【文章內(nèi)容簡介】 bPublic Function MyReadINI(ByVal strSectionName As String, ByVal strTopic As String, ByVal strINIfilename As String) As StringDim lngRet As LongDim buff As Stringbuff = String(255, 0)lngRet = GetPrivateProfileString(strSectionName, strTopic, , buff, 256, strINIfilename)If lngRet 0 Then MyReadINI = buffEnd IfExit FunctionEnd Function ： Option Explicit 39。 代碼 39。這里定義了一個classIniFile類 39。 39。程序編寫：中國青島許家國 39。 39。E－Mail: goj2000@ 39。HomePage: 39。 39。Private member that holds a reference to 39。the path of our ini file Private strINI As String 39。Windows API Declar
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1