ææ¯è¿æ ·åç:
Dim ConnectionString As String = _
"Provider=Microsoft.Jet.OleDb.4.0;_DatacSource = App.Path+\temp.mdb"
Dim myconn As OleDbConnection = New OleDbConnection()
myconn.ConnectionString = ConnectionString
Dim strcom As String = "select * form é讯å½"
OleDbConnection1.Open()
Dim strdele As String="DELTEL 表 WHERE å§å='MMM'"
Dim mycommand As OleDbCommand = New OleDbCommand(strdele, myconn)
mycommand.ExecuteNonQuery() 'ä»æ°æ®åºä¸å é¤è®°å½
DataSet1.Tables("é讯å½").Rows(mybind.Position).Delete() 'é»è¾å é¤
DataSet1.Tables("é讯å½").AcceptChanges()
OleDbConnection1.Close()
温馨提示:答案为网友推荐,仅供参考