por hay ay un ejemplo con un timer, el timer cada x milisegundos comprueba si hay corriente o no
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú
Do While Not Tabla.EOF
Rejilla.Rows = Rejilla.Rows + 1
Rejilla.Rows = Rejilla.Rows + 1
Rejilla.TextMatrix(Row + Linea, 0) = Tabla("CAMPOTABLA")
Rejilla.TextMatrix(Row + Linea, 1) = Tabla("CAMPOTABLAN")
Linea = Linea + 1
Tabla.MoveNext
Loop