Radianer til grader

prøv at gange med pi/180

altså:
cos(2*(pi/180))

ved ikke lige hvordan det ser ud i VB, men det kan du sikkert godt finde ud af.

Public Function sind(v)
  sind = sin(v * pi/180)
End Function

Public Function cosd(v)
cosd = cos(v * pi/180)
End Function

og brug cosd og sind for cos og sin med grader.

Jeg ved ikke lige med VB, men i Delphi ville det se nogenlunde sådan her ud:

cos(DegToRad(2));

altså så cos(DegToRad(2)) = 0,9994 osv osv.

Nogen hjælp?

_NICE_ Det virker sq.
Tak

Det var skovenborg der var hurtigst ellers tak for de hurtige gode svar.

Hmm hvordan overføre jeg pointene til dig?

Du skal først have ham til at ligge et svar

Jeg har også et andet problem.

Jeg har en ekstra form der hedder About som skal åbnes når man trykker på about knappen.

Hvad skal der stå i about knappen?

det sidste kan jeg i hvert fald ikke hjælpe med - men her er et svar for det andet :-)

Der skal stå
  About.Show

hmm, det kan vel ikke være rigtigt at jeg skal have alle pointene - fik du overhovedet svar på det sidste spørgsmål - ellers mener jeg nok at martin_moth og arne_v burde havde lidt. I må lige sige til - for jeg kan ikke rigtig bedømme det med min ringe viden om VB.

Fint nok med mig-behold du dem bare

Du var først med det rigtige svar (på det oprindelige spørgsmål) - du fik
points - det er svært at brokke sig over det !

jaja, 100 point var bare lidt i overkanten. Nå, jeg skal ikke irritere jer mere med den sag ;-)