各位前拜安!
我用DataGrid秀資料,Access作資料庫,連結成功。
我要刪除一筆資料程式如下:
Dim ret As Integer
  
  Set DataGrid1.DataSource = MyRs
  ret = MsgBox("確定要刪除?" & MyRs!配比編號1&, vbYesNo, "刪除")
  If ret = vbYes Then
    MyRs.Delete
    MyRs.MoveNext
      If MyRs.EOF = False Then
        MyRs.MoveLast
      End If
  End If
  
 RUN時DataGrid可刪一筆資料,但是Access內資料表無刪除動作?
各位前拜可否破解一下!感謝你‧
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(1) 人氣()