Como entrar em valor de seqüência de registro por RegSetValueEx? VB6

[samkraju]

como posso entrar em valor de seqüência de registro por "RegSetValueEx" função em VB6 Acima API requerem seqüência ANSI como entrada. Como posso converter string unicode para uma string ANSI em VB6 Por favor me dê o código completo em VB6.

 

[Pinczakko]

esta função é uma função Win32API e sua declaração está disponível na API VB espectador. Aqui está:

 Função Pública Declare Lib RegSetValueEx "Advapi32.dll" Alias ​​"RegSetValueExA" (ByVal hKey Como lpValueName, Long ByVal As String, ByVal Reservado Como dwType, Long ByVal As Long, lpData As Any, ByVal cbData As Long ) As Long

Nota:

• se você declarar o parâmetro lpData como String, você deve passá-lo por valor.
• A função acima é a função do tipo ANSI, então você não precisa de conversão Unicode.

com a declaração acima, no início do módulo, basta chamar a função, conforme necessário a partir de dentro do módulo. [Color = blue] Tenha sempre em sua mente que o VB6 API espectador é o seu companheiro quando se trata de Win32API diretamente em VB6 [/color] Goodluck: D