Pregunta: | 49195 - ESPERANDO EJECUCION DE UN EVENTO |
Autor: | Gabriel Arroyo |
Quiero saber si es posible y saber como se hace lo siguiente en vb 6.0 Tengo una linea de codigo que puede llamar a 3 posibles eventos 'esta linea llama a pedir resultado de un dispositivo y le doy un tiempo de '1000 milisegundos el cual puede entrar en cualquiera de los 3 eventos abajo 'definidos public sub procesado_pos()/Public sub rechazado_pos()/Public 'sub sinconexion_pos() , lo que quiero es espera a que se porduzca el evento 'y que me traiga el resultado del mismo, o sea el Tex para poder devolverlo public function retorno_resultado_dispositivo() as string pos.pedirresultado(1000) set pos = nothing retorno_resultado_dispositivo=tex 'en base a esta linea el progrma va ha 3 eventos los cuales no se pueden 'definir como funciones por ser eventos de una clase ya definido y sin acceso public sub procesado_pos() dim tex as string tex="A" end sub Public sub rechazado_pos() dim tex as string tex="B" end sub Public sub sinconexion_pos() dim tex as string tex="C" end sub |