Private Shared Function WritePrivateProfileString(ByVal lpSectionName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Long Result = Line.Substring(Identifier.Length + 1) Paste the code below to add a Public Function.Ĭode here Public Function GetSettingItem(ByVal File As String, ByVal Identifier As String) As Stringĭim S As New IO.StreamReader(File) : Dim Result As String = ''.It imports some system services that could read and update the file. Import the following by pasting the code at the top of the text editor.Ĭode here Imports.How to Save and Retrieve Image From Database Using VB.NET With Source Code | Read and Update Text File in VB.Net – Form Design