Red de conocimiento informático - Aprendizaje de código fuente - El bucle de comando multiproceso del Button Wizard finaliza después de un cierto período de tiempo

El bucle de comando multiproceso del Button Wizard finaliza después de un cierto período de tiempo

ID del hilo1=BeginThread(a)

ID del hilo2=BeginThread(b)

Dim n

n=now

Rem q

// El script se detiene después de 15 segundos

Retraso 1000

Si DateDiff("s",n,now)>

Detener el hilo ID1

Detener el hilo ID2

De lo contrario

Ir a q

Finalizar si

Sub a

Rem q

Retraso 1000

Cuadro de mensaje "¡El script se detuvo!"

End Sub