Keskustelu: Ohjelmointikysymykset: QB, VB6: Vertailu, onko arvo ±10 isompi kuin toinen

heips!

kuinka verrataan onko joku muuttuja +/- 10 isompi kuin toinen muuttuja??

Riittäisikö tämä:

IF x = y+10 OR x = y-10 THEN

Muistaakseni basiceissä on ala- ja yläraja muuttujien arvoille. Tällöin joudut miettimään luvun tallentamista useamman muuttujan avulla, jos haluat tarkistaa vaikkapa onko x kymmentä suurempi kuin y jos y = 2147483647 ja molemmat ovat tyyppiä long integer, https://vedrank90.wordpress.com/2009/12/13/qbasic-data-types/

Tai itseisarvolla:

IF ABS(x - y) = 10 THEN

x, y ja 10 esiintyvät kukin vain kerran, mikä tekee koodin selkeämmäksi. (Lyhyessä ohjelmassa sillä ei tietenkään ole juuri merkitystä.)

ääh..

asettelin kysymykseni näköjään väärin. Eli teen koodia joka tekee reikien paikkoja tietyn alueen sisään. ja noita reikiä ei saisi olla niin että ne olisivat ihan vierekkäin. tarkoitus olisi tehdä koodin pätkä joka käy excel listauksen läpi ja vertaa kaikka paikat keskenään ja jos joku reikä on 10mm lähempänä kuin toinen, niin arvotaan uudet koordinaatit sille reiälle.

Reiän a koordinaatit ax, ay
Reiän c koordinaatit cx, cy

Etx = ax - cx
Ety = ay - cy
If (etx*etx+ety*ety) < 100 Then
     'Reiät ovat alle 10 päässä toisistaan
End if