La reference d'objet n'est pas définie à une instance d'objet

 
Private Sub ButtonAjout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonAjout.Click
        Try


            cnx.Open()
            cmd.CommandText = "insert into action values ('" & Text_desi.Text & ",'" & Text_desc.Text & _
           ",'" & Textlieu.Text & ",'" & DateTimePicker1.Text & ",'" & DateTimePicker2.Text & "' )"
            cmd.Connection = cnx
            dr = cmd.ExecuteReader
            MessageBox.Show("ajout avec succès ", "ajout", MessageBoxButtons.OK)
        Catch ex As Exception
            MsgBox(ex.Message)


        End Try
        cnx.Close()