|
Zdravím, ve VB jsem úplným začátečníkem (student SŠ) a potřeboval bych poradit. Za úkol mám simulovat hru dostihy kde je dráha realizována textovou formou ( pro 4 koně), je celkem 8 polí a do 4 z nich se eviduje historie házení kostkou (která se náhodně generuje ale dá se také ručně korigovat) a na požádání ji mám vypsat (program pracuje jak má jen bych chtěl upravit vypisování historie). Ovšem při vypisování mi to vypíše celé pole a většinou není ani celé pole vyplněné a odentrovat x MSgboxů které vyplivnou jen nulu je otravné. Dá se to nějak udělat aby mi to vypsalo z pole jen hodnoty které jsou větší než 1 a nejlépe za sebou do jednoho MsgBoxu ? 1 2 3 4 5 6 7 8 9 | Dim polef(20) As Integer
Try
For i = 0 To polef.Length - 1
MsgBox(polef(i))
Next
Catch ex As Exception
MsgBox("Stala se chyba!")
End Try
|
|