| Usuario |
funcion para convertir de dec a he... |
Desconocido
|
| Enviado - 12/10/2004 |
| |
yo se que la funcion hex() en visual convierte una cadena de numeros en dec
ejem txtserie.text = hex(168)
txtserie.text mostrara "A8"
pero yo lo quiero visebersa
digamos que la funcion es (Dec) por ejemplo
ejem txtserie.text = Dec(A8)
txtserie.text mostrara "168"
pero dec no es debe ser otra funcion
|
| |
|
fmarredo
486 Mensaje(s)
|
| Enviado - 12/10/2004 |
| |
Function HexToDec(HexValue As String, Optional A_Integer As Boolean) As Long
If A_Integer Then
' convierte a integer (FFFF = -1)
HexToDec = Val("&H" & HexValue)
Else
' convierte a Long (FFFF = 65535)
HexToDec = Val("&H" & HexValue & "&")
End If
End Function
|
| |
|
