从第二种形式设置UserDataSource-超出范围

2020-09-06 08:30发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


我需要从第二种形式设置用户数据源的值

表1包含用户数据源,代码为

oform = Application.SBO_Application.Forms.ActiveForm

oform.DataSources.UserDataSources.Add(" UD_Check",SAPbouiCOM.BoDataType.dt_SHORT_TEXT,1)oform.DataSources.UserDataSources.Item(" UD_Check")。Value =" N"

表格2需要将值设置为" Y",代码为:

frmItemwiz = Application.SBO_Application.Forms.Item(frmItemwizUID)

将udsItemWiz变暗为SAPbouiCOM.UserDataSource = frmItemwiz.DataSources.UserDataSources.Item(" UD_Check")udsItemWiz.Value =" Y"

但是,它总是返回超出范围的错误,

我可以在secon的第一个表单上设置静态文本,例如:

Dim stt as SAPbouiCOM.StaticText = frmItemwiz.Items.Item(" stTest")。Specific

stt.Caption ="你好"

我这里缺少什么吗?

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


我需要从第二种形式设置用户数据源的值

表1包含用户数据源,代码为

oform = Application.SBO_Application.Forms.ActiveForm

oform.DataSources.UserDataSources.Add(" UD_Check",SAPbouiCOM.BoDataType.dt_SHORT_TEXT,1)oform.DataSources.UserDataSources.Item(" UD_Check")。Value =" N"

表格2需要将值设置为" Y",代码为:

frmItemwiz = Application.SBO_Application.Forms.Item(frmItemwizUID)

将udsItemWiz变暗为SAPbouiCOM.UserDataSource = frmItemwiz.DataSources.UserDataSources.Item(" UD_Check")udsItemWiz.Value =" Y"

但是,它总是返回超出范围的错误,

我可以在secon的第一个表单上设置静态文本,例如:

Dim stt as SAPbouiCOM.StaticText = frmItemwiz.Items.Item(" stTest")。Specific

stt.Caption ="你好"

我这里缺少什么吗?

付费偷看设置
发送
4条回答
nice_wp
1楼 · 2020-09-06 08:52.采纳回答

您好,谢谢您的答复,

当我在表单1上添加用户数据源时,它的命名如下:

 oform.DataSources.UserDataSources.Add(" UD_Check",SAPbouiCOM.BoDataType.dt_SHORT_TEXT,1)

 当我从表格2调用它时,我使用相同的名称,对吗?
 
haha101010
2楼-- · 2020-09-06 09:04

好,感谢您对Hakan的帮助,

所以我需要在两种表格上都添加UDS吗?

窗体2不会立即被调用,因此仅在第二个窗体上添加UDS会导致空引用错误,因为在窗体1上有处理它的代码。

南山jay
3楼-- · 2020-09-06 08:47

您的代码。 我认为这段代码有点错误

 frmItemwiz.DataSources.UserDataSources.Item(" UD_Check")

系统找不到名为" UD_Check"的UserDataSource并显示警告弹出窗口。 检查" UserDataSource"名称。

微wx笑
4楼-- · 2020-09-06 09:08

您应该在frmItemwiz上执行

 frmItemwiz.DataSources.UserDataSources.Add(" UD_Check",SAPbouiCOM.BoDataType.dt_SHORT_TEXT,1)

然后您可以访问

 frmItemwiz.DataSources.UserDataSources.Item(" UD_Check")

一周热门 更多>