Sin Cos Tan går ju räkna med i VB.
Men hur har de tänkt sig med:
arcsin arccos arctan?

Arctan finns in VB men heter Atn()
<code>

Dom andra två kan du få genom det här exemplet:

Public Function ArcSin(a As Double) As Double
ArcSin = Atn(a / Sqr(1 - a * a))
End Function


Public Function ArcCos(a As Double) As Double
If a = 1 Then
ArcCos = 0
Else
ArcCos = 2 * Atn(1) - Atn(a / Sqr(1 - a * a))
End If
End Function

Använder Radianer...

//Jonas
</code>

Tack.

Hej
Två funktioner till som du kanske har användning för.

Function RadToDeg(ByVal Radian As Single)
RadToDeg = Radian * 57.295773 '180 / 3.141593
End Function

Function DegToRad(ByVal Degree As Single) As Single
DegToRad = Degree * 0.0174533 '3.141593 / 180
End Function

mvh
Sven

Öj.. går det inte att skriva ut pi via script? För det verkar ju inte så xakt att bara at 3,1415 tex?

Går det med nått kommando?

Hej
Nu får du väl ge dig bör väl räcka med 6 - 7 decimaler
fö behöver du inte blanda in Pi det har konstanten redan gjort.

Sven

3,141592653589793238

Sen kan jag inte mer i huvet. Jag tror du kan få fram ännu fler i kalkylatorn...

/Niklas Jansson

Annars finns tiotusen siffror av pi här: http://www.cecm.sfu.ca/projects/ISC/dataB/isc/C/pi10000.txt

Wow, kan du 18 decimaler i huvudet!

Jag kan många fler :) Onödigt egentligen.