以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  删除窗口表出错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=128206)

--  作者:zhuxinhui
--  发布时间:2018/11/30 22:09:00
--  删除窗口表出错

If e.Form.controls("TextBox2").text <> "" Then
      Dim tr As Row = e.Form.Controls("Table1").Table.Delete
  Else
     MessageBox.Show("请录入厂商名称!", "提示", MessageBoxButtons.Ok, MessageBoxIcon.Information)

End If


图片点击可在新窗口打开查看此主题相关图片如下:12.png
图片点击可在新窗口打开查看

--  作者:zhuxinhui
--  发布时间:2018/11/30 22:10:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:5444.png
图片点击可在新窗口打开查看

--  作者:zhuxinhui
--  发布时间:2018/11/30 22:10:00
--  

增加行的代码又可以,但是删除却有问题,不知是什么回来

 


--  作者:zhuxinhui
--  发布时间:2018/11/30 22:12:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2018/11/30 22:12:00
--  

If e.Form.controls("TextBox2").text <> "" Then
      e.Form.Controls("Table1").Table.current.Delete
  Else 
     MessageBox.Show("请录入厂商名称!", "提示", MessageBoxButtons.Ok, MessageBoxIcon.Information)

End If