Question

我正在尝试在PowerPoint 2007中制作评论游戏。我希望能够有两个文本字段，在节目中，控制游戏的人将在两个文本字段中输入团队名称。然后它会保存数据，然后在下一张幻灯片中显示演示文稿两侧的团队名称。我想它会从文本字段中获取输入，将其保存到变量中，并且标签上的标签文本等于文本字段的输入。

Answer 1

在阅读本文之前

“SlideX”=存储您的值的幻灯片
SlideO = AnySlideNumber

好首先，您要制作一张隐藏的幻灯片。要更改幻灯片而不打开此幻灯片，您需要使用超链接，例如，使用带有超链接的图像按钮更改幻灯片，或者您可以使用ActivePresentation.SlideShowWindow.View.GotoSlide (SlideO)

创建一个更改幻灯片的开发人员按钮

在一张未隐藏的幻灯片中，输入团队名称会生成两个标签，这些标签将被编辑并命名为“Team1”和“Team2”或类似名称。好的，请点击其中任何一个，然后你就会得到它的代码，只需忽略它并粘贴这个

Private Sub Save()
    ' Change X to The Slide that stores the numbers!
    SlideX.SaveValuesIntoText Team1.Caption Team2.Caption
End Sub

完成后，转到头部并创建存储值Eg的幻灯片。你输入你的名字的幻灯片（ps我喜欢你的想法）制作了两个Textbox的名为“Team1Name”和“Team2Name”的2个按钮（1 = Save，2 = Nextslide）一旦你完成了那个也打开那个代码并粘贴它

Public Function SaveValuesIntoText(Team1 As String, Team2 As String)
    Team1Name.Caption = Team1
    Team2Name.Caption = Team2
End Function

如果操作正确，您应该将值保存到powerpoint幻灯片中，现在您只需使用

进行简单检索即可。

Private Sub RetrieveValues()
    Team1 = X.Team1Name.Caption
    Team2 = X.Team1Name.Caption
    Label1.Caption = Team1
    Label2.Caption = Team1
End Sub

应该这样做。附：如果您想在幻灯片中自动检索值，显示您需要将此代码添加到其中的团队

Public Sub OnSlideShowPageChange(ByVal Wn As SlideShowWindow)
    If Wn.View.CurrentShowPosition = 1 Then
        RetrieveValues
    End If
End Sub

如果这没有用，我发了一个语法错误告诉我它是什么并且不正确！

在PowerPoint中保存文本字段的值

1 个答案: