VB.Netでクラスフィールドの名前をプライベートサブに渡して更新する

Question

これは簡単なことだと思っていましたが、それを動作させる方法を理解できません。

私は値を確認したいクラス内に一連のフィールドを持っています。だから私は私的な方法でこれを渡すことが理想的だろうと思った同じif ... then ... else文を書くのではなく。もちろん

Private Sub checkParameter(ByRef p_param As Object, ByRef p_private_field As Object, p_exception As String) 

     If Not p_param Then 
      Throw New Exception(p_exception) 
     Else 
      p_private_field = p_param 
     End If 
    End Sub 

問題は、私はp_private_fieldは私が渡しています実際のプライベートフィールドになりたいということです

だから私は、次のコードでメソッドを呼び出した場合：。

checkParameter(i_input_folder, "p_input_folder", "Input folder must be supplied") 

次に、メソッドはi_input_folderに値があったかどうかをチェックし、そうであればそれをプライベートフィールドp_input_folderに代入し、指定されたメッセージで例外をスローしません。

ご協力いただければ幸いです。

乾杯

Answer 1

は、ほんの少しの誤植のように思えるあなたは文字列として2番目のパラメータを渡す

checkParameter(i_input_folder, "p_input_folder", "Input folder must be supplied") 

（の名前私は推測出願）がありますが、オブジェクト自体

を渡す必要があります