. Um arquivo INI é um arquivo de texto estruturado, que armazena as configurações para os recursos do programa configurável pelo usuário. Por exemplo, um arquivo INI é um mecanismo para lembrar que um usuário quer texto a ser exibido em um idioma diferente do Inglês . O original Windows Application Programmer Interface ( API) funções que facilitam a leitura e gravação de arquivos INI suportados. A Microsoft obsoleto arquivos INI em favor do registro do Windows e mais recentes formatos de arquivos baseados em XML . As funções da API do Windows, embora não directamente suportado, permanecem disponíveis para Visual Basic 9 programadores que suportam o software legado. Instruções
1

Adicione uma instrução Declare para o topo do seu módulo para permitir chamar a função de API do Windows para a escrita ini : .

Private Declare Ansi WritePrivateProfileString Função _

Lib " kernel32.dll " Alias ​​" WritePrivateProfileStringA " _

(ByVal lpApplicationName As String , _ ByVal

lpKeyName As String , ByVal lpString As String , _ ByVal

lpFileName as String ) As Integer
2

Adicione uma função Declare na parte superior do seu módulo para permitir chamar a função de API do Windows para leitura valor ini: .

Private Declare Function Ansi GetPrivateProfileString _

Lib " kernel32.dll " Alias ​​" GetPrivateProfileStringA " _

(ByVal lpApplicationName As String , _ ByVal

lpKeyName As String , ByVal lpDefault As String , _

ByVal lpReturnedString As String , _ ByVal

nSize As Integer , ByVal lpFileName As String) _

As Integer
3

Criar ou editar um arquivo INI , chamando a função WritePrivateProfileString , fornecendo valores para a chave , a aplicação eo nome do arquivo. Por convenção, arquivos INI usar a extensão ini. . O parâmetro de aplicação corresponde a uma seção no arquivo ini. Se qualquer dos parâmetros especificados não existem , eles serão criadas . Isso inclui o próprio arquivo , desde que o diretório especificado já existe. A função WritePrivateProfile Cordas vai over- escrever anteriormente valores existentes.

WritePrivateProfileString ( " seção ", " tecla ", " valor ", " . /Data.ini " )
4

liberar o cache quando tiver concluído modificações de arquivo INI , reduzindo o risco de perda de dados em caso de um desligamento anormal do programa. Passe os valores zero para a função WritePrivateProfileString para todos os parâmetros, exceto o nome do arquivo INI . Isso instrui o Windows para escrever as alterações no disco :

WritePrivateProfileString (0, 0 , 0, " /data.ini . " )
5

Alocar um buffer suficiente para manter o máximo tamanho de um valor armazenado no arquivo INI . Um buffer de 256 caracteres é geralmente suficiente . Criar um inteiro para receber o tamanho real do valor que foi recuperado do arquivo INI. Use Dim para declarar as variáveis ​​e a função de espaço para alocar memória para a string:

Dim strValue As String Dim

intLen As Integer

strValue = Espaço (256)

6

recuperar valores armazenados no arquivo INI , chamando GetPrivateProfileString usando as variáveis ​​juntamente com a chave , seção e valores de nome de arquivo usadas ao escrever o arquivo INI . Especifique o tamanho do buffer de que você está fornecendo e um valor a ser devolvido quando o valor designado não for encontrado :

intLen = GetPrivateProfileString ( "chave", " seção ", " não encontrado", strValue , 256 , "filename" )