怎么用代码弄免费ppt

1.用js制作个最为简单的幻灯片思路,初学者,步骤加代码,详细点,谢

div+css你至少得会吧？

首先定义一个轮播器大盒子。设置overflow为hidden。设置其宽度，高度、position设置为相对

再在里面套一个图片盒子，里面加多个img标签。float设置为left。每张照片的大小就是轮播器的大小。那么在轮播器范围内的img'就会显示出来。其他的img就因为上面设置的overflow属性而被隐藏了。position设置为绝对定位。

js代码方面你在窗口window.onload=function(){

写上一个定时器

设置定时器执行的方法，就是每隔多少秒就把图片盒子里的left属性设置为轮播器大小的--、基本的就出来了。

其他的代码bug自己完善。

}

你提问前问题因为更具体点。代码自己百度，思路给你说了，要是你还要代码只能说明至少你现在不适合干程序设计。自己不敲代码，光想百度复制粘贴运行没多大用

2.如何用Flash代码得到幻灯片效果

这是我写的一个简单例子。

代码是as2.0。直接新建一个as2.0另存一下，然后将代码复制到主时间轴的第一帧上。

再复制几个jpg图片到你存这个flash的文件夹下，取名为1.jpg,2.jpg,3.jpg 。

然后ctrl+enter运行测试即可。修改代码中的defaultNum 和 totalNum值，可以确定显示从第几到第几的图片。

Stage.align = "TL";Stage.scaleMode = "noScale";import mx.transitions.*;import mx.transitions.easing.*;var defaultNum = 1;var totalNum = 4;var oldName:String = "";//var mcl_obj:Object = new Object();mcl_obj.onLoadInit = function(target_mc:MovieClip) { //_root.lock = true; // target_mc._width = Stage.width; target_mc._height = Stage.height; var myTween:Tween = new Tween(target_mc, "_alpha", Strong.easeIn, 0, 100, 2, true); var R:Number = randRange(0, 3); if (R == 0) { TransitionManager.start(target_mc, {type:PixelDissolve, direction:Transition.IN, duration:2, easing:None.easeOut, xSections:40, ySections:40}); } else if (R == 1) { TransitionManager.start(target_mc, {type:Blinds, direction:Transition.IN, duration:2, easing:None.easeNone, numStrips:30, dimension:0}); } else if (R == 2) { TransitionManager.start(target_mc, {type:Wipe, direction:Transition.IN, duration:2, easing:None.easeNone, startPoint:1}); } else if (R == 3) { TransitionManager.start(target_mc, {type:Squeeze, direction:Transition.IN, duration:2, easing:Elastic.easeOut, dimension:0}); } target_mc.onRelease = function() { if (defaultNum+1>totalNum) { defaultNum = 1; } else { defaultNum++; } my_mcl.loadClip(defaultNum+".jpg", _root.createEmptyMovieClip("img"+defaultNum+"_mc", _root.getNextHighestDepth())); }; // myTween.onMotionFinished = function() { if (defaultNum-1 == 0) { _root["img"+totalNum+"_mc"].removeMovieClip(); } else { _root["img"+(defaultNum-1)+"_mc"].removeMovieClip(); } oldName = "img"+defaultNum+"_mc"; };};var my_mcl:MovieClipLoader = new MovieClipLoader();my_mcl.addListener(mcl_obj);my_mcl.loadClip(defaultNum+".jpg", _root.createEmptyMovieClip("img"+defaultNum+"_mc", _root.getNextHighestDepth()));//function randRange(min:Number, max:Number):Number { var randomNum:Number = Math.floor(Math.random()*(max-min+1))+min; return randomNum;}var stageListener:Object = new Object();stageListener.onResize = function() { _root[oldName]._width = Stage.width; _root[oldName]._height = Stage.height;};Stage.addListener(stageListener);。

3.如何用Flash代码得到幻灯片效果

这是我写的一个简单例子。

代码是as2.0。直接新建一个as2.0另存一下，然后将代码复制到主时间轴的第一帧上。

再复制几个jpg图片到你存这个flash的文件夹下，取名为1.jpg,2.jpg,3.jpg 。

然后ctrl+enter运行测试即可。修改代码中的defaultNum 和 totalNum值，可以确定显示从第几到第几的图片。

Stage.align = "TL"; Stage.scaleMode = "noScale"; import mx.transitions.*; import mx.transitions.easing.*; var defaultNum = 1; var totalNum = 4; var oldName:String = "";// var mcl_obj:Object = new Object(); mcl_obj.onLoadInit = function(target_mc:MovieClip) { //_root.lock = true; // target_mc._width = Stage.width; target_mc._height = Stage.height; var myTween:Tween = new Tween(target_mc, "_alpha", Strong.easeIn, 0, 100, 2, true); var R:Number = randRange(0, 3); if (R == 0) { TransitionManager.start(target_mc, {type:PixelDissolve, direction:Transition.IN, duration:2, easing:None.easeOut, xSections:40, ySections:40}); } else if (R == 1) { TransitionManager.start(target_mc, {type:Blinds, direction:Transition.IN, duration:2, easing:None.easeNone, numStrips:30, dimension:0}); } else if (R == 2) { TransitionManager.start(target_mc, {type:Wipe, direction:Transition.IN, duration:2, easing:None.easeNone, startPoint:1}); } else if (R == 3) { TransitionManager.start(target_mc, {type:Squeeze, direction:Transition.IN, duration:2, easing:Elastic.easeOut, dimension:0}); } target_mc.onRelease = function() { if (defaultNum+1>totalNum) { defaultNum = 1; } else { defaultNum++; } my_mcl.loadClip(defaultNum+".jpg", _root.createEmptyMovieClip("img"+defaultNum+"_mc", _root.getNextHighestDepth())); }; // myTween.onMotionFinished = function() { if (defaultNum-1 == 0) { _root["img"+totalNum+"_mc"].removeMovieClip(); } else { _root["img"+(defaultNum-1)+"_mc"].removeMovieClip(); } oldName = "img"+defaultNum+"_mc"; }; }; var my_mcl:MovieClipLoader = new MovieClipLoader(); my_mcl.addListener(mcl_obj); my_mcl.loadClip(defaultNum+".jpg", _root.createEmptyMovieClip("img"+defaultNum+"_mc", _root.getNextHighestDepth()));// function randRange(min:Number, max:Number):Number { var randomNum:Number = Math.floor(Math.random()*(max-min+1))+min; return randomNum; } var stageListener:Object = new Object(); stageListener.onResize = function() { _root[oldName]._width = Stage.width; _root[oldName]._height = Stage.height; }; Stage.addListener(stageListener);。

4.如何用VB程序写一个PPT演示文档软件

示例代码如下：

Dim op As PowerPoint.Presentation

Dim moPptApp As PowerPoint.Application

Dim moPptPresentation As Object

Dim mnPptAppWidth As Single '

Dim mnPptAppheight As Single

Set moPptApp = CreateObject("PowerPoint.Application")

Set moPptPresentation = moPptApp.Presentations.Open(App.Path & "\test.ppt", , , False) '打开应用程序目录下的test.ppt文件

With moPptPresentation.SlideShowSettings

.Run.Width = mnPptAppWidth '设置宽度

.Run.Height = mnPptAppheight '设置高度

.Run.Presentation.DisplayComments = False

.Run.Presentation.Saved = True

'.Run

End With

mopptapp.quit '退出。

5.在ppt插入flash那要怎么编写代码啊,我不会弄

在ppt中插入flash帮助文档1、新建一个Power Point文档。

2、单击工具栏内的[视图]——[工具栏]——[控件工具箱] 3、单击[其他控件]（最后一个）4、单击其他控件后，弹出选择控件对话框，选择[shockwave flash object]4、这时，光标变成了一个十字形，在幻灯片中拖动鼠标，画出一个矩形框，随即，矩形框中出现了它的对角线。5、在矩形框上单击右键，选择[属性]。

6、在属性框中的movie栏中输入Flash电影的完整路径名称，例如：E：\六年级三班\钟表课件.swf。 （窍门：将Flash电影放入本地磁盘的一个文件夹内，再将这个文件夹打开，将屏幕上方地址栏内的文字刮选，直接在Movie栏后的空格内点右键，按粘贴，在后面输入Flash电影的名称，如：钟表课件，再输入.swf即可）。

7、把[Embed Movie]属性设置成[True]，表示把Flash电影嵌入演示文稿。这样，您就不必担心在另一台机器上播放幻灯片是找不到Flash电影了。

7、这时，所有在属性框内的操作全部完成，点击属性框右上角的[ ]。8、把矩形框调整到合适的大小，播放，如果不出，可以保存以后关闭幻灯片，然后再打开即可。