Define and Use Function: Shared Function : Function « Language Basics « VB.Net

Home VB.Net 1. 2D 2. Application 3. Class 4. Data Structure 5. Data Types 6. Database ADO.net 7. Date Time 8. Development 9. Event 10. File Directory 11. Generics 12. GUI 13. Internationalization I18N 14. Language Basics 15. LINQ 16. Network Remote 17. Reflection 18. Security 19. Thread 20. Windows Presentation Foundation 21. Windows System 22. XML 23. XML LINQ

VB.Net » Language Basics » Function   Define and Use Function: Shared Function Imports System Public Class MainClass          Shared Sub Main(ByVal args As String())         Dim area As Double         area = CalculateAreaFromRadius(100)              Console.WriteLine("Area: " & area)     End Sub          Shared Function CalculateAreaFromRadius(ByVal radius As Double) As Double         ' square the radius...         Dim radiusSquared As Double         radiusSquared = radius * radius         ' multiply it by pi...         Dim result As Double         result = radiusSquared * Math.PI         ' return the result...         Return result     End Function End Class                     Related examples in the same category 1. Define and Call Function 2. Define and use Function