I am trying to convert English Distance to metric Distances.
I created two text boxes and an Accept Button. I want to input the English measurments in one box and having it output in Metric from the other text box. What am i doing wrong? can some one help me solve this?
Public Class Form1
Private Sub Accept_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Accept.Click
Dim MtrcOutput As Double
Dim Miles As Double
Dim Kilometers As Double
Miles = 3.5
Kilometers = Miles * 1.6
MtrcOutput = CDbl(EngInput.Text) * Kilometers
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load