Conversión de datos:
Los componentes de comunicación ActiveMbus.ocx y ActiveNTocol.ocx, poseen una serie de funciones que asisten al programador, que le permitirán la rápida conversión de datos de un sistema numérico a otro.
A continuación se alistan las funciones y modos de uso:
Funciones de Conversión:
Decimal <=> Hexadecimal:
Dim X as String
CDecToHex: X = ActiveNTocol1.CDecToHex(15). El valor de X será: «F»
CHexToDec X = ActiveNTocol1.CHexToDec(«A»). El valor de X será: 10
Decimal <=> Binario:
Dim X as String
CDecToBin X = ActiveNTocol1.CDecToBin(5). El valor de X será: «101»
CBinToDec X = ActiveNTocol1.CBinToDec(«1011»). El valor de X será: 11
Decimal <=> Octal:
Dim X as String
CDecToOct X = ActiveNTocol1.CDecToOct(14). El valor de X será: 16
COctToDec X = ActiveNTocol1.COctToDec(60). El valor de X será: 48
Cadena <=> Vector:
Dim A(3) as String
CstrToArray ActiveNTocol1.CstrToArray «5,65,89», A Los valores quedarán cargados en el vector A: A(0)=5, A(1)=65, A(2)=89.
Dim X as String
ArrayToString X = ActiveNTocol1.CArrayToString(A). El valor de X será: «50,3,1289». En este ejemplo A(0)=50, A(1)=3, A(2)=1289