Vb axisboxaddrefline cannot work

Question

Hello jmp community
I used VB to do the oneway analysis, but axisaddrefline couldn't draw the reference line
This function returns ”False“ all the way
Set tss = jmp_doc.CreateOneway
tss.LaunchAddX "class"
tss.LaunchAddY "weight"
a = tss.Launch
tss.AxisBoxAddRefLine 1, 70, 1, 3
yor help would be greatly appreciated
Thanks

briancorcoran · Accepted Answer

The JMP display box for the axis must first be obtained.  Then it can be used to specify the ref line.  Here is an example of a horizontal line on a Oneway analysis, along with a picture of the result.

Brian Corcoran

JMP Development

Dim hand1 As Integer

'dt is a data table object for Big Class.jmp that was already opened.  Doc is the document pointer from dt
dt.Activate()
OnewayObj = Doc.CreateOneway
OnewayObj.LaunchAddY("Height")
OnewayObj.LaunchAddX("Sex")
OnewayObj.Launch()
hand1 = OnewayObj.GetGraphicItemByType("AxisBox", 1)
OnewayObj.AxisBoxAddRefLine(hand1, 60.0, JMP.axisLineRefConstants.axisLineRefSolid, JMP.jmpColorConstants.jmpColorGreen)

briancorcoran · Accepted Answer

I'm sorry, but it looks like the display option for Legend is not available in automation.  I've added it for JMP 15.  Even then, it will only turn it on or off, not allow you to change the legend.

Brian Corcoran

JMP Development