主题：哪位大神看一下 问题出在哪

Dim page As WinForm.TopicPage
page = Forms("导航栏").Controls("TopicBar1").pages("流程管理")
Dim lnk As  WinForm.TopicLink = page.Links.Add("未立项" ,"未立项")
Dim cnt As Byte = DataTables("报价阶段表").Compute("count([_identify])"," 是否立项 = False ")
lnk.Text = lnk.Text & "(" & cnt & ")"