vb.net - vb.net のデータ セットからすべてのレコードをクリアする

Question

私は vb.net Windows フォームで作業しています。ボタンをクリックすると、次のようなコードが表示されます。

  Dim rpt As New DelivaryPerformance
     Dim ds As New DataSet
       Dim da As New SqlDataAdapter
         Dim rpt As New DelParkingtype
        Dim locid As Integer = RecordID("Locid", "Location_tbl", "LocName", CmbLocations.Text)
        Dim cmdstatus As New SqlCommand("IBS_DelivaryStaus", con.connect)
        cmdstatus.CommandType = CommandType.StoredProcedure
        cmdstatus.Parameters.Add("@locid", SqlDbType.Int).Value = locid
        da.SelectCommand = cmdstatus
        da.Fill(ds)
        If (ds.Tables(0).Rows.Count > 0) Then

            rpt.SetDataSource(ds.Tables(0))
            ' CrystalReportViewer1.ReportSource = rpt
        End If

ボタンをクリックするたびにクリックしているときに、データセットからすべてのレコードをクリアしたいのですが、データセットからすべてのレコードをクリアする方法