Hola Yothamons!
Código a mano no tengo, pero si algunas indicaciones que te pueden ayudar.
Debes partir por comprender el uso del control mscomm, viene un ejemplo bastante bueno con visual basic.
Hecho esto, habrás comprendido que estos aparatos (balanzas, centrales telefónicas, etc...) generalmente se comunican enviando una cadena de caracteres a través del puerto serial, y que ese se puede capturar cuando se produzca el evento de que el buffer reciba la cadena, y que se detecta con OnEvents (al ver el ejemplo te quedará más claro).
Una vez que tengas la cadena, probalemente te encontrarás con que en ella viene más información que la que deseabas. Entonces, debes determinar en que posición está lo que buscas y capturarlo (la función Mid() se presta para estos casos.
Está bien, reconozco que la respuesta no es muy específica, pero la pregunta tampoco lo es. Bucea un poco en el ejemplo de visual, y seguro te podremos ayudar en forma más concreta.
Mantén el contacto.
Salu2.
