Question

我试图在Powerpoint中制作一个问答游戏。

我在幻灯片中添加了一个文本框。如何编写代码以使其中输入的文本被识别为预先写好的文本？

实施例：问题：印度的首都是什么？

在目前的文本框中...用户输入＆＃39;新德里＆＃39; （这是正确的答案）。他应该被重定向到下一张幻灯片。

或

如果用户输入“孟买”字样。（这是错误的答案）;他应该被重定向到上一张幻灯片。

谢谢。

Answer 1

在回答您的问题时，如果您观看以下视频，我相信您会找到答案。

我在三个月前在powerpoint中创建测验时问了一个类似的问题。

https://www.youtube.com/watch?v=3WbJCGoSzhU&feature=youtu.be

祝你好运

CBiscuit

Answer 2

要从ActiveX文本框中读取文本，请使用文本框形状 .OLEFormat.Object.Text属性。这是一个小例子：

Function ReadActiveXTextBox(oSh As Shape) As String
    With oSh.OLEFormat.Object
        MsgBox .Text
    End With
End Function

Sub TestTheFunction()
' Put an activex textbox on slide 1
' Make sure its name is TextBox1
' Add another shape, give it an action setting of Run Macro: TestTheFunction
' Put the presentation in slideshow view,type something into the text box, then
'   click the other shape with the macro setting
    MsgBox ReadActiveXTextBox(ActivePresentation.Slides(1).Shapes("TextBox1"))
End Sub

如何使用MS Powerpoint中的VBA文本框？

2 个答案: