PDA

View Full Version : Solved: Division with remainder



austenr
05-02-2010, 03:21 PM
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.


If chkDivide.Checked = True Then
decAnswer = decFirstInputNumber / decSecondInputNumber
txtCalcFirstNumber.Text = txtFirstNumber.Text
txtCalcSecondNumber.Text = txtSecondNumber.Text
txtOperator.Text = ("/")
txtAnswer.Text = decAnswer.ToString
End If
:dunno

Bob Phillips
05-02-2010, 03:49 PM
How about this



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

austenr
05-02-2010, 05:38 PM
Spot on as usual Bob. Thanks