主题：判断label显示和不显示的方法

在窗口的AfterLoad中，想实现的功能是：当销售列表中的当前行的 “数量”列和“金额”列不为空值

窗口的控件label1，显示为：卖出数量xx，卖出金额：xxx

如是空值，则不显示。请改一下下面的代码。

Dim r1 As Row = Tables("销售列表").current
If r1.IsNull("数量") OrElse r1.IsNull("金额") Then '如果数量或单价为空
    Forms("label1").Visible = False
   Else
    e.form.controls("label1").text = "卖出数量：" & r1("数量") & "，卖出金额：" & r1("金额")       

 End If