在PPT中插入的VBA程序需要什么特殊公式么，为什么不能用

1、运行PowerPoint2003，单击“文件”-“保存”命令，d出“另存为”对话框，文件名设为“测验”，单击“保存”命令。
2、单击“插入”-“文本框”-“水平”命令，这时鼠标变成“1”字型，在编辑区内单击鼠标左键拖动鼠标拉出一个方框，在框内输入第一题的题目“1人造地球卫星的轨道半径越大，则”。
3、下面我们来制作选项。单击“视图”-“工具栏”-“控件工具箱”命令，d出“控件工具箱”，单击“控件工具箱”上的“选项按钮”控件，鼠标变成十字型，按下鼠标左键拖动鼠标拉出一个方框。单击“控件工具箱”上的“属性”命令，d出“属性”对话框，把“名称”改为“ti1”，把“caption”改为“A速度越小，周期越小”，其它设为默认。
图2
其余的三个选项的名称分别为“ti2”、“ti3”、“ti4”，“caption”分别为“B速度越小，周期越大”、“C速度越大，周期越小”、“D速度越大，周期越大”。
4、“下一题”按钮的制作。单击“控件工具箱”中“命令按钮”控件，这时鼠标变成十字型，如前在编辑区内拖拉出一个方框，松开鼠标方框会变成一个按钮。选中它，单击鼠标右键，在d出的快捷菜单中选择“属性”命令，把“命令按钮”属性中的“caption”设为“下一题”。
这样，第一题的界面就制作完成了。第二题我们可以按照第2-4步做出来，只是要把题目、各个选项值换一下，另外需要添加一个文本框命令，其名称设为“sum”，命令按钮的名称改为“得分”。
三、添加代码
1、单击“控件工具箱”上“查看代码”控件，d出“Microsoft
visual
basic”编辑器，单击“插入”-“模块”命令，d出“模块”编辑窗口，在“模块”编辑窗口输入“public
fen(2)
as
integer”。
2、选中第一题中“下一题”按钮，单击“控件工具箱”上“查看代码”控件，d出“Microsoft
visual
basic”编辑器，在“Private
Sub
CommandButton1_Click()”和“End
Sub”之间输入
If
ti2Value
=
True
Then
fen(0)
=
2
Else
fen(0)
=
0
End
If
With
SlideShowWindows(1)View
GotoSlide
(2)
End
With
3、选中最后一题中“得分“按钮，单击“控件工具箱”上“查看代码”控件，d出“Microsoft
visual
basic”编辑器，在“Private
Sub
CommandButton1_Click()”和“End
Sub”之间输入
If
ti3Value
=
True
Then
fen(1)
=
2
Else
fen(1)
=
0
End
If
Dim
i,
s
s
=
0
For
i
=
0
To
2
s
=
s
+
fen(i)
Next
sum
=
s
好了，退出“Microsoft
visual
basic”编辑器，按F5试一下效果吧，怎么样，是不是和原来设计的一样呢。

以上就是关于在PPT中插入的VBA程序需要什么特殊公式么，为什么不能用全部的内容，包括:在PPT中插入的VBA程序需要什么特殊公式么，为什么不能用、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！