Scholieren.com forum - [VB] Inverse Cosine

Scholieren.com forum (https://forum.scholieren.com/index.php)

- Software & Hardware (https://forum.scholieren.com/forumdisplay.php?f=20)

- - [VB] Inverse Cosine (https://forum.scholieren.com/showthread.php?t=234042)

-=Odysseus=-

01-10-2002 17:11

[VB] Function Inverse Cosine

Hoi,

Ik heb de volgende function om de Inverse Cosinus uit te rekenen:

Code:

Function ArcCos(x As Double) As Double 

' Inverse Cosine 

If x = 1 Then 

ArcCos = 0 

ElseIf x = -1 Then 

ArcCos = -pi

Else 

ArcCos = Atn(x / Sqr(-x * x + 1)) + pi / 2 

End If 

End Function

en roep ik hem zo aan:

Code:

rl = ArcCos(getal)

alleen als ik hem wil aanroepen geeft hij de volgende fout:

Compile error:
ByRef argument type mismatch

Wat doe ik verkeerd?

Chimera

01-10-2002 18:32

Wat is 'getal' voor type? Is dit wel een Double?

-=Odysseus=-

01-10-2002 20:53

Citaat:

Chimera schreef:
Wat is 'getal' voor type? Is dit wel een Double?

Dat was idd wat mis was thnx :)

Alleen doettie het nog niet goed volgens mij.
Weet iemand hoe ik de inverse cosinus van een waarde krijg in VB? :(

Lethalis

01-10-2002 21:08

Inverse Cosine:
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)

Bron: VB math functions

[edit]
Misschien moet je omrekenen: 180 / pi.

Ik kan het niet testen, aangezien ik geen VB heb geïnstalleerd.

-=Odysseus=-

01-10-2002 21:30

Citaat:

******** schreef:
Inverse Cosine:
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)

Bron: VB math functions

[edit]
Misschien moet je omrekenen: 180 / pi.

Ik kan het niet testen, aangezien ik geen VB heb geïnstalleerd.

Ja dat begrijp ik, maar das dan ook tot daar aan toe :( hij willut gewoon nie doen.

Marcade

02-10-2002 12:14

Is rl ook een double?

Heb je PI uberhaupt wel gezet of staat er gewoon niks in? (en heb je van PI ook een double gemaakt?)

-=Odysseus=-

02-10-2002 13:00

Citaat:

Marcade schreef:
Is rl ook een double?

Heb je PI uberhaupt wel gezet of staat er gewoon niks in? (en heb je van PI ook een double gemaakt?)

rl is double, pi is double en is gezet.

-=Odysseus=-

02-10-2002 13:35

Ik heb um eindelijk :D khad ff een andere formule gebruikt en hij deed. Nog bedankt allemaal :)

Alle tijden zijn GMT +1. Het is nu 13:45.