Imports System

​

​

Public Module Module1

​

    class Prueba

        friend sub SayHello()

            Console.WriteLine("Hello")   

        end sub

    end class

    Public Sub Main()

        dim c as new prueba

        c.sayHello()

    End Sub

​

End Module

​