Devolver variable.

[Didi VK]

si quieres que se te devuelva un valor hazlo mediante una funcion;si quieres hacerlo por procedimiento, te creas una variable publica


Public Class csCargaDatos

Public Sub VerificarArchivo()

Dim strArchivo As String = "Archivo.txt"
Dim Archivo As New csFunciones
Dim strArch As String = Archivo.BuscarArchivo(strArchivo)



End Sub

End Class



Public Class csFunciones

Public Function BuscarArchivo(ByVal strArchivo As String) As String
BuscarArchivo = "el valor que quieras"
Return BuscarArchivo

End Function