Problems: Correcting Logic and Code ErrorsThe following sample of code contains errors. Rewrite the incorrect statements to correct all errors.
Public Class TruckPrivate Property Miles As DecimalPublic Function New()_Miles = 0End FunctionPublic Sub New(ByVal decM As Decimal)_Miles = decMEnd SubPublic Function GetMPG() As Decimal'returns the miles per gallon for a truckReturn _Miles / 30End FunctionEnd ClassDim myTruck as New Truck
myTruck.Miles = 1000.0
lblMilesPerGallon.Text = myTruck.GetMPG()

What will be an ideal response?

Public Class Truck
Public Property Miles As Decimal

Public Sub New()
_Miles = 0
End Sub

Public Sub New(ByVal decM As Decimal)
_Miles = decM
End Sub

Public Function GetMPG() As Decimal
'returns the miles per gallon for a truck
Return _Miles / 30
End Function
End Class?Dim myTruck as New TruckmyTruck.Miles = 1000lblMilesPerGallon.Text = myTruck.GetMPG()