03-23-2017
12:41 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
03-23-2017
12:41 AM
Would you perhaps know what this ERROR means ? ERROR: MyArrayList is not declared. The item may not be available due to the related security.
My code:
SyntaxEditor Code Snippet
If Start= True Then Dim MyArrayList(3) As Double MyArrayList(0) = X_Afstand_1_Ruit MyArrayList(1) = X_Afstand_2_Ruit MyArrayList(2) = X_Afstand_3_Ruit MyArrayList(3) = X_Afstand_4_Ruit Array.Sort(MyArrayList) For Each Str As Double In MyArrayList Next MessageBox.Show(MyArrayList(1), "Co�rdinate left") MessageBox.Show(MyArrayList(2), "Co�rdinate right") I1=Abs(MyArrayList(1))/((Binnen_diameter_Ruit/2)+Laagdikte_Ruit) J1=(Asin(I1)*180)/3.1415 M1=Abs(MyArrayList(2))/((Binnen_diameter_Ruit/2)+Laagdikte_Ruit) N1=(Asin(M1)*180)/3.1415 If MyArrayList(2)<0 And MyArrayList(1)< 0 Then Q1=J1-N1 Else If MyArrayList(2)>0 And MyArrayList(1)> 0 Then Q1=N1-J1 Else If MyArrayList(2) <0 And MyArrayList(1)>0 Then Q1=J1+N1 End If MessageBox.Show(Q1, "angle")