sbo中怎么不通过linkbutton跳出来指定的应付发票

结果是调用菜单的
sbo允许直接操作form(不同于winform，比较简单）

Sub ShowPIForm(ByVal piDocNum As String)
NstAddon.SBO_Application.ActivateMenuItem("2308")
Dim PIForm As Form = SBO_Application.Forms.GetFormByTypeAndCount("141", 1)
PIForm.Mode = BoFormMode.fm_FIND_MODE
PublicFunction.SetFormItemValue(PIForm, "8", piDocNum)
PIForm.Items.Item("1").Click(BoCellClickType.ct_Regular)
End Sub