I have a table that has lots of entries. I want to delete all the entries.

I tried this but it doesn't work.
Code:
Using connection As New SqlConnection(Form1.ConnectionString)
                        Using adapter As New SqlDataAdapter("SELECT EmployeeID, EmployeeID, Rate FROM EmployeeRate", _
                                                          connection)

                            Dim delete As New SqlCommand("DELETE FROM EmployeeRate", _
                                                       connection)
                            adapter.InsertCommand = delete
                        End Using
                    End Using