VBA IsInArray find in array and return last index

 

Function IsInArray(stringToBeFound As String, arr As Variant) As Long

  Dim i As Long

  ' default return value if value not found in array

  IsInArray = -1

  For i = LBound(arr) To UBound(arr)

    If StrComp(stringToBeFound, arr(i), vbTextCompare) = 0 Then

      IsInArray = i

      Exit For

    End If

  Next i

End Function

Python update all component by PIP

1 c:\ pip freeze > requirements.txt

2 edit requirements.txt, and replace all ‘==’ with ‘>>’. Use the ‘Replace All’ command in the editor.

powershell -Command "(gc requirements.txt) -replace '==', '>>' | Out-File requirements.txt"

3 c:\pip install -r requirements.txt --upgrade

Netbean IDE + Glassfish

to start page

remove web.info to provent error java.luaxxxxxx