Red de conocimiento de abogados - Derecho de sociedades - ¿Cómo guardar los datos en el cuadro de texto en VB?

¿Cómo guardar los datos en el cuadro de texto en VB?

Este método se puede implementar utilizando la función API para leer y escribir el archivo de configuración. El ejemplo de referencia es el siguiente: Primero declare la API: Función de declaración privada WritePrivateProfileString Lib "kernel32" Alias ​​​​"WritePrivateProfileStringA. " (ByVal lpApplicationName como cadena, ByVal lpKeyName como cualquiera, ByVal lpString como cualquiera, ByVal lpFileName como cadena) siempre y cuando

Función de declaración privada GetPrivateProfileString Lib "kernel32" Alias ​​​​"GetPrivateProfileStringA" (ByVal lpApplicationName como cadena , ByVal lpKeyName como cualquiera, ByVal lpDefault como cadena, ByVal lpReturnedString como cadena, ByVal nSize como larga, ByVal lpFileName como cadena) como larga Guarde el contenido de Text1 en E:\a.ini:

Private Sub Command1_Click()

WritePrivateProfileString "UserName ", "User", Text1.Text, "E:\a.ini"

End Sub Lee el contenido de E:\a.ini into text2 Private Sub Command2_Click()

Dim inistring As String

inistring = Space$(254)

GetPrivateProfileString "Nombre de usuario", "Usuario", "" , inistring, 255, "E:\a. ini"

Text2.Text = CStr(inistring)

End Sub