Saludos a toda la comunidad, en esta oportunidad quisiera pedir su ayuda o sugerencias, sobre un problema que me aqueja.
Tengo un libreria dll que contiene una funcion llamada GetSerialNumber, esta funcion deberia retornar una cadena fija.
A continuacion la funcion
Public Function GetSerialNumber(n2 As Integer, n1 As String) As String
Dim r As String
Dim s As String
Dim espacio As Long
r = Space(250)
r = "4MT2EC83" 'esto es lo que deberia retornar
GetSerialNumber = r
End Function
La funcion deberia retornar "4MT2EC83" , pero solo me devuelve el primer caracter.
De antemano les agradesco su ayuda.