要在PPT中实现随机抽题的功能，您可以按照以下步骤操作：

准备题库

将所有题目和答案整理到一个Excel文件中，每个题目和答案分别放在不同的行中。例如，第一列输入题目，第二列输入答案。

创建PPT幻灯片

在PPT中创建一个新的幻灯片，用于显示抽题界面。您可以设计一个包含“开始”、“停止”和“显示题目”按钮的界面。

编写宏代码

打开PPT的VBA编辑器（Alt+F11），在“模块”中插入以下代码：

```vba

Sub RandomQuiz（）

Dim n As Integer

n = Int（Rnd（） * 10） '生成一个0-9之间的随机数

ActivePresentation.Slides（n + 1）.Select '选中幻灯片

'将幻灯片标题（即题目）显示在文本框中

ActiveWindow.Selection.SlideRange.Shapes.Title.TextFrame.TextRange.Copy

ActiveWindow.Selection.SlideRange.Shapes.Placeholders（2）.TextFrame.TextRange.Paste

End Sub

```

链接按钮到宏

在PPT中，为“开始”、“停止”和“显示题目”按钮分别添加宏，并将宏命名为“RandomQuiz”。

设置自动切换

在PPT中，设置幻灯片的自动切换时间，以便在放映时能够随机切换到不同的题目幻灯片。

测试和调整

运行PPT，测试随机抽题功能是否正常工作。根据需要调整按钮的位置、大小和样式，以提高用户体验。

通过以上步骤，您可以在PPT中实现一个简单的随机抽题功能。如果您需要更复杂的功能，例如不重复抽题、保存答案等，可以考虑使用更高级的工具或插件，如PowerPoint Online Add-ins（如Qustionary或Quizlet）。