不需要写这么复杂的语句吧,DATAGRID控件本身就支持直接删除记录的功能呀,你只要捕捉它的事件就行了呀,将ALLOWDELETE属性设为TRUE
Private sub datagrid1_beforedelete(cancel as integer)
answer=msgbox("确实要删除这条记录吗?"",okcancel,"删除确认")
if answer=dialogresult.ok then
cancel=false
else
cancel=true
end if
end sub
多方便!
Private sub datagrid1_beforedelete(cancel as integer)
answer=msgbox("确实要删除这条记录吗?"",okcancel,"删除确认")
if answer=dialogresult.ok then
cancel=false
else
cancel=true
end if
end sub
多方便!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货