Private Sub LoadProblem(ByVal fPath As String)   'ByValで値を渡す。 
        Dim fileName As String = fPath
としたんですが今度SetPloblemやForm1_LoadのところにあるLoadPloblem（）になっているのでエラーになります。
この場合()の中にはなにを入れればいいのかわかりません。
ByVal　ｆPath　Stringもだめでいろいろ試しましたがだめでした。