浅谈信息技术课导学课件的设计、制作与应用.docVIP

浅谈信息技术课导学课件的设计、制作与应用 　　● 课件设计 　　导学课件是课堂教学的重要组成部分。内容上，要根据课堂教学整体设计的需要进行安排；形式上，是在保持前置的恰当大小的窗口中，放置学习内容，使学生在操作其他软件的同时，方便查看课件内容。在课件窗口上也可以放置最小化按钮，在需要时对窗口进行最小化和还原。 　　● 导学课件的几个制作经验 　　1.制作工具软件选择 　　（1）屏幕录制和编辑 　　在信息技术课教学中，软件操作是重要的内容之一。将操作过程用屏幕录制软件录制和编辑好，放置于课件中。学生可以根据自己的实际情况，选择自己生疏的内容进行重复学习。笔者选用的屏幕录制软件是Camtasia。 　　（2）媒体整合 　　PPT是应用非常广泛的演示文稿软件，而Storyline是近年来另一款流行的多媒体整合工具软件，它有着许多的优点，如交互设计、图层功能等。使用者可以根据自己课件的功能设计及个人喜好加以选用。 　　2.在VB中播放PPT 　　要做到笔者前述的窗口前置，可以用VB制作课件播放的窗口，然后通过程序实现。而在VB中播放PPT，需要用到Windows的API函数。这里，笔者将经过验证的使用方法介绍如下： 　　在VB中建立一个窗口，命名为frmSS，其中的代码为： 　　Option Explicit 　　Const APP_NAME = PowerPoint in VB window 　　Public oPPTApp As Object 　　Public oPPTPres As Object 　　Private Declare Function FindWindow Lib user32 Alias FindWindowA （ByVal lpClassName As String， ByVal lpWindowName As Long） As Long 　　Private Declare Function SetParent Lib user32 （ByVal hWndChild As Long， ByVal hWndNewParent As Long） As Long 　　Sub Form_Load（） 　　frmSS.ScaleMode = 2 ’point 模式 　　Dim screenClasshWnd As Long 　　On Error Resume Next 　　Set oPPTApp = CreateObject（PowerPoint.Application） 　　If Not oPPTApp Is Nothing Then 　　Set oPPTPres = oPPTApp.Presentations.Open（App.Path ＼test.ppt， ， ， False） 　　If Not oPPTPres Is Nothing Then 　　With oPPTPres 　　With .SlideShowSettings 　　.ShowType = 1 　　With .Run 　　.Width = frmSS.ScaleWidth 　　.Height = frmSS.ScaleHeight 　　End With 　　End With 　　screenClasshWnd = FindWindow（screenClass， 0） ‘找到PPT播放窗口 　　SetParent screenClasshWnd， frmSS.hwnd ‘将播放窗口置入VB窗口 　　End With 　　Else 　　MsgBox Could not open the presentation.， vbCritical， APP_NAME 　　End If 　　Else 　　MsgBox Could not instantiate PowerPoint.， vbCritical， APP_NAME 　　End If 　　End Sub 　　这里和VB程序放在同一目录下的PPT文件名为test.ppt，程序的功能是运行后在窗口中播放指定的PPT文件。 　　3.在VB中播放Storyline 　　由于Storyline自带的播放器无法做到窗口前置，所以要用VB设计Storyline课件的播放器。Storyline课件的启动文件可以是一个SWF文件，也可以是一个网页文件。而在VB中，也可以使用Flash控件和浏览器控件。如果在Storyline课件中使用了JavaScript代码，则一定要在VB中选择浏览器控件才能使其正常应用。用VB的浏览器控件打开带有JavaScript代码的Storyline课件，会弹出安全警告，要想取消此警告，可以设置