Visual Basic - Ayuda para obtener LRC de una cadena

saludos amigos del foro,

sabra alguien como calculo el LRC en una cadena de carecteres para ser enviada a un puerte RS-232 la cual contiene la siquiente sintaxi

STX DATA LTX LRC

gracias de antemano

dim varx() as string
varx = split(cadena, " ")
lrc = varx(4) o
lrc = varx(3)

saludos

http://foros.solucionesperu.com