Dim dbl As Double = 123.78
MessageBox.Show(Math.Truncate(dbl))
Dim divisor As Integer = 4
Dim dividend As Integer = 15
Dim quotient As Double = dividend /divisor
Dim wholeQuotient As Integer = dividend \ divisor
Dim remainder As Double = dividend Mod divisor
MessageBox.Show(quotient.ToString())
MessageBox.Show(wholeQuotient.ToString())
MessageBox.Show(remainder.ToString())