以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  1  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88880)
--  作者：fubblyc
--  发布时间：2016/8/10 21:59:00
--  1

 

[此贴子已经被作者于2016/8/10 22:01:26编辑过]
--  作者：大红袍
--  发布时间：2016/8/10 22:01:00
--  

 不应该

 

If e.form.Controls("textbox1").text > "" Then
    s1 = e.form.Controls("textbox1").text & ";"
Else
    s1 = ""
End If
--  作者：fubblyc
--  发布时间：2016/8/10 22:30:00
--  
谢谢 大红袍 老师。之前就弄对了，自己搞晕了。
--  作者：fubblyc
--  发布时间：2016/8/12 14:45:00
--  
For Each dr As DataRow In  DataTables(e.Form.name & "_table1").DataRows
If dr("销售日期") = "" Then   \' 这句出错，从字符串“”到类型“Date”的转换无效。奇怪，日期列 为空，怎么写。用 is nothing  也不对。。。。
    Messagebox.Show("有的行的没有填 销售日期 ,请检查 ! 如不需要,可删除 !","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Return
End If
--  作者：大红袍
--  发布时间：2016/8/12 14:52:00
--  

If dr.IsNull("销售日期") Then

 

或者

 

If dr("销售日期") = Nothing Then