-
Si el problema es que el valor de vEntrada no debe repetirse consecutivamente en el historial, te propongo usando un ListBox el siguiente
If vEntrada <> List1.List(List1.ListCount - 1) Then List1.AddItem vEntrada
De esta manera pienso que no tienes que preocuparte por la frecuencia del muestreo.
Saludos.
-
Creo que tu problema se resuelve guardando el valor en una variable, cada que entre al timer compara el valor de la variable con lo que trae ventrada, si son iguales, que no entre, de lo contrario que te guarde el valor, espero me entiendas.
Saludos
Citary no se puede hacer nada con la caja de texto? no sólo la uso para el modo automático del robot, sino también para el modo teledirigido
Creo que podrías usar ambas cosas, el Listbox o guardarlo en la variable - como bien dice el_chente23, y el textbox para enviarle, me imagino que te refieres alguna especie de entrada de comandos.
Citare interesa conservar el espacio
esto último no entendí muy bien a que te refieres..
Saludos.
Para eso existen las variables estáticas. Y no hace falta usar select case si sólo va a mostrar lo que entra.
Static lLastValue&
If lLastValue <> vEntrada Then
lLastValue = CLng(vEntrada)
frmPrincipal.txtHistorial.Text = frmPrincipal.txtHistorial.Text & "valor " & vEntrada & vbCrLf
End If
Saludos.
-
Lo que hace el código es verificar que el valor de vEntrada no sea igual al anterior, si no es igual al anterior entonces muestra la nueva entrada y guarda el valor en lLastValue para volver a repetir la operación.
CLng lo que hace es devolver un valor de tipo Long (entero de 32 bits), lo uso para asegurarme de que no haya errores de conversión de tipos de datos.
Saludos.
-