[求助]麻烦大侠给翻译下，我迷糊了！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

以下是引用viking在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

也就是说：当前登录时业务负责时，账单编号不是空值且订单状态为新增订单时两个按钮可用？

主题：[求助]麻烦大侠给翻译下，我迷糊了！