以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  MASSAGEBOX 代码要怎么做呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=39159)
--  作者：lichelleco
--  发布时间：2013/8/16 22:05:00
--  MASSAGEBOX 代码要怎么做呢

请老师看看这两个代码要怎么做才能用呢

想要按yes 才可以改，按no 不能改

现在不管我按MessageBox YES 还是NO 数据一样可以改

 

 

Dim Result As DialogResult
Result = MessageBox.Show("要修改吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
End If

 

 

Tables("VentorInvoice").AllowEdit = True
--  作者：有点甜
--  发布时间：2013/8/16 22:34:00
--  
呃，这个……

Dim Result As DialogResult
Result = MessageBox.Show("要修改吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then

Tables("VentorInvoice").AllowEdit = True

End If

[此贴子已经被作者于2013-8-16 22:33:52编辑过]