Uso de GetPrivateProfileSection vb

En este momento, el formato del valor de retorno ret es:

El primer valor Chr(0), el segundo valor Chr(0), el segundo valor... este valor chr(0), el n valores chr (0), Chr(0) en Chr(0)

c # está vacío y la salida de Text2 se truncará.

Establezca Texto2 en varias líneas, reemplace ret con texto2, texto = reemplazar (izquierda (ret, instr (ret, chr(0)&; derechos humanos (0)), derechos humanos (0), vbCrLf )

Puedes mostrar todos los valores línea por línea en Text2

Es decir

Subcomando privado 1_Click()

Dim ret As. String * 32767

Tamaño x

X = GetPrivateProfileSection ("Complete la IP del host y Apple" que desea vincular, retirar, 255, aplicación. Ruta y ruta. " \\config.ini ")

MsgBox x

Texto 2. Texto = Texto 2. Texto = Reemplazar(Left(ret,InStr(ret,Chr(0)amp; derechos humanos (0)), derechos humanos (0), vbCrLf)

Conector final