datetimeのsystem.nullableをサブルーチンのオプションパラメータとして設定するにはどうすればよいですか？

Question

は、私は、次の試してみましたが、私は

定数式が

Public Sub ExampleSub(ByVal Test as string, 
    Optional ByVal fromDate As System.Nullable(Of DateTime) = Date.Today) 
'A Great sub! 
End sub 

を必要とし、ここで事前にC＃

public void ExampleSub(string Test, 
    System.Nullable<DateTime> fromDate = System.DateTime.Today) 
{ 
    //A Great sub! 
} 

のおかげでされたエラーを取得し

Answer 1

あなたはできません、コンパイラはあなたに理由を伝えます:) C＃で

：

public void ExampleSub(string Test) 
{ 
    //A Great overload! 
    ExampleSub(Test, System.DateTime.Now); 
} 

public void ExampleSub(string Test, System.Nullable<DateTime> fromDate) 
{ 
    //A Great sub! 
} 

さて、IFFあなたはnullは、合法的に呼び出し側によって渡されることはありませんで、あなたができることを知っている：

public void ExampleSub(string Test, System.Nullable<DateTime> fromDate = null) 
{ 
    fromDate = fromDate?? System.DateTime.Now; 
    //An Even Greater sub! 
} 

Answer 2

あなたは非を使用することはできませんデフォルトパラメータの定数式。 System.DateTime.Todayはプログラムをいつ実行するかによって決まりますので、定数ではありません。

デフォルトの定数式を使用してチェックし、ルーチン内でfromDate〜System.DateTime.Nowと設定します。通常nullは@sehes answerのように特殊な値として使用されます。 nullがあなたのコードに別の特別な意味を持つ場合、あなたはdefaulパラメータとして決して使用されない値を使うことができます。 System.DateTime.MinValue：

public void ExampleSub(string Test, 
    System.Nullable<DateTime> fromDate = DateTime.MinValue) 
{ 
    fromDate = fromDate == DateTime.MinValue ? System.DateTime.Now : fromDate; 
    //A Great sub! 
} 

Answer 3

VB

Public Sub ExampleSub(Test As String, _ 
         Optional fromDate As System.Nullable(Of DateTime) = Nothing) 
    'A Great sub! 
    If fromDate Is Nothing Then 
     'code here for no fromDate 
     'i.e. Now 
     fromDate = DateTime.Now 
    End If 
End Sub 

Answer 4

VB.Netこの中でこれをやっている人は、私は私の問題を解決する方法があるならば、それは場合に役立ちます、私は、このスレッド上の正確なものを見つけられませんでした誰か：

/*I set below line as parameter in method*/ 
    Optional ByVal SlotDate As DateTime = Nothing 

    If Not SlotDate = Nothing Then 
     /* code to execute when date passed */ 
    Else 
     /* code to execute when there is no date passed */ 
    End If