Vb.net 如何检查OLEDB命令是否成功？

我正在处理access数据库，我想知道如何修复下面的代码，以便向用户显示正确的信息。问题是，如果oledbcommand未成功，我希望显示一条错误消息

        Try

        cn = New OleDbConnection(" Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\ro.mdb")
        'provider to be used when working with access database
        cn.Open()
        cmd = New OleDbCommand("select * from [Table1]", cn)

        cmd.CommandText = "insert into [Table1]([LNAME], [FNAME], [MNAME], [POS], [UNAME], [PASS]) values('" + lstname + "','" + frsname + "','" + midname + "','" + post + "','" + usrname + "','" + pword + "')"


        cmd.ExecuteNonQuery()

    Catch
        MsgBox("Either one of the text box is empty or the IDNUMBER entered is already on the database", MsgBoxStyle.Critical)


    End Try

---

找出您希望捕获并显式捕获哪些异常

Try

Catch se As SpecialException
  MsgBox("Error1")

Catch e As Exception    ' Catch all other exceptions.
  MsgBox("General Error")

End Try

---

这是以SqlException开始的，并为此问题更改为Oledb。抱歉没有测试

 Try    
      ... 
    Catch dbException as OledbException
         Dim myErrors as OledbErrorCollection = dbException.Errors
         Dim i as Integer
           For i = 0 to myErrors.Count - 1
               MessageBox.Show("Index #" & i & ControlChars.Cr & _
                   "Error: " & myErrors(i).ToString() & ControlChars.Cr)
           Next i 
    Finially
       ...