| Pregunta: | 5384 - ACTIVAR CAJA REGISTRADORA |
| Autor: | Antonio Alvarez |
| Estoy programando un punto de venta y necesito saber como puedo hacer para activar la gabeta de una caja registradora para guardar el dinero y dar el cambio. Alguna Sugerencia Gracias. | |
| Respuesta: | Alejandro Cepeda Cepeda Pirela |
| Hola Antonio, si usas una caja registradora que se conecta a través del Com1 o Com2, puedes utilizar el control MSComm, si no esta visible en la barra de controles, debes agregarlo en el menú Proyecto en la opción Componentes.
Este codigo te sera de utilidad. Private Sub Command1_Click() 'Se le asigna el número del puerto MSComm1.CommPort = "1" 'Se realiza la apertura del puerto MSComm1.PortOpen = True 'Se le envía un carácter al puerto MSComm1.Output = "*" 'Según se mientras mas cantidad de caracteres 'le envíes el puerto la gaveta se abre mas 'rápidamente 'Se cierra el puerto MSComm1.PortOpen = False End Sub Antonio cualquier otra pregunta me puedes escribir. | |