Cell Phone Provider Application

Cell Solution, a cell phone provider, sell the following packages:

800 minutes per month             $45.00 per month
1500 minutes per month            $65.00 per month
Unlimited minutes per month   $99.00 per month

Customers may also select the following options:
Email                                           $25.00 per month
Unlimited Text messaging       $10.00 per month

The provider sell the following phones:
Model 100:            $29.95
Model 110:            $49.95
Model 200:          $99.95
(A 6% sales tax applies to the sale of a phone.)

Additionaly, the provider offers individual plans and family plans. With the individual plan, the customer gets one phone. With the Family plan, the customer gets as many phones of the same model as he or she desires, and all the phone share the same minutes. Voicemail and text messaging fees are charged for each phone purchased under the Family plan.
Create an application that calculates a customer's plan cost.

This material may consist of step-by-step explanations on how to solve a problem or examples of proper writing, including the use of citations, references, bibliographies, and formatting. This material is made available for the sole purpose of studying and learning - misuse is strictly forbidden.

Public Class MainForm

    Private Sub btExit_Click(sender As Object, e As EventArgs) Handles btExit.Click
       Me.Close()
    End Sub

    Private Sub btIndividual_Click(sender As Object, e As EventArgs) Handles btIndividual.Click
       Dim fm As New IndividualForm
       fm.ShowDialog()
    End Sub

    Private Sub btFamily_Click(sender As Object, e As EventArgs) Handles btFamily.Click
       Dim fm As New FamilyForm
       fm.ShowDialog()
    End Sub

End Class...