сбока test
sub test1
end sub


sub main
Dim method As MethodInfo
  For Each ass In AppDomain.CurrentDomain.GetAssemblies
                Dim n = ass.GetName(True)
                If n.Name = "test" Then
                    method=ass.GetType.GetMethod("test1")
                end if
 next
end sub 
method всегда nothing несмотря на то что есть такая sub в нужной сборке

 For Each assembly In AppDomain.CurrentDomain.GetAssemblies
                            Dim name = assembly.GetName(True)
                            If name.Name = "MYWPF" Then
                                For Each mdl In assembly.GetModules
                                    method = mdl.GetType.GetMethod("test1")
                                    If IsNothing(method) = False Then MsgBox("bingo")
                                Next
                            End If
                        Next

 For Each assembly In AppDomain.CurrentDomain.GetAssemblies
                            Dim name = assembly.GetName(True)
                            If name.Name = "MYWPF" Then
                                For Each mdl In assembly.GetModules
                                    method = mdl.GetType.GetMethod("test1")
                                    If IsNothing(method) = False Then MsgBox("bingo")
                                Next
                            End If
                        Next

public module test_module
   public sub test_sub
   end sub
end module

For Each mdl In assembly.ExportedTypes
                        name = mdl.Name
                        If name = "mdl_Main" Then
                            method = mdl.GetType().GetMethod("test1")
                        End If
                    Next