Este es el código que da error. Gracias
Hola otra vez,
la verdad es que vengo de .NET, jejej
El caso es este...
En el Main tengo...
Sub Mostrar_datos (team As Int)
Procedimientos_generales.Mostrar_foto (id, foto)
Procedimientos_generales.Mostrar_nombre (id, Label5)
End Sub
Y aparte en la clase "Procedimientos_generales" tengo:
'Class module
Sub Class_Globals
End Sub
Sub Mostrar_escudo (eq As Int, imagen As ImageView)
If eq=1 Then imagen.Bitmap = LoadBitmap(File.DirAssets, "001.jpg")
If eq=2 Then imagen.Bitmap = LoadBitmap(File.DirAssets, "002.jpg")
If eq=3 Then imagen.Bitmap = LoadBitmap(File.DirAssets, "003.jpg")
End Sub
Sub Mostrar_nombre (eq As Int, Lab As Label)
If eq=1 Then Lab.Text="Director"
If eq=2 Then Lab.Text="Empleado"
If eq=3 Then Lab.Text="Externo"
End Sub
'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize
End Sub
Esto al compilar da el error:
Error description: Undeclared variable 'procedimientos_generales' is used before it was assigned any value.