主题：如何屏蔽右键菜单？

Dim Page As WinForm.TopicPage

Dim cnt1 As Integer = DataTables("日志内容").Compute("Count([_identify])")

Dim cnt2 As Integer = DataTables("日志内容").Compute("Count([_identify])", "已审核 = True")

Dim cnt3 As Integer = DataTables("日志内容").Compute("Count([_identify])", "已审核 = False Or 已审核 Is Null")

Page = e.Form.Controls("TopicBar1").Pages.Add("日志统计信息", "日志统计信息")

Page.Links.Add("当前日志总数", "当前日志总数(" & cnt1 & ")")

Page.Links.Add("已审核", "已审核(" & cnt2 & ")")

Page.Links.Add("未审核", "未审核(" & cnt3 & ")")