以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  InputValue输入被循环  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142714)

--  作者:yifan3429
--  发布时间:2019/11/4 15:12:00
--  InputValue输入被循环
If e.DataRow("客户等级") = "赢单客户" Then
    Dim Val As Date = Date.Today
    If InputValue(Val, "小艺要求", "请输入签约日期:") Then
        e.DataRow("签约日期") = Val
    End If
    Dim Val1 As String
    If InputValue(Val1, "小艺要求", "请输入签约人姓名:") Then
        e.DataRow("签约人") = Val1
    End If    
    e.DataRow.Locked = True \'那么锁定此行
    e.DataRow("订单ID") = "GDID" & Format(Date.Now,"yyMMdd-HHmmss")
End If

这个输入时会被几次循环,如何简化呢  求助


--  作者:有点蓝
--  发布时间:2019/11/4 15:29:00
--  
这个代码本身不可能有循环。肯定有其它代码影响了