Gathering of Tweakers

Quicksearch
Berichten: 25
Reg. datum: 05 augustus 2007

Hallo.
Weet iemand hier hoe ik de tanges inverse krijg van een waarde in vb?

zoals volgens mijn rekenmachine:
Tan-1(30)=88.090
Hoek.Text = ((Math.Tanh(Breedte.Text * Math.PI / 180))) werkt niet


Bedankt!


Edit:Is het mogenlijk mijn titel te veranderen naar: [VB Studio] Inverse tanges.

Taipan wijzigde dit bericht 14-07-2008 11:53 (17%)

 

Acties: [view]


Door: BtM909 Moderator WEB/GFX/DTE
( o Y o )

Als je Development Tools & Environments Beleid en Waar hoort mijn topic? doorleest dan zie je dat je topic niet alleen verkeerd is, maar ook geen bestaansrecht mag hebben ;)

Je titel is niet compleet: VB Studio zegt vrij weinig over je eigenlijke probleem.

Daarnaast vraag ik me af waarop je hebt gezocht. Simpelweg zoeken met google naar VB math Tan levert meer dan genoeg op ;)

You've moved up on my notch-list. You now have 1 notch...
Hell Yeah, ik heb FoOL z'n ondertitel weer gestolen (maar dan mooier :D)

Berichten: 25
Reg. datum: 05 augustus 2007

Mijn editje (voor jouw post) gaf al aan dat ik me titel wilde veranderen.

In ieder geval. Op google is dus niks te vinden behalve ((Math.Tanh(Breedte.Text * Math.PI / 180))) of
2 * Atan(1) - Atan(x)

Die beide niet werken voor Vb 2008

Ik heb gewoon de code nodig waarbij ik een getal in kan vullen zodat er de inverse tangens uitkomt.
 
Wat je nodig hebt is gewoon fatsoenlijke documentatie, waarin je, als je iets meer inzet had getoond, had kunnen lezen dat Tanh de hyperbolische tanges is en Atan de inverse tanges, die allebei in de System.Math klasse zitten.

.oisyn wijzigde dit bericht 14-07-2008 12:44 (8%)

Call me cocky, but if there`s an alien out there I can`t kill I haven`t met him and killed him yet.
[Tomb Raider: Underworld] - [My javascript wolfenstein project]

Berichten: 25
Reg. datum: 05 augustus 2007

Die documentatie is inderdaad handig. :)

Maar:
Hoe komt het dan dat Hoek.Text = ((Math.Atan(30))) geen 88 is maar 1.53?
 
Omdat je geen radialen gebruikt (zoals in de documentatie staat aangegeven) misschien?

blaataaps wijzigde dit bericht 14-07-2008 12:54 (45%)

Spelling is een keuze
DM me

Berichten: 25
Reg. datum: 05 augustus 2007

quote:
Taipan schreef op maandag 14 juli 2008 @ 11:52:

Hoek.Text = ((Math.Tanh(Breedte.Text * Math.PI / 180))) werkt niet
Hmm ik snap hem al.

De code was vanaf het begin af aan al goed. Alleen om radialen naar graden om te zetten moet je 180/pi doen in plaats van andersom.

Dus
Hoek.Text = ((Math.Tanh(Breedte.Text * (180/ Math.PI ))))
In plaats van
Hoek.Text = ((Math.Tanh(Breedte.Text * Math.PI / 180)))

Toch bedankt voor de moeite!

Taipan wijzigde dit bericht 14-07-2008 13:03 (3%)

 
Tanh is geen inverse tanges, dat zei ik net al. Daarnaast is de uitvoer van de inverse tanges een hoek (in radialen), niet de invoer. Je moet dus ook niet de invoer converteren (naar graden), maar de uitvoer.

.oisyn wijzigde dit bericht 14-07-2008 13:22 (89%)

Call me cocky, but if there`s an alien out there I can`t kill I haven`t met him and killed him yet.
[Tomb Raider: Underworld] - [My javascript wolfenstein project]

Berichten: 25
Reg. datum: 05 augustus 2007

Hmm ja ik bedoel Atan geen tanh. :)


Ik ben nu tegen een ander probleem aangelopen:

Ik probeer een grafiek te maken (moment lijn). De grafiek werkt allijn heeft hij altijd de breedte die ik hem geef (dus als ik een te grote waarde geef gaat hij van mijn scherm af.)

Ik probeerd dus de breedte van de balk die ik gebruik als breedte van de grafiek te gebruiken maar dan krijg ik de error:
Error 1 Type of 'xcoord' cannot be inferred because the loop bounds and the step clause do not convert to the same type. C:\Documents and Settings\Ikke\Bureaublad\Inf01 (nu goed)\Inf01 (nu goed)\Form1.vb 43 13 Inf01


Is er een manier om de inhoud van de textbox als een getal weer te geven?

Dit is mijn code met het probleem dikgedrukt.
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim mnu As Integer
Dim mvorig As Integer
Dim TPen As New System.Drawing.Pen(System.Drawing.Color.Black, 1)


For xcoord = 1 To Breedte.text
If xcoord < 0.25 * Breedte.Text Then
mnu = Newton.Text * xcoord
Else
mnu = 0.25 * Newton.Text
End If

mnu = Math.Log(mnu)
PictureBox3.CreateGraphics.DrawLine(TPen, xcoord - 1, mvorig, xcoord, mnu)
mvorig = mnu
Next xcoord
 

Acties: [view]


Door: RobIII Moderator PRG/SEA/WEB
Papa van LucaIII \o/

quote:
Taipan schreef op maandag 14 juli 2008 @ 15:25:
Is er een manier om de inhoud van de textbox als een getal weer te geven?
Euh, ja. Maar dat is nogal basic. Verder zie ik niet wat dit topic nog in DTE doet, daar het er geen fluit mee te maken heeft. Open gerust een nieuw topic als je ergens niet uit komt, maar doe dat dan wel in het juiste forum en zorg dat je je dan houdt aan onze Programming Beleid Quickstart. Oh, en voor code hebben we code tags uitgevonden ;)

RobIII wijzigde dit bericht 14-07-2008 15:28 (9%)

We all get along with some glue and duct tape here and there - but when the sh*t hits the fan, don’t blame the duct tape.

Trotse papa van Luca! | Pick My Icon!


Dit topic is gesloten.


© 1998-2008 Tweakers.net BV - Based on React - Hosted by True - Served by Adrastos

© 1998-2008 Tweakers.net BV - Based on React - Hosted by True - Served by Adrastos

[RSS][XML]

Update Tracker

Active Topics
Active Topics
Frontpage Nieuws
Frontpage Nieuws