- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 搞了半天都是错误，只好来这问了 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25523)
-- 发布时间：2012/11/11 0:17:00
-- 搞了半天都是错误，只好来这问了
加载窗体后，点击“删除当前分类”，出错
此主题相关图片如下：未命名.jpg
代码：
Dim fl As WinForm.ComboBox=e.Form.controls("sxcb")
Dim dlfl As DataRow =fl.SelectedItem
Dim dlms As String =dlfl("商品分类")
Dim txt As String = fl.value
If txt = Nothing Then
MessageBox.Show("请选择需要删除的【商品分类】")
Else
If MessageBox.Show("是否删除当前商品分类信息?","请确认!",MessageBoxButtons.YesNo)=DialogResult.Yes
DataTables("商品分类").Deletefor("商品分类=\'"& dlms &"\'")
MessageBox.Show("【" & dlms & "】" & "商品分类已删除!")
e.Form.controls("sxcb").value=Nothing
End If
End If
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:201211090935.zip |
-- 发布时间：2012/11/11 0:37:00
--
maybe
txt is nothing
-- 发布时间：2012/11/11 1:33:00
--
谢谢 muhua
按照你的方法，解决了问题，可是还是有点迷糊，不知道为什么
-- 发布时间：2012/11/11 1:37:00
--
假设ComboBox有初始值的话，不知道怎么做？
-- 发布时间：2012/11/11 10:23:00
--
你这个用find 判断 像你这样做 是找不到数据造成.所以提示你空值了.