Solved: Division with remainder

Using the following code (straight VB) how would you change is to make the txtAnswer.Text text box read for instance "4 remainder 7" rounding it up or down depending.

[VBA]
If chkDivide.Checked = TrueThen
decAnswer = decFirstInputNumber / decSecondInputNumber
txtCalcFirstNumber.Text = txtFirstNumber.Text
txtCalcSecondNumber.Text = txtSecondNumber.Text
txtOperator.Text = ("/")
txtAnswer.Text = decAnswer.ToString
EndIf
[/VBA] :dunno

How about this

[vba]

If chkDivide.Checked Then
decAnswer = decFirstInputNumber / decSecondInputNumber
txtCalcFirstNumber.Text = txtFirstNumber.Text
txtCalcSecondNumber.Text = txtSecondNumber.Text
txtOperator.Text = ("/")
txtAnswer.Text = (decFirstInputNumber \ decSecondInputNumber) & _
" remainder " & _
(decFirstInputNumber Mod decSecondInputNumber)
End If
[/vba]

Spot on as usual Bob. Thanks