[求助]为什么这段代码从第二批数据开始就没有客户名称了？变量弹窗有内容。第一批有内容，偶尔第三批也有内容，就第二批不管怎么样都没内容（红色区域为一批）'''
Dim 客户群 As WinForm.TextBox = e.Form.Controls("客户群")
Dim 客户名 As String
Dim txt As String = 客户群.value
If txt.Contains(Chr(13) & Chr(10)) Then
Dim txts() As String = txt.split(Chr(13) & Chr(10))
For I As Integer = 0 To txts.Length - 1
客户名 = txts(I)
For Each r As Row In Tables("运费_Table1").Rows
Dim rr As Row =Tables("运费").AddNew()
rr("目的地")=r("目的地")
rr("客户名称")= 客户名
rr("首重")=r("首重")
rr("续重")=r("续重")
rr("首重重量")=r("首重重量")
rr("①")=r("①")
rr("②")=r("②")
rr("③")=r("③")
rr("进位制")=r("进位制")
rr("快递名")=r("快递名")
Next
客户名=""
Next
End If
[此贴子已经被作者于2019/10/6 13:24:23编辑过]
加好友 
发短信
Post By：2019/10/5 18:25:00 [只看该作者]
