- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 判断string的length (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98265)
-- 发布时间：2017/3/27 14:18:00
-- 判断string的length
Dim d2 As new ClassLibrary2.Class2()
Dim Multi As String =d2.getInvoiceInfoByONo(dr("发货单号"))
msgbox(Multi)-----‘’弹出空白。那么是不是Multi.Length就应该等于0呢?
If Multi.Length = 0 Then
dr("发货要求") = "请采用老的发货方式"------\'等于0的话，这句咋就没执行呢。
dr.save
Else
-- 发布时间：2017/3/27 14:44:00
--
msgbox(Multi)
msgbox(Multi.length)
msgbox(Multi.Trim().Length)
-- 发布时间：2017/3/28 14:55:00
--
msgbox(Multi)----弹出附件图，就是空
msgbox(Multi.length)----没弹出
msgbox(Multi.Trim().Length)----没弹出
此主题相关图片如下：kong.png
-- 发布时间：2017/3/28 15:49:00
--
不可能没弹出啊。代码不要写在if判断里面，这是最基本的啊。
-- 发布时间：2017/3/28 16:32:00
--
Dim drs As List(of DataRow) = DataTables("销售出库单列表").SQLSelect("发货要求 is null")
For Each dr As DataRow In drs
\'dr("邮箱") = GetPinyin(dr("业务员")).Replace(" ","") & "@bdcom.com.cn"
Dim d2 As new ClassLibrary2.Class2()
Dim Multi As String =d2.getInvoiceInfoByONo(dr("出库单号"))
msgbox(dr("出库单号"))
msgbox(Multi)
msgbox(Multi.length)
msgbox(Multi.Trim().Length)
If Multi.Length = 0 Then
dr("发货要求") = dr("数量")
dr.save
Else
我没写到if里面啊。可是直弹出第一个为空的msg
-- 发布时间：2017/3/28 17:06:00
--
不可能，没有那么奇怪的问题。下没的肯定会弹出。