مشكلة في كود التعديل

[ltr]
 
Try
cmd = New OleDb.OleDbCommand("update sick set name='" & Me.TextBox2.Text & _
" ' , data-birth = " & Me.TextBox3.Text & _
" , address = ' " & Me.TextBox4.Text & _
" ' , where number = " & Me.TextBox1.Text & " ", con)
con.Open()
cmd.ExecuteNonQuery()
con.Close()
MsgBox("تمت عملية التعديل !", MsgBoxStyle.Information)
'dt.Clear()
'Classes_Load(sender, e)
Catch
MsgBox("خطأ في الاتصال!", MsgBoxStyle.Critical)
End Try
[/ltr]

update ويقولي خطأ في بناء الجملة في عبارة Catch هذا الكود ما يشتغل ويصلعلي الخطأ على

اساتذتي المهندسين انتظر ردكم