SBO中弹出选择框选择后的事件捕捉

根据小肖的帮助:
  1. PrivateSubAccountSetting_10000010_OnFormEvents(ByValFormUIDAsString,ByRefpValAsSAPbouiCOM.ItemEvent,ByRefBubbleEventAsBoolean)HandlesMe.OnFormEvents
  2. IfpVal.EventType=BoEventTypes.et_CHOOSE_FROM_LISTThen
  3. IfpVal.ItemUID=MyCtlUID.mtxbzThen
  4. DimoCFLEventoAsSAPbouiCOM.IChooseFromListEvent
  5. oCFLEvento=pVal
  6. IfNotoCFLEvento.SelectedObjectsIsNothingThen
  7. DimvalAsString=""
  8. val=oCFLEvento.SelectedObjects.GetValue(0,0)
  9. '这里就可以利用捕捉到的值了
  10. EndIf
  11. EndIf
  12. EndSub



你可能感兴趣的:(事件)