VB Lab 1,1

VB Lab 1,1 - Option Strict On P Public Class Form1 Private...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
Option Strict On Public Class Form1 P Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load S Dim miles As Single, yards As Single, feet As Single, inches As Single, kilometers As Single, meters As Single, totcentimeters As Single, totinches As Single Dim totmeters As Single miles = CSng(txtMiles.Text) yards = CSng(txtYards.Text) feet = CSng(txtFeet.Text) inches = CSng(txtInches.Text) totinches = miles * 63360 + 36 * yards + 12 * feet + inches
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 08/18/2011 for the course IE 148 taught by Professor Davesly during the Spring '11 term at Iowa State.

Ask a homework question - tutors are online