Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Quersumme berechnen
Autor: Kawa
Datum: 24.02.04 17:02
Sub Befehl1_Click () Dim Quersumme As Long zahl = text1.Text Do While zahl <> 0 Quersumme = Quersumme + (zahl Mod 10) zahl = zahl \ 10 Loop text2.Text = Quersumme wie ihr seht habe ich da den code ...von nem kumpel bekommen. was bedeutet nun (zahl Mod 10) und zahl=zahl \ 10 wäre euch sehr dankbar

Quersumme berechnen	1.449	Kawa	24.02.04 17:02
Re: Quersumme berechnen	816	.:Solaris:.	24.02.04 17:27
Re: Quersumme berechnen	818	guenni	24.02.04 18:16
Re: Quersumme berechnen	840	guenni	24.02.04 18:28
Re: Quersumme berechnen	936	skydeck	24.02.04 18:48
Re: Quersumme berechnen	870	guenni	24.02.04 19:43
Re: Quersumme berechnen	791	Kawa	25.02.04 17:21

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen