小编use*_*524的帖子

我正在使用 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

当我每次单击按钮时，我想清除数据集中的所有记录，如何清除数据集中的所有记录