Hola muchachones xP, vengo en solicitud de una ayudita, sucede que estoy conviertiendo la cadena (5300680065006C006C002E004100700070006C00690063006100740069006F006E) A String, pero al convertir se desborda debido a los 00
Public Function HS2(xString As String) As String
For I = 1 To Len(xString) Step 2
HS2 = HS2 & Chr$(Val("&H" & Mid(xString, I, 2)))
Next I
End Function
usando este codigo de la siguiente manera
Private Sub Command2_Click()
Text2.Text = HS2(5300680065006C006C002E004100700070006C00690063006100740069006F006E)
End Sub
Solo muetsra la primera S, ya que despues de esta viene 00 y de ahi no continua.
mi necesidad exacta es tener la string de esto pero ningun convertidor reconoce los 000 les agradezco..
Los 00 son caracteres nulos, así que simplemente no los leas, evalua antes el Mid(xString, I, 2), y si es igual a "00" entonces no hagas nada
Saludos
Gracias por tu respuesta, pero mi objecto es detectar esa cadena en un archivo y si la coloco asi nada mas sin contar los 00 no la encuentra, uso Instr y mi objetivo es encontrar esa string en un programa, para eso se obtiene la info como strng y demas..
Bueno la respuesta en simple, para buscar esa frase simplemente representamos los 00 como vbNullchar o Chr(0) y lo encuentra sin problemas, mil gracias por su ayuda!