Arrows pointing to all the wrong places & Unloading Line control

[Tontow]

The purpose of this program is to display a graphic tech tree.

The problem is that I can’t seem to get the arrows to point to the right spot.
Would someone Please take a look to see what I'm doing wrong?

PS: the 2 required bmp zips total about 4.9 MB and can be downloaded at: www.geocities.com/tontow_merlin/


Everything having to do with loading and placing controls is in drawingclass.bas . If you hit run program and then go under options and check "Add Name To ToolTips" and "Add Name To Labels" it will provide some addition information for debugging.


Public Sub LoadData(Index As Integer) - Loads and places all the picture boxes.

Public Sub DrawArrows() - determines where to draw the lines and arrows
-- Public Function GetReq(ByVal ObjID As String) As String() - returns an array containing the Picturebox index of all the required objects that must be researched in order to enable the current object. (I know that this function is working correctly because of the Debug output shown in labels and tool tips providing the options mentioned above are enabled)



Also I get an error on the following code (line controls):

For I = Form1.Lin1().UBound To 1 Step -1
    Unload Form1.Lin1(Index)
    Unload Form1.Lin1a(Index)
    Unload Form1.Lin1b(Index)
Next I