Foxtable(狐表)用户栏目专家坐堂 → 自定义流程通知


  共有1583人关注过本帖树形打印复制链接

主题:自定义流程通知

帅哥哟,离线,有人找我吗?
Hyphen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/14 11:20:00 [显示全部帖子]

fhs集合是怎样查询的,每次查询没有审核的单不就行了

或者调换下位置

If fhs.Count > 0 AndAlso Forms("审核申请").Opened = False Then
    Dim pts() As String = fhs(0).Split("|")
    With Forms("审核申请")
        .Open()
        .Controls("Label1").Text = pts(2& "新增订货单" & pts(1& ",请审核!"
        .Controls("Label2").Text = pts(0'将发货单主健设置为Label2的标题
    End 
With

    fhs.RemoveAt(0)
End
 If

 回到顶部