ボタンクリック時にex.messageを表示

Question

私はdatagridviewといくつかのボタンを持つwinformアプリケーションを持っています.SQLデータベースにデータを挿入するボタンがあります。コードは次のとおりです。

try 
    dim con as new sqlconnection(MY CONNECTION STRING) 
    dim cmd as new sqlcommand("Insert into MYDB (firstname) values (@fname)",con) 
    cmd.parameters.add("@fname",sqldbtype.varchar).value=fname.text 
catch ex as exception 
    detailsbtn.visible=true 
end try 

今私が欲しいものを私は自分のフォームでボタンdetailsbtnをクリックしたとき、それは、DBにデータを挿入するために失敗したいくつかの理由で、例外メッセージを含むメッセージボックスが表示された場合、です。それを行う方法はありますか？

私はこのコード形式MSDNフォーラム

Public Sub ExceptionLogTest(ByVal fileName As String) 
Try 
    ' Code that might generate an exception goes here. 
    ' For example: 
    ' Dim x As Object 
    ' MsgBox(x.ToString) 
Catch ex As Exception 
    My.Application.Log.WriteException(ex, 
     TraceEventType.Error, 
     "Exception in ExceptionLogTest " & 
     "with argument " & fileName & ".") 
End Try 
End Sub 

を得たが、私は、ボタンのクリックは、例外メッセージを取得する方法を見ていません！何をすべきか ？

Answer 1

あなたは、この技術を使用することができます。

Public Class YourClassName 

    Dim ErrorMessage As String = "" 

    Public Sub YourSubName() 
     Try 
      dim con as new sqlconnection(MY CONNECTION STRING) 
      Dim cmd As New SqlCommand("Insert into MYDB (firstname) values (@fname)", con) 
      cmd.Parameters.Add("@fname", SqlDbType.VarChar).Value = fname.text 
     Catch ex As Exception 
      ErrorMessage = ex.Message.ToString() 
      detailsbtn.visible = True 
     End Try 
    End Sub 

End Class 

そして、あなたのボタンdetailsbtnクリックイベントでは、あなたは以下のような変数ErrorMessageの値を表示することができます。

MessageBox.Show(ErrorMessage) 

Answer 2

私はそれを修正！ !!!!

私はあなたが（単にlsExceptionalError と呼ばれる空の文字列を作成し、後でex.message

でキャッチセクションでそれを埋める、法の外 のようないくつかのチェックを入れない場合はstring.isNullorEmptyことができると思い

DIM ERR AS STRING= "" 
CATCH EX AS EXCEPTION 
ERR=ERR + (EX.MESSAGE) 
BUTTON CLICK _EVENT MSGBOX(ERR) 

Answer 3

lsExceptionalError）then msgbox（lsExceptionalError） 終了の場合