LoadProblem(My.Application.Info.DirectoryPath & "\test.eng")
Private Sub LoadProblem(ByVal fPath As String)
Private Sub LoadProblem(Optional ByVal fPath As String = My.Application.Info.DirectoryPath & "\test.eng")