VB(A) schiffe versenken Hilfe!

Re(4): VB(A) schiffe versenken Hilfe!

Smet89 — Wed, 06 Jun 2007 13:27:31 GMT

thx hat mir viel geholfen

Re(4): VB(A) schiffe versenken Hilfe!

Smet89 — Wed, 06 Jun 2007 13:20:02 GMT

thx das hört sich gut an werd ich dann mal versuchen

Re(3): VB(A) schiffe versenken Hilfe!

Ardjan — Wed, 06 Jun 2007 11:49:24 GMT

HorVer = Int((Rnd(0)*2)-1)

sollte 0 oder -1 liefern, oder? Mit Rnd(0)*2 hast du Werte zwishen 0 und 2, 1 abziehen liefert dir Werte zwischen -1 und 1. Alles hinter Komma abschneiden (Int() oder vielleicht Abs()?) liefert -1 oder 0, also True oder False...

Re(2): VB(A) schiffe versenken Hilfe!

Smet89 — Wed, 06 Jun 2007 06:40:53 GMT

mein problem liegt /lag daran das ich das so machen wollte das verschieden große schiffe automatisch gesetzt werden also so das nicht nur ein X als schiff da steht sondern z.B. XXX für ein größeres schiff da steht aber hab mich gestern abend da noch ranngesetzt und irgendwie ne möglichkeit gefunden...ist zwar net sauber programmiert aber es geht
nur ein prob hätte ich noch im moment setzt das programm mir alles schiffe horizontal aber ich will das irgendwie so hinbekommen das er ein par horizontal und ein paar vertikal setzt gibt es net zufalls möglichkeit die nur zwischen 2 faktoren entscheidet? meinetwegen true oder false?
mfg
smet

Re: VB(A) schiffe versenken Hilfe!

Fly — Tue, 05 Jun 2007 23:04:53 GMT

Wo liegt das Problem?

VB(A) schiffe versenken Hilfe!

Smet89 — Tue, 05 Jun 2007 19:07:57 GMT

hi, hab mich mal ranngesetzt und für vba nen spiel gemacht und zwar das gut bekannte schiffe versenken nun es funktioniert soweit, bloß möchte ich jetzt noch spezeller auf das spiel eingehen so das ich z.b. verschieden große schiffe reinstellen kann und diese am besten mit rnd generiert werden, bloß wie geht dazu der code? also die schiffe werden über eine listbox ausgegeben und das wasser wird als 0 dargestellt und die schiffe sollen als X dargestellt werden , ein paar gute tipps würden mir echt viel helfen!
mfg
smet