Jump to content

sapinhox

Members
  • Content count

    2
  • Joined

  • Last visited

Community Reputation

0 Comum

About sapinhox

  1. sapinhox

    [Resolvido] Erro em aplicação em VBA

    Pessoal ja consegui resolver, precisava apenas mudar o inicio da Declação para funcionar precisa ficar assim Declare PtrSafe Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long Declare PtrSafe Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long Obrigado Pode fechar o topico
  2. sapinhox

    [Resolvido] Erro em aplicação em VBA

    Tenho um programa desenvolvido em VBA para Autocad, o mesmo tem duas linhas de programação que estão dando o seguinte erro: as linhas que estão dando erro são as seguintes Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long Acredito que tenha alguma coisa a ver do fato do sistema instalado ser 64 bits, algum tem alguma solução para o caso. Desde já agradeço
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.