イベントログにエラーを書き込む

PowerShellの実行を記録に残して起きたい時があるかもしれません。記録する内容として考えられるのはプログラムの
１．実行日時
２．名前
３．説明
４．実行結果
実際にログを参照する機会はエラーが発生した時が多いと思います。そのため、イベントログに１、２．３．４．(エラー)を記録するプログラムを作成してみました。

set-PSDebug -strict
# ------------------------------------
# イベントログにエラーを書き込む
# ------------------------------------
Function CreateEvent{
    # イベントログオブジェクト生成
    $EventLog = new-Object system.Diagnostics.EventLog
    
    # ログのタイプを設定
    $EventLog.log = "Application"
    
    # ソースを設定
    $Eventlog.source = "CreateEvent"
    
    # エラー書き込む(イベントID:100)
    $Eventlog.WriteEntry("エラーが発生しました", "Error", 100)
}