Jag håller på att testa med arrayer och funktioner och slumptal. Det jag ska göra är ett program som kastar två tärningar tills två sexor kommer upp. I formuläret finna en checkbox som visar hur många kast som behövdes typ: Vad är det du vill ha i arrayen? Lagra undan de temporära svaren för den Hej Hej igenArray
2+4=6
5+3=8
6+6=12
3 kast behövdes
Jag såg att en någon annan frågat samma sak, och fått svar. Jag undra hur man kan lösa det med en array i en modul.
Mvh
MartinSv: Array
omgången eller något annat? Speca gärna problemet lite till.
/EmmaSv: Array
Ämnet var uppe för ett tag sedan. Om du kör sökning på
"tärning" så hittar du lösningen,istället för att lägga det
i en textbox så lägger du in det i din Array.
Återkom om det inte klarnar.
mvh
svenSv: Array
När jag tänkt efter så är det kanske lite krångligare än man först tycker.
Du skall deklarera Dim DiceArray() As String
Tror, har inte testat att du för säkerhets skull du skall ha
Redim DiceArray(1), annars kan det bli konflikt med DiceArray(0)
Sedan efter varje slump som inte blir 6 + 6
gör du Redim Preserve DiceArray(Ubound(DiceArray))
DiceArray(Ubound(DiceArray - 1) = den nya strängen , tex "2 + 4 = 6"
Fritt ur minnet
Sven