Miten saa esim kuva1:n liikkumaan 32 erisuuntaan? tai vaikka että ammus liikkuu 32 ei suuntaan...??
Trigonometrisillä funktioilla
?
TIC tuskin on vielä käyny esimerkiksi lukion MA05 kurssia.. trigonometria ja vektorit? =) mutta sunhan siis tarttee vaan opetella niitä ennen lukioon menoa =) niin yksinkertaista.. =)
Näin saa ainakin 360 eri suuntaan (koodissa tosin saattaa olla virheitä):
pii=4*Atn(1) suunta=30 'suunta asteina, johon kuva liikkuu usuunta=suunta*(pii/180) Do kuva1.Left=kuva1.Left+Sin(usuunta) kuva1.Top=kuva1.Top+Cos(usuunta) DoEvents Loop
?
Kertokaa nyt pistäkää vaikka koodi mulle: iw_tic@hotmail.com
Lähetin jonkinlaisen esimerkin.
Kato QB vinkki: Sin, ja Cos funktioiden hyötykäyttö. Se on helppo soveltaa VB:hen...
Eipä ole minun.
Jooo kiiittti Ana! toemii hyve.
Aihe on jo aika vanha, joten et voi enää vastata siihen.