因此,我想从UP1文本框(显示“10”的那个文本框)(ActiveXControl以便在呈现时进行编辑)将数字添加到S1 textbox (显示"10"),这里是我的代码:
Slide1.Shapes("S1").TextFrame.TextRange = Slide1.Shapes("S1").TextFrame.TextRange + UP1
但我的结果是:
发布于 2022-03-06 06:28:01
在添加字符串值之前,应将其转换为数字值。
With Slide1.Shapes("S1").TextFrame.TextRange
.Text = Val(.Text) + UP1
End With
https://stackoverflow.com/questions/71367176
复制相似问题