以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于SqlTable  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=13707)

--  作者:泡不烂
--  发布时间:2011/10/24 10:30:00
--  关于SqlTable

窗口中加入了一张SqlTable,删除按钮代码如下,点击删除可以删除,但重新打开窗口数据依然存在,何故?

\'删除
Dim Result As DialogResult
Result = MessageBox.Show("确认是否真的要删除?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    Tables("会计科目_Table1").Current.Delete
End If

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.png
图片点击可在新窗口打开查看


--  作者:狐狸爸爸
--  发布时间:2011/10/24 10:39:00
--  

你删除了,有没有保存,当然是存在的。

 

这样吧:

 

Dim Result As DialogResult
Result = MessageBox.Show("确认是否真的要删除?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
     Tables("会计科目_Table1").Current.Delete

     Tables("会计科目_Table1").DataTable.Save()
End If


--  作者:泡不烂
--  发布时间:2011/10/24 10:48:00
--  
太粗心了!谢谢!