本文介绍了一种通过SBO菜单调用特定Form并进行直接操作的方法，不同于WinForm，该方法更为简便。通过激活指定菜单项，并获取相应Form实例，可以设置Form模式并直接修改Form上的值。
结果是调用菜单的
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
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
扫一扫
1024
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
