blogMyTrash

‘Division, Restbestimmung mittels Subtraktion in VB-Script

int a
int b
int rest

a = InputBox(“Dividend für die Division?”)
b = InputBox(“Divisor für die Division?”)

rest = a

while((rest-b) >= 0) ‘solange der Divisor noch abgezogen werden kann subtrahieren
rest = rest-b
wend

msgbox rest ‘Ausgabe des Restes nach der Restbestimmung