Traurig beendete ich nicht, im vorhergehenden Pfosten zu schreiben:
Sie müssen eine Schnur beibehalten, oder eine Liste oder etwas, während Sie gehen, tun die Prüfung auf einem Riegel.
Wenn jederzeit ein Riegel durch einen anderen Kasten defekt ist, müssen Sie die Schnur zurückstellen.
Sein mehr Code…
um zu überprüfen und Anzeigenresultate können Sie dies tun:
schwaches chkWinner als neuer Checkbox
schwaches WinnerMessage als Schnur
schwaches bTie, wie Boolesch
bTie = falsch
wenn Val (checkbox1.tag) <� Val=""> WinnerMessage = checkbox2.text
chkWinner = checkbox2
bTie = falsch
elseif (Val (checkbox1.tag) = Val (checkbox2.tag)) dann
WinnerMessage += „,“ + checkbox1.text
chkWinner = checkbox1
bTie = richten aus
sonst
WinnerMessage = checkbox1.text
chkWinner = checkbox1
bTie = falsch
beenden wenn
wenn Val (chkWinner.tag) <� Val=""> WinnerMessage = checkbox3.text
chkWinner = checkbox3
bTie = falsch
elseif Val (chkWinner.tag) = Val (checkbox3.tag) dann
WinnerMessage += „,“ + checkbox3.text
bTie = richten aus
beenden wenn
wenn Val (chkWinner.tag) <� Val=""> WinnerMessage = checkbox4.text
chkWinner = checkbox4
bTie=false
elseif Val (chkWinner.tag) = Val (checkbox4.tag) dann
WinnerMessage += „,“ + checkbox4.text
bTie = richten aus
beenden wenn
[… und so weiter]
wenn bTie = falsch dann
msgbox („der Sieger ist: “ u. chkWinner.text u. „mit“ u. chkWinner.tag u. „Stimmen“)
sonst
msgbox („wir haben einen Riegel zwischen: “ U. WinnerMessage u. „mit“ u. chkWinner.tag u. „Stimmen“)
beenden wenn
