Question

我有一个PPT测验，即宏动作的功能。它会计算numberCorrect和numberWrong并在测验结束时按下“查看我的结果”框时向用户报告这些分数。

我希望在选择此框时会自动向我报告这些分数，因为我不希望用户在提交结果之前多次参加测试。

每个人都将使用G-mail帐户。

如果有帮助，这是我目前的视觉基本模块：

Dim UserName As String
Dim numberCorrect As Integer
Dim numberWrong As Integer

Sub YourName()
UserName = InputBox(Prompt:="Type Your Name!")
MsgBox " Good Luck " + UserName, vbApplicationModal, " IEE Recognition Training"

End Sub

Sub Correct()
MsgBox " Well Done! That's The Correct Answer " + UserName, vbApplicationModal, " IEE Recognition Training"
numberCorrect = numberCorrect + 1
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub Wrong()
MsgBox " Sorry! That's The Wrong Answer " + UserName, vbApplicationModal, "  IEE Recognition Training"
numberWrong = numberWrong + 1
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub Start()
numberCorrect = 0
numberWrong = 0
YourName
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub Results()
MsgBox ("You Got " & numberCorrect & " Correct Answers, " & numberWrong & " Wrong Answers, " & UserName), vbApplicationModal, "  IEE Recognition Training"
End Sub

非常感谢任何帮助！谢谢！

Answer 1

您可以使用VBA中的Outlook对象模型轻松完成此操作，但是使用该客户端连接到GMail帐户的用户还是使用Web客户端的用户？如果您不在VBA代码中使用Outlook对象，那么您将直接使用SMTP，这是一个更复杂的野兽。这是一个使用后期绑定的Outlook代码段：

.../systemlaunch/base/linux/ia64/1.6_64.systemlaunch.properties

如何通过宏观行动PPT

1 个答案: