网络课件在PowPoint中的应用

网络课件在PowerPoint中的应用

仿真物理实验室、仿真化学实验室、数理平台、立体几何都可以使用下面的方法实现在PowerPoint中播放网络课件。各软件的控件名称分别如下：

仿真物理实验室：主模块 JhksoftFzActiveFormX
电学 JhksoftDxActiveFormX
光学 JhksoftGxActiveFormX
初中 JhksoftCzActiveFormX
仿真化学实验室：Achemlab1
数理平台：SlptX
数理平台-立体几何：Slpt3dX

下面以数理平台为例进行具体操作，其他软件的操作方法完全相同，只要把控件名称替换一下就可以了。

数理平台的网络课件通过一定的操作可以被应用到PowerPoint中,操作如下:

首先要将课件生成网络课件，生成网络课件后会得到两个文件，一个是网页文件(.htm),另外一个是网络课件（数理平台网络课件的后缀是nlp,立体几何是nl3,仿真物理实验室主模块是nxp,电学是nle,光学是nxo,初中是nla,仿真化学实验室是nem），我们这里需要的是网络课件，不需要网页文件。

1.打开PowerPoint,使用"视图/工具栏/控件件工具箱"命令打开控件工具箱,如下图示:

2.按"控件工具箱"右下角的"其它控件"按钮，在弹出的列表中选中"SlptX Control",在文档中拖出SlptX控件

3.选中刚添加的控件，按右键，在弹出的右键菜单中选中"查看代码"，PowerPoint会弹出VB代码编写器，如下图示：

5.在SlptX1的OnPaint事件中输入如下程序：

Private Sub SlptX1_OnPaint()
SlptX1.Caption = ""
SlptX1.FileName = "a.nlp"
End Sub

6.保存到和网络课件a.nlp（名称可以自己定，但必须存在，这里只是例子）同一目录下。

7.现在就可以通过“幻灯片放映/观看放映”来演示课件运行了

当然你还可以在文档中加入一个命令按钮，双击此按钮，写入如下代码：

Private Sub CommandButton1_Click()
SlptX1.Caption = ""
SlptX1.FileName = "a.nlp"
End Sub

删除原来代码，这样在放映时就可以点击此命令按钮来打开课件了

在有些版本的PowerPoint中，放映后保存会有些问题，保存不了。暂时可以通过下面的方法来解决：做好后先保存再运行，运行后如果要修改，先关闭再打开修改，修改后先保存再运行。

如果要在其它电脑上使用此PowerPoint课件，需要在此电脑上安装数理平台网络插件。你可以把数理平台网络插件安装程序提供给任何人，可以把它包含在你们的课件中，可以在你的网络上提供下载。

2003.11