leosoft

Es medio largo para enviarlo por acá, me tienes que dar una dirección de corre y te lo envío.

Simplemente haces una resta entre los dos, fíjate este ejemplo: Text1.Text = Format(DTPicker2.Value - DTPicker1. Value, "hh:mm:ss") Asi en el TextBox te quedara la diferencia entre las dos horas.

Ya te envíe el código de como obtener los datos de la cola de impresión.

Si me das una drieccion de correo te envío un ejemplo para Visual basic 6 de como leer o escribir sobre los puertos USB, justamente lo que entra lo ves en un textbox, así que te servirá para tu proyecto.

Si el error te dice que no puede abrir el puerto es porque ese puerto lo esta utilizando algún otro control, seguramente el driver de impresión, fíjate si esta trabajando en el momento que vos le envías los datos.

No hay mucha diferencia entre el Qbasic y el Visual basic, solo que le Visual de por si solo no puede utilizar el puerto paralelo, pero te he enviado una librería que te agrega las instrucciones Inp Out tal como las utilizas en el Qbasic

Te envíe un ejemplo de como conectar con los puertos USB.

No es sencillo el cambio de resolución, pero te paso un método por API, copia esto en el procedimiento general del formulario: Option Explicit Private mResolucionCambiada As Boolean Private mResAlto As Long Private mResAncho As Long Private mResBits...

Puedes hacerlo de esta manera, primero copia esto en el procedimiento general del formulario: Private Const OPEN_EXISTING = 3 Private Type FILETIME dwLowDateTime As Long dwHighDateTime As Long End Type Private Type BY_HANDLE_FILE_INFORMATION...

Los dos botones hacen cosas distintas, si das en "Aceptar" el Listbox entrega el contenido a la variable de llamada y si das en Cancelar no entrega ningún texto por más que tengas uno escrito o definido como default. Simplemente puedes detectar si se...