Problema con el hpb

Bueno mi problema es el sgt tengo un progressabar y l corro simultaneamte con un sle bueno todo sale okey solo que cuando llega 100 me abre el mensaje para abrir mi otra ventana pero el sle sigue corriendo y no se detiene en 100% bueno ahí esta el código que use no para cuando llega a 100 bueno espero me ayuden
pos=Pos+ 1
sle_1.text = string(pos)+'%'
hpb_1.position=Pos
if Pos=100 then
sle_1.text="100%"
messageBox("Sistema","Bienvenido Al Sistema" )
open(w_busca)
close(w_ingreso)
end if

1 Respuesta

Respuesta
1
FOR k=1 TO 100
sle_1.text = string(k)+'%'
hpb_1.position = k
NEXT
Messagebox('Sistema','Bienvenido al Sistema')
Open(w_busca)
Close(w_ingreso

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas