Practice Exercise 2
Speed Converter

   ''------------------------------------------------------------------------------------------------------------
   ' Student Name
   ' Class Name
   ' Program Name
   ' Due Date
   '
   ' This program is designed to convert a value representing KPH speed
   ' to MPH equivalant.
   '------------------------------------------------------------------------------------------------------------
   Private Sub cmdConvert_Click(ByVal sender As System.Object, _
                                                ByVal e As System.EventArgs) Handles cmdConvert.Click,
        Dim kph As Single
        Dim mph As Single
        kph = txtKPH.Text
        mph = Math.Round(kph * 0.6214, 0)
        lblMPH.Text = mph
   End Sub