leer y asignar valor a una variable publica en un form

[manoloperis]

Quiero leer y actualizar el valor de una varible publica en un formulario
mi codigo es el siguiente


codigo en el formulario:

Public Class Form1
Public Accion As String

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
PrepararFormulario(Me)
'desde aqui llamo al procedimiento pasandole como parametro el formulario actual
End Sub
End Class

Codigo en el modulo:

Public Sub PrepararFormulario(ByVal Frm As Form)
Dim Left As Integer = 0
Dim Top As Integer = 0
Frm.Location = New Point(Top, Left)
'Esto tampoco funciona, cada vez que abro el formulario, lo va desplazando

Frm.accion = "NINGUNA"
'aqui da un error
'accion' no es un miembro de 'System.Windows.Forms.Form'.
End Sub

Public Sub RevisarFormulario(ByVal Frm As Form)
If Frm.accion = "NINGUNA" Then
'mismo error
'accion' no es un miembro de 'System.Windows.Forms.Form'.

End If
End Sub

La idea es hacer un procedimiento que sirva para todos los formularios
en la llamada, solo le paso el formulario

PrepararFormulario(Me)

si en vez de
Frm.accion = "NINGUNA"
pongo
Form1.Accion = "NINGUNA"
eso funciona

pero claro, yo no se cual de todos los formularios ha llamdo al procedimiento

Espero haberme explicado bien