Código de Visual Basic - Teclado Virtual Completo

Pos: 8

Val: 208

Ha mantenido su posición en Visual Basic (en relación al último mes)

Teclado Virtual Completo

Visual Basic

(23)

Actualizado el 15 de Febrero del 2016 por Rodolfo (6 códigos) (Publicado el 6 de Febrero del 2016)

25.946 visualizaciones desde el 6 de Febrero del 2016

Es un Teclado Virtual Completo, para aplicarlo en pantallas táctiles. Les recomiendo que lo utilicen de manera externa a la aplicación que estén desarrollando por que en las pruebas que realice no funciona bien si tenemos un Formulario Madre si lo utilizan dentro de un proyecto. Sigo con el problema que aun no he podido resolver es el del PUNTO (.) si alguien encuentra la solución comente. Funciona con windows XP en adelante sin problemas. No necesita ninguna librería esta todo en el código y también esta el EXE para poder probarlo (cometí un error en el código cambien el Unload Me x End para que no se abra mas de una vez. Disculpen si fui algo desprolijo con el código es que quería compartirlo con ustedes ya que no encontraba por ningún lado una solución hasta que después de tanto buscar pude armar algo que funciona. Y gracias a esta comunidad pude resolver muchos problemas con los ejemplo que publicaron.

teclado-virtual-Completo

2.0
(23)

Actualizado el 15 de Febrero del 2016 (Publicado el 6 de Febrero del 2016)

gráfica de visualizaciones de la versión: 2.0

25.947 visualizaciones desde el 6 de Febrero del 2016

No funciona el PUNTO (.) pero ya lo resolveré Si alguien lo resuelve comente. Ya que muy util para las pantallas tactiles.

Si alguno de los archivos de descarga no funciona, comentanos aquí el error.

Comentarios sobre la versión: 2.0 (23)

Manuel

14 de Febrero del 2016

Pena que creo que es en VB 6 y no en NET... pero eso no quita que sea un excelentísimo aporte. Muchas gracias

Responder

Rodolfo

16 de Febrero del 2016

Buenas, es que a mi pensar lo viejo es mejor. Con .NET el usuario tiene que tener actualizadas las librerias y todo eso. Lo mas loco del caso que los desarrollos de VB6 sigan funcionando con windows hasta en W10 en 64bit :P aparte especifique es es mejor usarlo de manera externa a la aplicacion y no integrarla por los problemas de los focos. Pero asi todo publique el proyecto para que cada uno lo mofique a su gusto y lo tunee para que sea parte de la aplicacion principal.

Responder

Manuel

17 de Febrero del 2016

Tienes razón con respecto a .NET y VB6... pero aunque MS no debió matar VB, al menos por aquí, menos el mantenimiento de alguna aplicación que se lleva usando muchos años y te piden algún cambio, pues todo lo nuevo no te quieren para nada VB6. Y uno tiene que adaptarse a sus clientes, no al revés (salvo que quieras quedarte sin ellos).

Gracias.

Responder

Rodolfo

18 de Febrero del 2016

MIra en el caso que trabajes freelanze, en mi casa desarrollo y vendo mis soft por cuentra propia. Ademas no creo que VB6 tenga que envidiarle algo a .NET por que gracias a la comunidad hay muchos avanves en tratamiento de datos como importacion y exportacion. Ademas tranquilamente de puede trabajar con SQL y derivados. Al igual que con paginas web, no digo que se complique un poco la cuestion por no tener soporte del fabricante. Como paso con WinXP. Pero es un paralelismo que microsoft no puede negar.

Responder

Rodolfo

18 de Febrero del 2016

Recorde algo curioso que me sucedio alla en 2008, un ingeniero queria desarrollar un FrameWork administrativo con .NET 2003, y le pregunto por que no con la version 2005 y me contesto que no estaba seguro por que lo veia inestable. Y lo curioso aun es que el desarrollo que estoy haciendo esta hecho en VB6 va a reemplazar a un sistema por pedido de un cliente que en su comercio estaba utilizando un sistema I-POS totalmente on-line (que por problemas tecnicos del proveedor este esta en desuso ya hace 4 meses). Esto me retumbo la cabeza por que termino pensando que la tecnologia es una TORRE DE BABEL colapsa cada vez en menor tiempo. Y luego veo noticias que pc' corren windows 3.1 con aplicaciones totalmente eficientes en lugares criticos. Creo que nosotros como desarrolladores tenemos que poner un parate a la demanda de los clientes y solo ofrecer soluciones que estemos totalmente seguros que tengan las minimas posibilidades de error.

Responder

xve

16 de Febrero del 2016

Excelente!!!

Responder

Mark Tolouse

26 de Febrero del 2016

Excelente Aporte, Muchas Gracias... Lo necesitaba justo para una apliacion que desarrolle en Visual 6 para tablet..

Responder

Rodolfo

1 de Marzo del 2016

Es una tablet con windows o android? me interesa si es para android

Responder

Deivy

9 de Junio del 2016

Excelente aporte, de vedad muchas gracias por compartirlo, saludos.

Responder

Rodolfo

11 de Junio del 2016

Por nada, busquen el problema que existe al ingresar el punto. Que es algo muy importante en un soft de punto de venta. Avisen la solucion.

Responder

Alejandro Velasco

10 de Noviembre del 2016

Hola Rodolfo, primero agradecer tu ayuda, me gustaría cuando tengas tiempo te puedas contactar conmigo, a mi correo [email protected], estate atento a tus nuevas ayudas y a tu contacto, un gran saludos desde Tucumán

Responder

Juancar

7 de Marzo del 2017

Buenas Rodolfo. Me pregunto si álguien ha dado con el problem del punto.Sin él no me sirve, ya que lo mio va todo con decimales. Es una gran pena.

Responder

Rodolfo

9 de Marzo del 2017

si corregimos el problema del punto

Private Sub CmdPunto_Click()
Dim lngLvReturnValue As Long
lngLvReturnValue = SetForegroundWindow(lngMvHwnd)
SendKey 110
End Sub

Responder

Juancar

10 de Marzo del 2017

Ta mbién he dado con ello.
Me he creado una variable : Const CASO_PUNTO = &HBE
Luego he modificado el código :

Private Sub Cmd_Click(Index As Integer)
Dim lngLvReturnValue As Long
lngLvReturnValue = SetForegroundWindow(lngMvHwnd)
If Asc(Cmd(Index).Caption) = "46" Then
SendKey CASO_PUNTO
Else
SendKey Asc(Cmd(Index).Caption)
End If
End Sub

Responder

Moises

13 de Julio del 2017

Me pueden dar todo el codigo lo ocupo para hacer el programa urgente!

Responder

Rodolfo

10 de Marzo del 2017

Claro al menos nosostros los corregimos con el codigo que te pase. Saludos

Responder

Juancar

10 de Marzo del 2017

Gracias por la respuesta. Siguiente problema surgido. En excel, si marco una celda me escribe bien, pero si abro un formulario en ese excel para leer el dato numérico y testearlo no me escribe nada. Alguna idea. Saludos cordiales

Responder

Rodolfo

11 de Marzo del 2017

Claro mira no recuerdo si el codigo esta comentado, no soy de hacerlo, solo en ocaciones que importantes. El tema es que el Timer toma el foco de la aplicacion y sus campos, en excel no sabria decirte por que al abrir un formulario no se como se tomaria el foco ya que usa VBA y no estoy muy familiarizado con este, ademas este soft se hizo para integrarlo a otro sistema y no para uso libre en todo windows, no se si me explico.

Te pregunto, tenes algun ejemplo de como imprimir una factura ya que el Objeto Print no lo domino mucho. Me refiero a toda una factura con sus lineas, encabezados, por que estoy buscando y no encuentro.

Saludos

Responder

Juancar

13 de Marzo del 2017

Intentaré resolverlo miraqndo como funciona el TIMER.
Con respecto al Objeto print, No utilizo VBA directamente para imprimir nada. Para ese tipo de cosas utilizo Acces que es donde tengo los datos, ahí me creo un informe con el formato que quiero para poder imprimirlos.

Responder

Edgardo

24 de Agosto del 2017

Hola, soy programador desde 1982 y estoy programado en vb6 desde el año 2000 más o menos, y realmente me parece una muy buena herramienta, y agradezco la generosidad de Rodolfo en publicar una de las cosas valiosas que tenemos los programadores, fuentes, conocimiento, espíritu y clientes.
En mi humilde opinión, realmente hay que tratar de actualizarse con las nuevas plataformas, porque sino se pasa los 50 (años) y cada vez tenés más quemado el bocho como para hacer el esfuerzo que es enorme, y de paso sirve como ejercicio intelectual que no está demás. Cuanto antes mejor, abrazo y gracias de nuevo.
Te dejo mi mail, [email protected], me interesa estar en contacto con vos.

Responder

Rodolfo

25 de Agosto del 2017

El tema de la programacion, en mi caso en particular no es un trabajo. Sino una diversion (mas alla que me genera ingresos) pero si uno hace lo que gusta mayor es el desafio es su equibalante en satisfaccion. Asi mismo, yo no defiendo ni critico ningun lenguaje o plataforma. En mi caso particular vendemos un sistema de gestion comercial (que al usuario no le interesa en que esta programado) y como que ya sabia mucho de VB6 aproveche la situacion. Todos dicen que si no cambiar a .NET te quedas sin clientes, eso es si te piden algo muy especifico que con .NET lo manejas de taquito.
Al menos aca en argentina solo las empresas lideres cambiaron a .NET conozco muchos soft incluyendo a JAZGESTION de NATURAL SOFTWARE que esta hecho en VB6, tiene todo factura electronica, envio de mail automatizado, etc. A menos que windows ya no soporte las dll u OCX de la ultima version de VB6 nadie se va a pasar a .NET porque ya tienen todo un sistema armado. y es imposible de migrarlo de manera sarisfactoria sin perder funciones. Dejo mi mail para que se contacte el que necesite alguna ayuda. [email protected]

Responder

Edgardo

24 de Agosto del 2017

Lo del punto

Private Sub CmdDecimal_Click()
Dim lngLvReturnValue As Long
lngLvReturnValue = SetForegroundWindow(lngMvHwnd)
SendKey vbKeyDecimal
End Sub

Responder

Rodolfo

27 de Agosto del 2017

Gracias a todos los que contribuyeron con el problema del punto. Ahora les consulto, algunos de los usuarios mencionaron problemas de corgadura del programa. Como les comente en el texto principal, en mi caso lo uso como programa externo es decir no lo meti al formulario dentro del proyecto por que al menejar ventanas MDI no funcionaba de manre correcta.
Lo que pudimos concluir fue que al ser VB6 al ejecutable hay que darles compatibilidad con winXP(SP3) y permisos de administrador. Con eso se soluciona el problema de los cuelgues.
Cualquier problema que les aparezca avisen asi vemos como la corregimos entre todos.
Y gracias a nuevamente a los que colaboraron ya que gracias a estos foros logramos avanzar todos.

Responder

Comentar la versión: 2.0

http://lwp-l.com/s3426

OCX Fiscal Epson

Conjunto de Técnicas y miniprogramas en un solo proyecto de VB

Código de Visual Basic - Teclado Virtual Completo

2.0(23)

Comentarios sobre la versión: 2.0 (23)

Comentar la versión: 2.0

Tienes que ser un usuario registrado para poder insertar imágenes, archivos y/o videos.

2.0
(23)