[حريف برمجة]

كود :

Dim com As OleDbCommand

   con.Open()

    com = New OleDbCommand("delete * from table1", con)
 com.ExecuteNonQuery()

'وتكرر اسماء الجداول كلها
    com = New OleDbCommand("delete * from table2", con)
 com.ExecuteNonQuery()
   
     
       con.Close()