help please

[jmcilhinney]

Let's say that you have 2759 metres. You use the integer division and modulo operator to get the number of whole kilometres and remaining metres from that value:

Dim Const METRES_PER_KILOMETRE As Integer = 1000
Dim totalMetres As Integer = 2759
Dim wholeKilometres As Integer = totalMetres \ METRES_PER_KILOMETRE
Dim remainingMetres As Integer = totalMetres Mod METRES_PER_KILOMETRE
 
MessageBox.Show(String.Format("{0} metres is {1} kilometres and {2} metres.", totalMetres, wholeKilometres, remainingMetres))