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