Red de conocimiento informático - Problemas con los teléfonos móviles - Cómo devolver parámetros en subprocesos múltiples de vb.net, proporcione un ejemplo

Cómo devolver parámetros en subprocesos múltiples de vb.net, proporcione un ejemplo

Public?Class?Form1

Public?Class?SquareClass? "Encapsula funciones llamadas por múltiples subprocesos en clases y las devuelve a través de eventos de clase

Public?Value?As?Double

>

¿Público?Cuadrado?As?Doble

Público?Evento?ThreadComplete(ByVal?Cuadrado?As?Doble)

Público?Sub?CalcCuadrado()

Cuadrado?=?Valor?*?Valor

RaiseEvent?ThreadComplete(Cuadrado)

Fin?Sub

Fin?Clase

¿Dim?WithEvents?oSquare?As?SquareClass

¿Privado?Sub?Button1_Click(remitente?As?Object,?e?As?EventArgs)?Process Button1.Click?'Valor de retorno multiproceso Prueba , el evento se activa cuando el hilo termina de ejecutarse

Soquare?=?New?SquareClass()

Dim? p>Dim?t?As?New?Threading.Thread(AddressOf) ? oSquare.CalcSquare)

OSquare.Value?=?30

t.Start()

Fin?Sub

Sub? SquareEventHandler (ByVal?Square?As?Double)? Maneja la función de evento de respuesta de oSquare.ThreadComplete

MsgBox("The?square?is?"?&?Square)

Fin ?Sub

¿Fin?