Question

How to calculate the surface area of cylinder in VB.NET

Answer 1

Imports System
				
Public Module Module1
	Public Sub Main()
		Dim radius As Double = 6
		Dim height As Double = 19
  
		Dim cylinder_surface_area1 As Double = (2 * Math.PI * radius * height) + 
                                               (2 * Math.PI * (radius * radius))
  
		Dim cylinder_surface_area2 As Double = 2 * Math.PI * radius * (radius + height)
  
		Console.WriteLine("Cylinder Surface Area = " + CStr(cylinder_surface_area1))
		Console.Write("Cylinder Surface Area = " + CStr(cylinder_surface_area2))
	End Sub
End Module




' run:
'  
' Cylinder Surface Area = 942.477796076938
' Cylinder Surface Area = 942.477796076938
'  

 

70+ SQL courses for beginners and professionals