| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]删除代码错在哪呢？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62282) |
| -- 作者：anxue -- 发布时间：2014/12/29 11:30:00 -- [求助]删除代码错在哪呢？ If e.Form.Controls("DropBox1").Text = "" Then MessageBox.Show("车牌为空,不允许删除该条数据.") Else Tables("维修单.配件项目").Current.Delete End If Dim Result As DialogResult Result = MessageBox.Show("是否删除该条数据?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) If Result = DialogResult.Yes Then Tables("维修单.配件项目").Current.Delete End If |
| -- 作者：Bin -- 发布时间：2014/12/29 11:36:00 -- 你两个代码放在一起? 岂不是删除2行 |
| -- 作者：anxue -- 发布时间：2014/12/29 11:39:00 -- 是的，但这个如何提示 MessageBox.Show("车牌为空,不允许删除该条数据.") |
| -- 作者：有点甜 -- 发布时间：2014/12/29 11:42:00 -- If e.Form.Controls("DropBox1").Text = "" Then
|