差不多的,比如控制用户显示那些菜单
With wb.AddGrid("","g1")
if DataTables("授权表").find("用户='张三' and 菜单='c1'") isnot nothing
.Add("c1","Button", "./images/button.png").Attribute = ""
end if
.Add("c2","Cell", "./images/cell.png", "http://www.foxtable.com")
.Add("c3","Toast", "./images/toast.png", "http://www.foxtable.com")
End With
控制可以使用那些控件
With wb.AddInputGroup("form1","ipg1","客户资料")
.AddInput("姓名","姓名","Text") '前一个"姓名"是ID,后一个"姓名"是标题
.AddInput("年龄","年龄","number")
.AddInput("日期","日期","date")
if DataTables("授权表").find("用户='张三' and 页面='c1' and 控件='级别'") isnot nothing
.AddSelect("级别","级别","普通会员|高级会员|VIP会员")
endif
.AddSwitch("停权","停权").Value = "True"
End With