Foxtable(狐表)用户栏目专家坐堂 → [求助]麻烦大侠给翻译下,我迷糊了!


  共有2829人关注过本帖平板打印复制链接

主题:[求助]麻烦大侠给翻译下,我迷糊了!

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


加好友 发短信
等级:小狐 帖子:371 积分:3120 威望:0 精华:0 注册:2013/7/13 15:49:00
[求助]麻烦大侠给翻译下,我迷糊了!  发帖心情 Post By:2014/5/2 19:05:00 [只看该作者]

If e.Table.Current IsNot Nothing Then
    If Forms("营业报账").Opened Then
        If user.Name = e.Table.Current("业务负责") Then
            If Tables("利润单.利润明细单").Current.isnull("账单编号") =  False  Then
                Dim b As WinForm.Button = Forms("营业报账").Controls("删除利润单按键")
                Dim d As WinForm.Button = Forms("营业报账").Controls("删除利润明细按键")
                Select Case e.Table.Current("订单状态")
                    Case "1-新增订单"
                        b.Enabled = True
                        d.Enabled = True
                    Case Else
                        b.Enabled = False
                        d.Enabled = False
                End Select
            End If
        End If
    End If
End If

 回到顶部