turn on suggestions

Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.

Showing results for

Close

Inventor Customization

- Autodesk Community
- >
- Inventor
- >
- Inventor Customization
- >
- Re: iLogic equation answers in radians. I need deg...

Topic Options

- Start Article
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic to the Top
- Bookmark
- Subscribe
- Printer Friendly Page

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

394 Views, 6 Replies

03-04-2013 09:24 AM

Hi,

I'm trying to do a simple Trig equation in iLogic, but it's returning the value in radians even though the parameter is set to Degrees. (Please see attached)

Is there something I need to add to my code to make it return an answer in degrees.

Thanks in advance.

GavoGarmo

Solved! Go to Solution.

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

03-04-2013 09:42 AM in reply to:
GavoGarmo

Public Function RToD(passnum As Double) As Double Return passnum * (180 / PI) End Function Public Function DToR(passnum As Double) As Double Return passnum * (PI / 180) End Function

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

03-04-2013 09:47 AM in reply to:
wowens63

Thanks for the fast reply, but how does that code fit around my existing iLogic code?

I've tried it in a few differnt positions but it's just spitting up errors.

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

03-04-2013 10:35 AM in reply to:
GavoGarmo

see if this helps...

Sub Main Dim dNumber As Double = 45 MsgBox(dNumber & " Deg") Dim dNumber1 as Double = DToR(dNumber) MsgBox(dNumber1 & " Rad") Dim dNumber2 as Double = RToD(dNumber1) MsgBox(dNumber2 & " Deg") End Sub Public Function RToD(passnum As Double) As Double Return passnum * (180 / PI) End Function Public Function DToR(passnum As Double) As Double Return passnum * (PI / 180) End Function

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

03-04-2013 10:38 AM in reply to:
GavoGarmo

if that did not help try this..

Dim dNumber As Double = 45 MsgBox(dNumber & " Deg") Dim dNumber1 as Double = dNumber * (PI / 180) 'Deg to Rad MsgBox(dNumber1 & " Rad") Dim dNumber2 as Double = dNumber1 * (180 / PI) 'Rad to Deg MsgBox(dNumber2 & " Deg")

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

03-04-2013 10:48 AM in reply to:
GavoGarmo

or try this..

t1 = (SpecialBevelDim1 / SpecialBevelDim2) i1 = Atan(t1) * (180 / PI) 'Rad to Deg t1 = (SpecialBevelDim2 / SpecialBevelDim1) i2 = Atan(t2) * (180 / PI) 'Rad to Deg

- Mark as New
- Bookmark
- Subscribe
- Subscribe to RSS Feed
- Highlight
- Email to a Friend
- Report Inappropriate Content

03-05-2013 12:50 AM in reply to:
wowens63

Hi,

I'd put in a mathmatical solution earlier in the day, but it seemed like a bit of a fudge through, so was hoping there was a way to just flip the units from one to the other.

The VB stuff is still a bit of a mystery to me at the moment, so I think the mathmatical solution is probably best for people at my level of programming.

Thanks again for your help.

Search This Board

Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.

Showing results for

Announcements

The Expert Elite program is made up of customers that help other customers by sharing knowledge and exemplifying an engaging style of collaboration. To learn more, please visit our Expert Elite website.

Need installation help?

Start with some of our most frequented solutions or visit the Installation and Licensing Forum to get help installing your software.

- Privacy | Legal Notices & Trademarks | Report Noncompliance | Site map | © Copyright 2014 Autodesk Inc. All rights reserved

Except where otherwise noted, this work is licensed under a Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License. Please see the Autodesk Creative Commons FAQ for more information.