¿Cuál es la diferencia entre dévil en el nivel de miembro y estático en el nivel de procedimiento?

Question

En Visual Basic 2008, hay dos formas diferentes, que yo sepa a lograr lo mismo:

El DIM en el nivel de miembro:

Dim counter1 as integer = 0 
Dim counter2 as integer = 180 
Public Sub SampleSub1() 
    Counter1 += 1 : If (Counter1 > 14) Then Counter1 = 0 
    Counter2 += 1 : If (Counter2 > 240) Then Counter2 = 0 
End Sub 

Luego está la estática en el nivel de procedimiento:

Public Sub SampleSub2() 
    Static Dim counter1 as integer = 0 
    Static Dim counter2 as integer = 180 
    Counter1 += 1 : If (Counter1 > 14) Then Counter1 = 0 
    Counter2 += 1 : If (Counter2 > 240) Then Counter2 = 0 
End Sub 

Estoy ejecutando un bucle de aproximadamente 8 millones de veces a través de esto en aproximadamente 7 segundos (con más datos en proceso), y utilizando el método estático en los contadores en realidad lleva unos 500ms más. ¿El método estático proporciona una mejor gestión de la memoria? ¿Por qué es más lento?

Además, declaro mis objetos que se utilicen de nuevo con un poco clara en el nivel de los miembros o al menos fuera de los bucles, como:

Dim SampleObject as SampleClass 
Public Sub SampleSub3() 
    SampleObject = TheQueue.Dequeue() 
End Sub 

¿Debo usar el método estático (que parece ser más lenta) en situaciones como esta, o el método de nivel de miembros atenuado que ya uso?

he reproducido el problema con este código en una aplicación de prueba:

Public Class Form1 
Dim EndLoop As Integer = 50000000 
Dim stopwatch1 As New Stopwatch 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    stopwatch1.Reset() 
    stopwatch1.Start() 

    For cnt As Integer = 1 To EndLoop 
     test1() 
    Next 
    stopwatch1.Stop() 

    Label1.Text = "Loop1: " & stopwatch1.ElapsedMilliseconds 

    stopwatch1.Reset() 
    stopwatch1.Start() 
    For cnt As Integer = 1 To EndLoop 
     test2() 
    Next 
    stopwatch1.Stop() 

    Label2.Text = "Loop2: " & stopwatch1.ElapsedMilliseconds 
End Sub 
End Class 

Public Module TestModule 
Dim counter1 As Integer = 0 
Dim counter2 As Integer = 180 
Public Sub test1() 
    counter1 += 1 : If (counter1 > 14) Then counter1 = 0 
    counter2 += 1 : If (counter2 > 240) Then counter2 = 0 
    COW1(counter1, counter2) 
End Sub 

Public Sub test2() 
    Static counter3 As Integer = 0 
    Static counter4 As Integer = 180 
    counter3 += 1 : If (counter3 > 14) Then counter3 = 0 
    counter4 += 1 : If (counter4 > 240) Then counter4 = 0 
    COW1(counter3, counter4) 
End Sub 


Public Sub COW1(ByVal counter1 As Integer, ByVal counter2 As Integer) 

End Sub 
End Module 

El lento hacia abajo con el uso de las variables estáticas no se produce a menos que yo estoy llamando a un sub desde otro módulo como el ejemplo anterior.

Answer 1

Las variables locales estáticas son una característica extraña de VB.Net. Cuando los compila, simplemente aparecen representados por una variable estática de nivel de clase detrás de las escenas.

Sin embargo, si está inicializando y declarando una variable local estática al mismo tiempo, lo que realmente sucede es que el compilador pega una clase Monitor alrededor de ella, para asegurarse de que no pueda ser inicializada por varios hilos al mismo tiempo hora.

Es la parte superior de este monitor lo que probablemente esté viendo. Intente eliminar la inicialización de la declaración declarativa y vea si nota una mejora en el rendimiento.